From 62aa5acab3455eba84a7f2daca3b841580f18edb Mon Sep 17 00:00:00 2001 From: Rudi Grinberg Date: Wed, 25 Apr 2018 16:37:38 +0700 Subject: [PATCH] Remove some path conversion from Action --- src/action.ml | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/action.ml b/src/action.ml index fb7426ed..1615635e 100644 --- a/src/action.ml +++ b/src/action.ml @@ -613,7 +613,7 @@ open Fiber.O let get_std_output : _ -> Process.std_output_to = function | None -> Terminal | Some (fn, oc) -> - Opened_file { filename = (Path.of_string fn) + Opened_file { filename = fn ; tail = false ; desc = Channel oc } @@ -904,7 +904,6 @@ let rec exec t ~ectx ~dir ~env ~stdout_to ~stderr_to = and redirect outputs fn t ~ectx ~dir ~env ~stdout_to ~stderr_to = let oc = Io.open_out fn in - let fn = Path.to_string fn in let out = Some (fn, oc) in let stdout_to, stderr_to = match outputs with