diff --git a/test/test-run-program.script b/test/test-run-program.script
index d4fa8982be982f3cc1289a4b8cc5460fb10f216a..48064fd73903cbdbdb069fdc9a50919559a28036 100644
--- a/test/test-run-program.script
+++ b/test/test-run-program.script
@@ -242,7 +242,7 @@ Testing run-program
 
   ;; a basic smoke test
   (assert-equal "ok" (dewindowize (run-program '("cmd" "/c" "echo" "ok") :output :line)))
-  (assert-equal "ok  1" (dewindowize (run-program "echo ok  1" :output :line)))
+  (assert-equal "ok 1" (dewindowize (run-program "echo ok 1" :output :line)))
   ;; clozure: beware http://trac.clozure.com/ccl/ticket/1118
 
   t)