1.0.12.43: Two tiny RUN-PROGRAM-related cleanups

[sbcl.git] / tests / run-program.test.sh

diff --git a/tests/run-program.test.sh b/tests/run-program.test.sh
index beb6e42..ab14285 100644 (file)
--- a/tests/run-program.test.sh
+++ b/tests/run-program.test.sh
@@ -90,7 +90,7 @@ ${SBCL:-sbcl} <<'EOF'
   ;; fully buffered.)
   (let ((str (with-output-to-string (s)
                (run-program "/bin/sh"
-                            '("-c" "(echo Foo; sleep 2s; echo Bar)>&2")
+                            '("-c" "(echo Foo; sleep 2; echo Bar)>&2")
                             :output s :search t :error :output :wait t))))
     (assert (string= str (format nil "Foo~%Bar~%"))))