diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-05-24 17:06:54 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-05-24 17:06:54 -0700 |
| commit | bedf3a65d844beaeae3f58b4818323926532cf74 (patch) | |
| tree | 5cbb179c05f9a31afd4e6b15ec3c743486ea6c0c | |
| parent | d19b5b8738f41a8132be8889dae7660063ea7e77 (diff) | |
| download | consfigurator-bedf3a65d844beaeae3f58b4818323926532cf74.tar.gz | |
SERVICE:WITHOUT-STARTING-SERVICES: fix call to ESEQPROPS
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
| -rw-r--r-- | src/property/service.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/property/service.lisp b/src/property/service.lisp index 5007604..f88f9fd 100644 --- a/src/property/service.lisp +++ b/src/property/service.lisp @@ -62,7 +62,7 @@ properties." (define-function-property-combinator without-starting-services (&rest propapps) "Apply PROPAPPS with SERVICE:NO-SERVICES temporarily in effect." - (let ((propapp (if (cdr propapps) (eseqprops propapps) (car propapps)))) + (let ((propapp (if (cdr propapps) (apply #'eseqprops propapps) (car propapps)))) (:retprop :type :lisp :hostattrs (lambda () (propappattrs propapp) (os:required 'os:debianlike)) |