* stream.c (run): Fix MinGW build failures. The run function doesn't

work right with arguments, though: the win command line is broken.

1 files changed, 1 insertions, 1 deletions

diff --git a/stream.c b/stream.c
index 1744c28c..14ec811b 100644
--- a/stream.c
+++ b/stream.c
@@ -2341,7 +2341,7 @@ static val run(val name, val args)
 #else
 static val run(val command, val args)
 {
-  val win_cmdline = win_make_cmdline(cons(name, args));
+  val win_cmdline = win_make_cmdline(cons(command, default_bool_arg(args)));
   return sh(win_cmdline);
 }
 #endif