diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2021-05-06 17:13:14 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-05-06 17:13:14 -0700 |
commit | 07c87fc6bdd3e4e44390c519bf5334ad9f140a8f (patch) | |
tree | a50bd69502277e39c18192cd6d46eea057901b51 /src/connection.lisp | |
parent | b2ea4e2d80e518d32d1f0aa4c297e5bc0b354b41 (diff) | |
download | consfigurator-07c87fc6bdd3e4e44390c519bf5334ad9f140a8f.tar.gz |
pass LOCALE=C to ls(1) in WRITEFILE
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 d7caadf..0d9d6c6 100644 --- a/src/connection.lisp +++ b/src/connection.lisp @@ -438,7 +438,7 @@ PATH may be any kind of file, including directories." (flet ((dehyphen (s) (delete #\- s))) (multiple-value-bind (match groups) (re:scan-to-strings #?/^.(...)(...)(...).[0-9]+ ([0-9]+) ([0-9]+) / - (run "ls" "-nd" pathname)) + (run :env '(:LOCALE "C") "ls" "-nd" pathname)) (unless match (error "WRITEFILE could not determine ownership and mode of ~A" pathname)) |