Mercurial > emacs

comparison lisp/net/tramp.el @ 70276:32b384911b4f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
tramp-file-name-handler-alist): Delete expand-file-name and other operations that can cause spurious loading.
author Richard M. Stallman <rms@gnu.org>
date Sat, 29 Apr 2006 15:58:31 +0000
parents d57fb8c98714
children 77201b466c80
comparison
equal deleted inserted replaced
70275:3d36e736dc2a 70276:32b384911b4f
1820 "Perl program to use for decoding a file. 1820 "Perl program to use for decoding a file.
1821 Escape sequence %s is replaced with name of Perl binary. 1821 Escape sequence %s is replaced with name of Perl binary.
1822 This string is passed to `format', so percent characters need to be doubled.") 1822 This string is passed to `format', so percent characters need to be doubled.")
1823 1823
1824 ; These values conform to `file-attributes' from XEmacs 21.2. 1824 ; These values conform to `file-attributes' from XEmacs 21.2.
1825 ; GNU Emacs and other tools not checked. 1825 ; Emacs and other tools not checked.
1826 (defconst tramp-file-mode-type-map '((0 . "-") ; Normal file (SVID-v2 and XPG2) 1826 (defconst tramp-file-mode-type-map '((0 . "-") ; Normal file (SVID-v2 and XPG2)
1827 (1 . "p") ; fifo 1827 (1 . "p") ; fifo
1828 (2 . "c") ; character device 1828 (2 . "c") ; character device
1829 (3 . "m") ; multiplexed character device (v7) 1829 (3 . "m") ; multiplexed character device (v7)
1830 (4 . "d") ; directory 1830 (4 . "d") ; directory
1925 (set-visited-file-modtime . tramp-handle-set-visited-file-modtime) 1925 (set-visited-file-modtime . tramp-handle-set-visited-file-modtime)
1926 (verify-visited-file-modtime . tramp-handle-verify-visited-file-modtime)) 1926 (verify-visited-file-modtime . tramp-handle-verify-visited-file-modtime))
1927 "Alist of handler functions. 1927 "Alist of handler functions.
1928 Operations not mentioned here will be handled by the normal Emacs functions.") 1928 Operations not mentioned here will be handled by the normal Emacs functions.")
1929 1929
1930 ;; Handlers for partial tramp file names. For GNU Emacs just 1930
1931 ;; `file-name-all-completions' is needed. The other ones are necessary 1931 ;; Handlers for partial tramp file names. For Emacs just
1932 ;; for XEmacs. 1932 ;; `file-name-all-completions' is needed.
1933 (defconst tramp-completion-file-name-handler-alist 1933 (defconst tramp-completion-file-name-handler-alist
1934 '( 1934 '(
1935 (file-name-directory . tramp-completion-handle-file-name-directory)
1936 (file-name-nondirectory . tramp-completion-handle-file-name-nondirectory)
1937 (file-exists-p . tramp-completion-handle-file-exists-p)
1938 (file-name-all-completions . tramp-completion-handle-file-name-all-completions) 1935 (file-name-all-completions . tramp-completion-handle-file-name-all-completions)
1939 (file-name-completion . tramp-completion-handle-file-name-completion) 1936 (file-name-completion . tramp-completion-handle-file-name-completion))
1940 (expand-file-name . tramp-completion-handle-expand-file-name))
1941 "Alist of completion handler functions. 1937 "Alist of completion handler functions.
1942 Used for file names matching `tramp-file-name-regexp'. Operations not 1938 Used for file names matching `tramp-file-name-regexp'. Operations not
1943 mentioned here will be handled by `tramp-file-name-handler-alist' or the 1939 mentioned here will be handled by `tramp-file-name-handler-alist' or the
1944 normal Emacs functions.") 1940 normal Emacs functions.")
1945 1941