From bedf3a65d844beaeae3f58b4818323926532cf74 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Mon, 24 May 2021 17:06:54 -0700 Subject: SERVICE:WITHOUT-STARTING-SERVICES: fix call to ESEQPROPS Signed-off-by: Sean Whitton --- src/property/service.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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)) -- cgit v1.2.3