diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-06 15:59:33 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-06 15:59:33 -0700 |
| commit | 02ba1f42a0c5c065c9f158d302d614322e53efe7 (patch) | |
| tree | 77ba9a5c43492f94468ddf112cf331f256e194d2 /src/connection.lisp | |
| parent | e36205a9286abbd2940c30955522dcc56252ef19 (diff) | |
| download | consfigurator-02ba1f42a0c5c065c9f158d302d614322e53efe7.tar.gz | |
REMOVE -> DELETE
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/connection.lisp')
| -rw-r--r-- | src/connection.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/connection.lisp b/src/connection.lisp index 178157f..5ab2986 100644 --- a/src/connection.lisp +++ b/src/connection.lisp @@ -330,7 +330,7 @@ start with RUN." ;; seems there is nothing like stat(1) in POSIX, and note that ;; --reference for chmod(1) and chown(1) is not POSIX (re:register-groups-bind - (((lambda (s) (remove #\- s)) umode gmode omode) uid gid) + (((lambda (s) (delete #\- s)) umode gmode omode) uid gid) (#?/^.(...)(...)(...).[0-9]+ ([0-9]+) ([0-9]+) / (mrun "ls" "-nd" path) :sharedp t) (connection-writefile *connection* path content mode) |