From fdd4199a427cee7ff491c0267baba153d4194b6f Mon Sep 17 00:00:00 2001
From: Stelian Ionescu <sionescu@cddr.org>
Date: Thu, 17 Nov 2011 00:39:19 +0100
Subject: [PATCH] Cosmetic change

---
 src/os/create-process-unix.lisp | 13 +++++++------
 1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/src/os/create-process-unix.lisp b/src/os/create-process-unix.lisp
index f8dadab..b004dd6 100644
--- a/src/os/create-process-unix.lisp
+++ b/src/os/create-process-unix.lisp
@@ -302,12 +302,13 @@
            (with-output-to-string (s)
              (loop :for c := (read-char stream nil nil)
                    :while c :do (write-char c s)))))
-    (let ((process (create-process program-and-args
-                                   :environment environment
-                                   :stdin stdin
-                                   :stdout :pipe
-                                   :stderr stderr
-                                   :external-format external-format)))
+    (let ((process
+            (create-process program-and-args
+                            :environment environment
+                            :stdin stdin
+                            :stdout :pipe
+                            :stderr stderr
+                            :external-format external-format)))
       (unwind-protect
            (let ((stdout (slurp (process-stdout process)))
                  (stderr (if (eql :pipe stderr)
-- 
2.11.4.GIT