diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2022-04-01 18:19:47 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-04-01 18:32:31 -0700 |
| commit | b6b26120f58e4d0b4bb884b44c7cc867cd90c8a0 (patch) | |
| tree | 867b138c481bbfd42ea25db969e897a3c3624da6 /src/combinator.lisp | |
| parent | ed8c76f566de8f6c10cdace515b3d076026258f0 (diff) | |
| download | consfigurator-b6b26120f58e4d0b4bb884b44c7cc867cd90c8a0.tar.gz | |
connection chain specs.: consistently use :USER for the target user
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/combinator.lisp')
| -rw-r--r-- | src/combinator.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/combinator.lisp b/src/combinator.lisp index aad9b99..6b9acc4 100644 --- a/src/combinator.lisp +++ b/src/combinator.lisp @@ -312,7 +312,7 @@ explicit that in this case they're being applied as root, e.g. that they will affect /root and not /home." (if (and (stringp user) (string= user "root")) `(eseqprops ,@properties) - `(reconnects. `((:as :to ,,user)) ,@properties))) + `(reconnects. `((:as :user ,,user)) ,@properties))) (defmacro with-flagfile (flagfile &body propapps) "Apply PROPAPPS unless FLAGFILE exists on the remote; after applying, create |