diff options
| -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 7c0e3d5..f485540 100644 --- a/src/connection.lisp +++ b/src/connection.lisp @@ -402,7 +402,7 @@ PATH may be any kind of file, including directories." ;; one owned by us, which we might not be able to chown back as non-root. ;; ;; The following, simpler behaviour should fit most sysadmin needs. - (if (test "-f" pathname) + (if (remote-exists-p pathname) ;; 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 |