diff options
author | Michael Albinus <michael.albinus@gmx.de> | 2019-02-28 10:33:05 +0100 |
---|---|---|
committer | Michael Albinus <michael.albinus@gmx.de> | 2019-02-28 10:33:05 +0100 |
commit | a80e10458a6e85b64936085f95354cdde5aa847b (patch) | |
tree | bbf3967570a3d2e30fd694501eec0ecbcd7afdca /lisp/net/tramp-sudoedit.el | |
parent | 4927f94792ffaab985e0aa3c977eb19308f067cf (diff) | |
download | emacs-a80e10458a6e85b64936085f95354cdde5aa847b.tar.gz emacs-a80e10458a6e85b64936085f95354cdde5aa847b.tar.bz2 emacs-a80e10458a6e85b64936085f95354cdde5aa847b.zip |
Use proper read syntax for all function names in Tramp
* lisp/net/tramp.el:
* lisp/net/tramp-adb.el:
* lisp/net/tramp-archive.el:
* lisp/net/tramp-cache.el:
* lisp/net/tramp-cmds.el:
* lisp/net/tramp-compat.el:
* lisp/net/tramp-ftp.el:
* lisp/net/tramp-gvfs.el:
* lisp/net/tramp-integration.el:
* lisp/net/tramp-rclone.el:
* lisp/net/tramp-sh.el:
* lisp/net/tramp-smb.el:
* lisp/net/tramp-sudoedit.el:
* test/lisp/net/tramp-archive-tests.el:
* test/lisp/net/tramp-tests.el: Use proper read syntax for all
function names.
Diffstat (limited to 'lisp/net/tramp-sudoedit.el')
-rw-r--r-- | lisp/net/tramp-sudoedit.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/net/tramp-sudoedit.el b/lisp/net/tramp-sudoedit.el index 60eb2125030..42deaf37975 100644 --- a/lisp/net/tramp-sudoedit.el +++ b/lisp/net/tramp-sudoedit.el @@ -314,7 +314,7 @@ absolute file names." 'copy filename newname ok-if-already-exists keep-date preserve-uid-gid preserve-extended-attributes) (tramp-run-real-handler - 'copy-file + #'copy-file (list filename newname ok-if-already-exists keep-date preserve-uid-gid preserve-extended-attributes)))) @@ -542,7 +542,7 @@ the result will be a local, non-Tramp, file name." ;; Preserve trailing "/". (funcall (if (string-equal (file-name-nondirectory filename) "") - 'file-name-as-directory 'identity) + #'file-name-as-directory #'identity) (with-parsed-tramp-file-name (expand-file-name filename) nil (tramp-make-tramp-file-name v @@ -601,7 +601,7 @@ of the symlink. If TARGET is a Tramp file, only the localname component is used as the target of the symlink." (if (not (tramp-tramp-file-p (expand-file-name linkname))) (tramp-run-real-handler - 'make-symbolic-link (list target linkname ok-if-already-exists)) + #'make-symbolic-link (list target linkname ok-if-already-exists)) (with-parsed-tramp-file-name linkname nil ;; If TARGET is a Tramp name, use just the localname component. |