Commit 6c764792 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

More tweaking test-run-program.

parent 1402852d
......@@ -242,8 +242,8 @@ Testing run-program
;; a basic smoke test
(assert-equal "ok" (dewindowize (run-program '("cmd" "/c" "echo" "ok") :output :line)))
#-clozure ;; http://trac.clozure.com/ccl/ticket/1118
(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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment