diff --git a/test/run-shell-command-test.script b/test/run-shell-command-test.script index 216424fbcb90268db715204656969e2b911408d2..b0fd2901ad6d93a82b471d253b8a63aeda12b3e2 100644 --- a/test/run-shell-command-test.script +++ b/test/run-shell-command-test.script @@ -8,10 +8,7 @@ (unless (some #'(lambda (x) (member x *features*)) '(:win :windows :mswindows :win32 :mingw32)) (quit-on-error - (let ((true-false-dir - (cond ((probe-file "/bin/true") "/bin/") - ((probe-file "/usr/bin/true") "/usr/bin/") - (t (error "Unable to find the standard true binary."))))) - (assert (eql 1 (asdf:run-shell-command (concatenate 'string true-false-dir "false")))) - (assert (eql 0 (asdf:run-shell-command (concatenate 'string true-false-dir "true"))))))) + (assert (eql 1 (asdf:run-shell-command "false"))) + (assert (eql 0 (asdf:run-shell-command "true"))))) +