diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-08-21 15:15:39 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-08-22 15:49:27 -0700 |
| commit | 472e13164a150af1a010179fc94558c6305836d3 (patch) | |
| tree | 51e32941c420a808788dee4242cde8f701a1460f /src/package.lisp | |
| parent | 034c65c8063f6e9ca05f73ae854bf567eaada6ae (diff) | |
| download | consfigurator-472e13164a150af1a010179fc94558c6305836d3.tar.gz | |
MOUNT:UNMOUNTED-BELOW-AND-REMOVED: don't unmount DIR itself
If DIR is itself a mount point then previously we would never delete its
contents because the unmounting is done first. This meant that when
MOUNT:UNMOUNTED-BELOW-AND-REMOVED was used to remove the root filesystem of a
container or virtual machine, for example, then whether the contents of the
root filesystem was actually deleted depended upon whether DIR happened to be
a mount point. This change ensures that the deletion is always done.
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/package.lisp')
| -rw-r--r-- | src/package.lisp | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/package.lisp b/src/package.lisp index d5aed60..2cbff57 100644 --- a/src/package.lisp +++ b/src/package.lisp @@ -153,6 +153,7 @@ #:remote-consfigurator-cache-pathname #:mountpointp #:delete-remote-trees + #:empty-remote-directory #:readfile #:writefile #:get-connattr |