/[tramp]/tramp/lisp/tramp.el
ViewVC logotype

Diff of /tramp/lisp/tramp.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2.227 by kai, Tue Sep 24 16:22:16 2002 UTC revision 2.228 by kai, Wed Sep 25 14:06:35 2002 UTC
# Line 630  for Tramp and EFS, so there the default Line 630  for Tramp and EFS, so there the default
630  (defcustom tramp-default-method-alist  (defcustom tramp-default-method-alist
631    (when tramp-unified-filenames    (when tramp-unified-filenames
632      '(("\\`ftp\\." "" "ftp")      '(("\\`ftp\\." "" "ftp")
633        ("" "\\`\\(anonymous\\|ftp\\)\\'" "ftp")))        ("" "\\`\\(anonymous\\|ftp\\)\\'" "ftp")
634          ("\\`localhost\\'" "\\`root\\'" "su")))
635    "*Default method to use for specific user/host pairs.    "*Default method to use for specific user/host pairs.
636  This is an alist of items (HOST USER METHOD).  The first matching item  This is an alist of items (HOST USER METHOD).  The first matching item
637  specifies the method to use for a file name which does not specify a  specifies the method to use for a file name which does not specify a
# Line 4331  Returns nil if none was found, else the Line 4332  Returns nil if none was found, else the
4332    
4333  (defun tramp-action-password (p multi-method method user host)  (defun tramp-action-password (p multi-method method user host)
4334    "Query the user for a password."    "Query the user for a password."
4335    (when (tramp-method-out-of-band-p multi-method method user host)    (let ((pw-prompt (match-string 0)))
4336      (kill-process (get-buffer-process (current-buffer)))      (when (tramp-method-out-of-band-p multi-method method user host)
4337      (error (concat "Out of band method `%s' not applicable "        (kill-process (get-buffer-process (current-buffer)))
4338                     "for remote shell asking for a password")        (error (concat "Out of band method `%s' not applicable "
4339             method))                       "for remote shell asking for a password")
4340    (tramp-message 9 "Sending password")               method))
4341    (tramp-enter-password p (match-string 0)))      (tramp-message 9 "Sending password")
4342        (tramp-enter-password p pw-prompt)))
4343    
4344  (defun tramp-action-succeed (p multi-method method user host)  (defun tramp-action-succeed (p multi-method method user host)
4345    "Signal success in finding shell prompt."    "Signal success in finding shell prompt."

Legend:
Removed from v.2.227  
changed lines
  Added in v.2.228

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26