diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-27 20:43:36 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-27 20:45:37 -0700 |
| commit | 48ba34ba9f5e3dede25e3ade0c11cbed57d931d8 (patch) | |
| tree | f1f034605bb0c0bff492f6f287df63f588c26974 | |
| parent | 8413a91f7b1005106fb53c918463bdf4930c8616 (diff) | |
| download | consfigurator-48ba34ba9f5e3dede25e3ade0c11cbed57d931d8.tar.gz | |
FILE:DIRECTORY-EXISTS: assume no change
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
| -rw-r--r-- | src/property/file.lisp | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/property/file.lisp b/src/property/file.lisp index 59d8a55..88f76c0 100644 --- a/src/property/file.lisp +++ b/src/property/file.lisp @@ -101,4 +101,6 @@ Uses CL-PPCRE:REGEX-REPLACE, which see for the syntax of REPLACE." "Ensure that a directory and its parents exists." (:desc (strcat dir " exists")) (:apply - (mrun "mkdir" "-p" dir))) + (mrun "mkdir" "-p" dir) + ;; assume it was already there + :no-change)) |