aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/comint.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/comint.el b/lisp/comint.el
index c47baba3651..aa5dfdfc846 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -1984,6 +1984,8 @@ process if STRING contains a password prompt defined by
1984 1984
1985This function could be in the list `comint-output-filter-functions'." 1985This function could be in the list `comint-output-filter-functions'."
1986 (when (string-match comint-password-prompt-regexp string) 1986 (when (string-match comint-password-prompt-regexp string)
1987 (when (string-match "^[ \n\r\t\v\f\b\a]+" string)
1988 (setq string (replace-match "" t t string)))
1987 (let ((pw (comint-read-noecho string t))) 1989 (let ((pw (comint-read-noecho string t)))
1988 (send-invisible pw)))) 1990 (send-invisible pw))))
1989 1991