diff options
-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)) |