changeset 44663:0dc61586b801

(comint-watch-for-password-prompt): Remove whitespace at the beginning of password prompts.
author Francesco Potortì <pot@gnu.org>
date Thu, 18 Apr 2002 19:41:57 +0000
parents 0eece64f0aac
children 92b336df72b8
files lisp/comint.el
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/comint.el	Thu Apr 18 19:41:16 2002 +0000
+++ b/lisp/comint.el	Thu Apr 18 19:41:57 2002 +0000
@@ -1984,6 +1984,8 @@
 
 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))))