From aafc09450fc8cefa908e5774f9b2fb4b36001af2 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Sat, 27 Mar 2021 20:42:04 -0700 Subject: SERVICE:RUNNING: assume no change made Signed-off-by: Sean Whitton --- src/property/service.lisp | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/property/service.lisp b/src/property/service.lisp index 1d7a334..07ffabd 100644 --- a/src/property/service.lisp +++ b/src/property/service.lisp @@ -56,7 +56,9 @@ properties." (:desc #?"Attempt to start ${service} has been made") (:apply (unless (get-hostattrs-car :no-services) - (run :may-fail "service" service "start")))) + (run :may-fail "service" service "start")) + ;; assume it was already running + :no-change)) (define-function-property-combinator without-starting-services (&rest propapps) "Apply PROPAPPS with SERVICE:NO-SERVICES temporarily in effect." -- cgit v1.2.3