diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2021-06-28 18:00:03 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-06-28 18:00:03 -0700 |
commit | ca376d8fc233eda3550249e0553b9e2dcf947613 (patch) | |
tree | e4db882c0c73aef585269b5c9e07eba1afc96ae3 /src/connection/fork.lisp | |
parent | 84220cdb2c244f19db4e958187da51251be2ebdd (diff) | |
download | consfigurator-ca376d8fc233eda3550249e0553b9e2dcf947613.tar.gz |
use AND not IF
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/connection/fork.lisp')
-rw-r--r-- | src/connection/fork.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/connection/fork.lisp b/src/connection/fork.lisp index 0a5e03c..169552d 100644 --- a/src/connection/fork.lisp +++ b/src/connection/fork.lisp @@ -107,4 +107,4 @@ for example, such that we don't see it." (unless (< exit-status 2) (failed-change "Fork connection child failed, exit code ~D" exit-status)) - (values nil (if (zerop status) :no-change nil)))))))))) + (values nil (and (zerop status) :no-change)))))))))) |