# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 926210690 0
# Node ID 00ced60fa6df9cdbce25d559508b2213e6346464
# Parent  1ce8c890309e635d0acec003b7217371bc035c45
(comint-password-prompt-regexp): Fix last change to be more specific.

diff -r 1ce8c890309e -r 00ced60fa6df lisp/comint.el
--- a/lisp/comint.el	Fri May 07 09:42:50 1999 +0000
+++ b/lisp/comint.el	Sun May 09 00:44:50 1999 +0000
@@ -280,7 +280,8 @@
 ;; AIX puts the name of the person being su'd to in front of the prompt.
 ;; kinit prints a prompt like `Password for devnull@GNU.ORG: '.
 (defcustom comint-password-prompt-regexp
-  "\\(\\([Oo]ld \\|[Nn]ew \\|'s \\|login \\|^\\)[Pp]assword\\|pass phrase\\).*:\\s *\\'"
+  "\\(\\([Oo]ld \\|[Nn]ew \\|'s \\|login \\|^\\)[Pp]assword\\|pass phrase\\)\
+\\( for [^@ \t\n]+@[^@ \t\n]+\\)?:\\s *\\'"
   "*Regexp matching prompts for passwords in the inferior process.
 This is used by `comint-watch-for-password-prompt'."
   :type 'regexp