From 07c87fc6bdd3e4e44390c519bf5334ad9f140a8f Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Thu, 6 May 2021 17:13:14 -0700 Subject: pass LOCALE=C to ls(1) in WRITEFILE Signed-off-by: Sean Whitton --- src/connection.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/connection.lisp') 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)) -- cgit v1.2.3