diff options
Diffstat (limited to 'src/connection/shell-wrap.lisp')
-rw-r--r-- | src/connection/shell-wrap.lisp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/connection/shell-wrap.lisp b/src/connection/shell-wrap.lisp index bcc8fc8..49cfd83 100644 --- a/src/connection/shell-wrap.lisp +++ b/src/connection/shell-wrap.lisp @@ -23,7 +23,8 @@ (defgeneric connection-shell-wrap (connection cmd)) (defmethod connection-run ((c shell-wrap-connection) cmd input) - (mrun :may-fail :input input (connection-shell-wrap c cmd))) + (apply #'mrun :may-fail :input input + (ensure-cons (connection-shell-wrap c cmd)))) (defun %readfile (c path &optional delete) (multiple-value-bind (out exit) |