diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-02-27 09:40:51 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-02-27 13:39:57 -0700 |
| commit | 838d7aac806e2ebd8f2971c8774598f688191a9a (patch) | |
| tree | d8bc2111ab69c07f02c9dba00416589798d5081c | |
| parent | db2879636b809e34efc9397c19b646a2695beb51 (diff) | |
| download | consfigurator-838d7aac806e2ebd8f2971c8774598f688191a9a.tar.gz | |
ensure we pass a quoted list to DEPLOY*
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
| -rw-r--r-- | src/data.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/data.lisp b/src/data.lisp index 96ef6a6..cd840a7 100644 --- a/src/data.lisp +++ b/src/data.lisp @@ -404,7 +404,7 @@ Called by connections which start up remote Lisp images." (require "asdf") (let ((*standard-output* *error-output*)) ,(wrap load-forms)) - ,(wrap `((deploy* ,(or remaining :local) ,*host*))))))))) + ,(wrap `((deploy* ',(or remaining :local) ,*host*))))))))) (defun request-lisp-systems () "Request that all Lisp systems required by the host currently being deployed |