From 5e1515a85dc9e81c6ecbb90539c035da2f4f6efa Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 23 Oct 1995 16:57:42 +0000 Subject: [PATCH] (internal-ange-ftp-mode): Set comint-password-prompt-regexp locally to not match anything. --- lisp/ange-ftp.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el index 0983fc2180d..5e427b7126e 100644 --- a/lisp/ange-ftp.el +++ b/lisp/ange-ftp.el @@ -1826,6 +1826,10 @@ on the gateway machine to do the ftp instead." (setq ange-ftp-process-result-line "") (setq comint-prompt-regexp "^ftp> ") + (make-local-variable 'comint-password-prompt-regexp) + ;; This is a regexp that can't match anything. + ;; ange-ftp has its own ways of handling passwords. + (setq comint-password-prompt-regexp "^a\\'z") (make-local-variable 'paragraph-start) (setq paragraph-start comint-prompt-regexp))) -- 2.39.2