From 1eb5a2d408224fd458601b553a67deff85f4b8bd Mon Sep 17 00:00:00 2001
From: Francois-Rene Rideau <tunes@google.com>
Date: Mon, 8 Jun 2015 15:23:19 -0400
Subject: [PATCH] UIOP: Fix missing , for run-program using system on Windows.
 Oops.

---
 uiop/run-program.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/uiop/run-program.lisp b/uiop/run-program.lisp
index 47d2bc39..03f53a89 100644
--- a/uiop/run-program.lisp
+++ b/uiop/run-program.lisp
@@ -767,7 +767,7 @@ It returns a process-info plist with possible keys:
         (reduce/strcat
          (os-cond
           ((os-unix-p) `(,@(when redirections `("exec " ,@redirections " ; ")) ,@chdir ,normalized))
-          ((os-windows-p) `(,@chdir @redirections ,normalized)))))))
+          ((os-windows-p) `(,@chdir ,@redirections ,normalized)))))))
 
   (defun %system (command &rest keys
                   &key input output error-output directory &allow-other-keys)
-- 
GitLab