| commit | ef75c3b56b8ff034eb47e0c69328227127cc93fa | |
| author | Michael Albinus <michael.albinus@gmx.de> | |
| Wed, 11 Nov 2015 10:47:26 +0000 (11 11:47 +0100) | ||
| committer | Michael Albinus <michael.albinus@gmx.de> | |
| Wed, 11 Nov 2015 10:47:26 +0000 (11 11:47 +0100) | ||
| tree | 1d10f8bfc4efe05495bf04a6d265d91f9e56706f | treesnapshot (tar.gz zip) |
| parent | 25775a12c5168b0494dff15639ac25d8e1017530 | commitdiff |
Optimize `file-equal-p' and `file-in-directory-p' in Tramp
* lisp/net/tramp.el (tramp-handle-file-equal-p)
(tramp-handle-file-in-directory-p): New defuns. Suggested by
Harvey Chapman <hchapman@3gfp.com>
* lisp/net/tramp-adb.el (tramp-adb-file-name-handler-alist):
* lisp/net/tramp-gvfs.el (tramp-gvfs-file-name-handler-alist):
* lisp/net/tramp-sh.el (tramp-sh-file-name-handler-alist):
* lisp/net/tramp-smb.el (tramp-smb-file-name-handler-alist): Use them.
* lisp/net/tramp.el (tramp-handle-file-equal-p)
(tramp-handle-file-in-directory-p): New defuns. Suggested by
Harvey Chapman <hchapman@3gfp.com>
* lisp/net/tramp-adb.el (tramp-adb-file-name-handler-alist):
* lisp/net/tramp-gvfs.el (tramp-gvfs-file-name-handler-alist):
* lisp/net/tramp-sh.el (tramp-sh-file-name-handler-alist):
* lisp/net/tramp-smb.el (tramp-smb-file-name-handler-alist): Use them.