diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-26 14:32:27 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-26 14:32:27 -0700 |
commit | 9dcb43ca6410fcc898ddbdd14f1cea6d30ea581a (patch) | |
tree | f670d1dfd2b95eed8c561989eb83ae23c285de3c /src/connection.lisp | |
parent | 48b3486d19eadc42280fad7b194ed00449786bb7 (diff) | |
download | consfigurator-9dcb43ca6410fcc898ddbdd14f1cea6d30ea581a.tar.gz |
add missing PROGN in WITH-REMOTE-CURRENT-DIRECTORY
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/connection.lisp')
-rw-r--r-- | src/connection.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/connection.lisp b/src/connection.lisp index b40ab01..b1c81c1 100644 --- a/src/connection.lisp +++ b/src/connection.lisp @@ -254,7 +254,7 @@ the working directory of the Lisp process using UIOP:WITH-CURRENT-DIRECTORY." (unwind-protect (if (lisp-connection-p) (with-current-directory (,new) ,@forms) - ,@forms) + (progn ,@forms)) (setf (slot-value *connection* 'current-directory) ,previous))))) (defun pwd () |