mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-27 07:37:33 +00:00
Code Issues Releases Activity

(internal-ange-ftp-mode):

Browse Source 
Set comint-password-prompt-regexp locally to not match anything.
This commit is contained in:
Richard M. Stallman 1995-10-23 16:57:42 +00:00
parent da19ac119e
commit 5e1515a85d
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ange-ftp.el
View File

@ -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)))