diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2011-05-23 14:57:17 -0300 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2011-05-23 14:57:17 -0300 |
commit | 4f91a8160fe71295b7ad4d6e3f90f004caa3546c (patch) | |
tree | c0f3f767b785559ee0387e7cfb54a2a1aa06bcd5 /lisp/net/tramp-ftp.el | |
parent | 782fc81943849d699d74c3039be80d4068bb3422 (diff) | |
download | emacs-4f91a8160fe71295b7ad4d6e3f90f004caa3546c.tar.gz emacs-4f91a8160fe71295b7ad4d6e3f90f004caa3546c.tar.bz2 emacs-4f91a8160fe71295b7ad4d6e3f90f004caa3546c.zip |
Don't quote lambda expressions with `quote'.
Diffstat (limited to 'lisp/net/tramp-ftp.el')
-rw-r--r-- | lisp/net/tramp-ftp.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/net/tramp-ftp.el b/lisp/net/tramp-ftp.el index f048208ea41..d42a6f57ea9 100644 --- a/lisp/net/tramp-ftp.el +++ b/lisp/net/tramp-ftp.el @@ -121,12 +121,12 @@ present for backward compatibility." ;; handling. (put 'substitute-in-file-name 'ange-ftp 'tramp-handle-substitute-in-file-name) (add-hook 'tramp-ftp-unload-hook - '(lambda () - (setplist 'substitute-in-file-name - (delete 'ange-ftp - (delete 'tramp-handle-substitute-in-file-name - (symbol-plist - 'substitute-in-file-name)))))) + (lambda () + (setplist 'substitute-in-file-name + (delete 'ange-ftp + (delete 'tramp-handle-substitute-in-file-name + (symbol-plist + 'substitute-in-file-name)))))) ;;;###tramp-autoload (defun tramp-ftp-file-name-handler (operation &rest args) |