aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/property/service.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/property/service.lisp b/src/property/service.lisp
index 96f864e..5007604 100644
--- a/src/property/service.lisp
+++ b/src/property/service.lisp
@@ -77,7 +77,7 @@ properties."
;; past. (SLEEP 1) is only approximately one second so
;; check that it's actually been a second.
(loop do (sleep 1) until (> (get-universal-time) before))
- (unwind-protect
+ (unwind-protect-in-parent
(with-preserve-hostattrs
(push-hostattrs :no-services t)
(propappapply propapp))