From f535e70c31b506ee4f9a6600e3b41209e83b521c Mon Sep 17 00:00:00 2001 From: Stelian Ionescu Date: Sat, 25 Dec 2010 23:07:38 +0100 Subject: [PATCH] Fix RUN-PROGRAM: stdout and stderr need to be redirected to pipes --- src/os/create-process-unix.lisp | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/os/create-process-unix.lisp b/src/os/create-process-unix.lisp index b91c30e..c96ea33 100644 --- a/src/os/create-process-unix.lisp +++ b/src/os/create-process-unix.lisp @@ -190,7 +190,9 @@ :while c :do (write-char c s))))) (let ((process (create-process program arguments :search search - :environment environment))) + :environment environment + :stdout :pipe + :stderr :pipe))) (values (process-wait process) (slurp-stream-into-string (process-stdout process)) (slurp-stream-into-string (process-stderr process)))))) -- 2.11.4.GIT