Skip to content

Commit

Permalink
fix formatting
Browse files Browse the repository at this point in the history
Signed-off-by: Arseniy Alekseyev <[email protected]>
  • Loading branch information
aalekseyev committed Apr 18, 2022
1 parent 5f371a9 commit 0a6117b
Showing 1 changed file with 7 additions and 6 deletions.
13 changes: 7 additions & 6 deletions src/spawn.ml
Original file line number Diff line number Diff line change
Expand Up @@ -113,12 +113,13 @@ external spawn_windows :
-> int = "spawn_windows_byte" "spawn_windows"

let maybe_quote f =
if String.contains f ' ' ||
String.contains f '\"' ||
String.contains f '\t' ||
f = ""
then Filename.quote f
else f
if
String.contains f ' ' || String.contains f '\"' || String.contains f '\t'
|| f = ""
then
Filename.quote f
else
f

let spawn_windows ~env ~cwd ~prog ~argv ~stdin ~stdout ~stderr ~use_vfork:_
~setpgid:_ =
Expand Down

0 comments on commit 0a6117b

Please sign in to comment.