diff options
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)) |