>From 4842f93d9c09a4b5b31d55db0289ba96fad352ee Mon Sep 17 00:00:00 2001 From: Robert P. Goldman Date: Fri, 21 Oct 2011 14:54:48 -0500 Subject: [PATCH] Modify to reflect the fact that ECL cannot capture STDERR. --- test/run-shell-command-test.script | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/test/run-shell-command-test.script b/test/run-shell-command-test.script index c1c1d19..a485e62 100644 --- a/test/run-shell-command-test.script +++ b/test/run-shell-command-test.script @@ -12,7 +12,7 @@ (unless (zerop (asdf:run-shell-command "./good-shell-command")) (error "Failed to capture exit status indicating shell command failure.")) ;; make sure we capture stderr from ASDF:RUN-SHELL-COMMAND to *VERBOSE-OUT* - #-clisp + #-(or clisp ecl) (let ((string (with-output-to-string (str) (let ((asdf:*verbose-out* str)) @@ -27,7 +27,7 @@ (error "Failed to capture output to standard error using *VERBOSE-OUT*")))) ;; make sure we /don't/ capture stderr from ASDF:RUN-SHELL-COMMAND when ;; *VERBOSE-OUT* is NIL - #-clisp + #-(or clisp ecl) (let ((string (with-output-to-string (str) (let ((*error-output* str)) -- 1.7.3.5