From 09593b22ed34fd81d4d439970a4c3ee28952eb50 Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Thu, 1 Apr 2021 14:36:37 -0700 Subject: WRITEFILE: use RUN because stdout is what our regexp can parse Signed-off-by: Sean Whitton --- src/connection.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/connection.lisp b/src/connection.lisp index d1fe24c..7c0e3d5 100644 --- a/src/connection.lisp +++ b/src/connection.lisp @@ -408,7 +408,7 @@ PATH may be any kind of file, including directories." (re:register-groups-bind (((lambda (s) (delete #\- s)) umode gmode omode) uid gid) (#?/^.(...)(...)(...).[0-9]+ ([0-9]+) ([0-9]+) / - (mrun "ls" "-nd" pathname) :sharedp t) + (run "ls" "-nd" pathname) :sharedp t) (connection-writefile *connection* namestring content -- cgit v1.2.3