Fix issue #3737

ocaml · Sep 5, 2020 · ef9493f · ef9493f
1 parent 739e31a
commit ef9493f
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/dune_engine/scheduler.ml b/src/dune_engine/scheduler.ml
@@ -702,9 +702,10 @@ end = struct
     let fiber =
       Fiber.Var.set t_var t (fun () -> Fiber.with_error_handler f ~on_error)
     in
-    Console.Status_line.set (Fun.const None);
+    Console.Status_line.set (Fun.const None); (* Is this line necessary? *)
     match Fiber.run fiber ~iter with
     | res ->
+      Console.Status_line.set (Fun.const None);
       assert (Event.pending_jobs () = 0);
       Ok res
     | exception Abort err -> Error err