diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-07-20 12:31:48 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-07-24 09:39:14 -0700 |
| commit | fd39aa568bb823b82dbd33f9e8e00226b2c0ae1b (patch) | |
| tree | ff782c73ee873aeb552c21d4f865c7a73567fceb /src/util.lisp | |
| parent | e3753b9a7aff439bae48821789925e73b42704c4 (diff) | |
| download | consfigurator-fd39aa568bb823b82dbd33f9e8e00226b2c0ae1b.tar.gz | |
WITH-DEPLOYMENT-REPORT: use &BODY not &REST
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/util.lisp')
| -rw-r--r-- | src/util.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/util.lisp b/src/util.lisp index 2e48bce..a6f713a 100644 --- a/src/util.lisp +++ b/src/util.lisp @@ -555,7 +555,7 @@ application was instead skipped over, either due to the semantics of a property combinator, or because the user elected to skip the property in the interactive debugger.")) -(defmacro with-deployment-report (&rest forms) +(defmacro with-deployment-report (&body forms) (with-gensyms (failures) `(let* (,failures (result (handler-bind ((skipped-properties (lambda (c) |