From 232999b18034367a6c83b996518986726e80fc5b Mon Sep 17 00:00:00 2001 From: Kate Date: Fri, 24 Mar 2023 14:13:32 +0000 Subject: [PATCH] Add missing quotes when showing a command that failed --- src/core/opamProcess.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/core/opamProcess.ml b/src/core/opamProcess.ml index 764ff18fded..7793dc75d0d 100644 --- a/src/core/opamProcess.ml +++ b/src/core/opamProcess.ml @@ -276,7 +276,7 @@ let make_info ?code ?signal List.iter (fun (k,v) -> print k v) metadata; print "path" cwd; - print "command" (String.concat " " (cmd :: args)); + print "command" (String.concat " " (List.map Filename.quote (cmd :: args))); print_opt "exit-code" (OpamStd.Option.map string_of_int code); print_opt "signalled" (OpamStd.Option.map string_of_int signal); print_opt "env-file" env_file;