Mercurial > emacs
diff lisp/net/tramp-sh.el @ 112032:209df3f0dcc6
* net/tramp.el (tramp-default-method-alist)
(tramp-default-user-alist)
(tramp-local-host-regexp, tramp-prefix-domain-format)
(tramp-prefix-domain-regexp): Set tramp-autoload cookie.
* net/tramp-ftp.el:
* net/tramp-gvfs.el:
* net/tramp-gw.el:
* net/tramp-imap.el:
* net/tramp-sh.el:
* net/tramp-smb.el: Add tramp-autoload cookie for initialisation
code of `tramp-default-method-alist' and `tramp-default-user-alist'.
author | Michael Albinus <michael.albinus@gmx.de> |
---|---|
date | Thu, 30 Dec 2010 10:04:15 +0100 |
parents | 9780afa403a4 |
children | c92bc8723d4b |
line wrap: on
line diff
--- a/lisp/net/tramp-sh.el Wed Dec 29 19:16:44 2010 +0800 +++ b/lisp/net/tramp-sh.el Thu Dec 30 10:04:15 2010 +0100 @@ -380,13 +380,16 @@ (tramp-copy-args (("%k" "-p"))) (tramp-copy-keep-date t))) +;;;###tramp-autoload (add-to-list 'tramp-default-method-alist `(,tramp-local-host-regexp "\\`root\\'" "su")) +;;;###tramp-autoload (add-to-list 'tramp-default-user-alist `(,(concat "\\`" (regexp-opt '("su" "sudo" "ksu")) "\\'") nil "root")) ;; Do not add "ssh" based methods, otherwise ~/.ssh/config would be ignored. +;;;###tramp-autoload (add-to-list 'tramp-default-user-alist `(,(concat "\\`"