diff --git a/src/context.ml b/src/context.ml index 65602036..f8ac6f7f 100644 --- a/src/context.ml +++ b/src/context.ml @@ -149,12 +149,10 @@ let create ~(kind : Kind.t) ~path ~env ~name ~merlin ~targets ~profile () = the contents of the variable, but "ocamlfind printconf conf" still prints the configuration file set at the configuration time of ocamlfind, sigh... *) - match Env.get env "OCAMLFIND_CONF" with - | Some s -> Fiber.return (Path.absolute s) - | None -> - Process.run_capture_line ~env Strict - fn ["printconf"; "conf"] - >>| Path.absolute) + (match Env.get env "OCAMLFIND_CONF" with + | Some s -> Fiber.return s + | None -> Process.run_capture_line ~env Strict fn ["printconf"; "conf"]) + >>| Path.absolute) in let create_one ~name ~implicit ?findlib_toolchain ?host ~merlin () =