aboutsummaryrefslogtreecommitdiff
path: root/src/property/disk.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/property/disk.lisp')
-rw-r--r--src/property/disk.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/property/disk.lisp b/src/property/disk.lisp
index dea18f8..3fa97ee 100644
--- a/src/property/disk.lisp
+++ b/src/property/disk.lisp
@@ -759,7 +759,7 @@ must not be modified."
(apply #'open-volumes-and-contents
`(,volumes ,@(and mount-below-supplied-p
`(:mount-below ,mount-below)))))
- (unwind-protect-in-parent (propappapply propapp)
+ (unwind-protect (propappapply propapp)
(mrun "sync")
(mapc #'close-volume (get-connattr :opened-volumes)))))
:args (cdr propapp)))