1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

(comint-watch-for-password-prompt): Remove whitespace

at the beginning of password prompts.
This commit is contained in:
Francesco Potortì 2002-04-18 19:41:57 +00:00
parent 587cd79875
commit ccb6090a07

View file

@ -1984,6 +1984,8 @@ process if STRING contains a password prompt defined by
This function could be in the list `comint-output-filter-functions'."
(when (string-match comint-password-prompt-regexp string)
(when (string-match "^[ \n\r\t\v\f\b\a]+" string)
(setq string (replace-match "" t t string)))
(let ((pw (comint-read-noecho string t)))
(send-invisible pw))))