diff options
Diffstat (limited to 'src/connection/sbcl.lisp')
-rw-r--r-- | src/connection/sbcl.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/connection/sbcl.lisp b/src/connection/sbcl.lisp index 9d488ca..4fad603 100644 --- a/src/connection/sbcl.lisp +++ b/src/connection/sbcl.lisp @@ -66,7 +66,7 @@ recommended.")) (when-let ((lines (lines out))) (inform t " Output was:" :fresh-line nil) (with-indented-inform (inform t lines))) - (return-exit + (exit-code-to-retval exit ;; print FORMS not PROGRAM because latter might contain sudo passwords :on-failure |