diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-04-01 23:27:54 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-04-01 23:27:54 -0700 |
| commit | b89e19e33771446fe67d24a9e431bb834be0f291 (patch) | |
| tree | cbe2c2c0e6c6e32f715141e7262aaf984b94527d | |
| parent | 7359f95fd01514446ee1031ca4810de88c602d31 (diff) | |
| download | consfigurator-b89e19e33771446fe67d24a9e431bb834be0f291.tar.gz | |
add missing parens
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
| -rw-r--r-- | src/property.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/property.lisp b/src/property.lisp index 263200f..53e42a3 100644 --- a/src/property.lisp +++ b/src/property.lisp @@ -452,7 +452,7 @@ apply or unapply properties.") (defun assert-euid-root () "Assert that the remote user has uid 0 (root)" - (if-let (uid (slot-value *connection* 'remote-uid)) + (if-let ((uid (slot-value *connection* 'remote-uid))) (unless (zerop uid) (failed-change "Property requires root to apply")) (multiple-value-bind (out err exit) |