(comint-password-prompt-regexp): Accept "login password:"

diff --git a/lisp/comint.el b/lisp/comint.el
index deb00d45c14b7f6222c419b72a4b73359ee2870a..16ef53abeebba794262b0c52e59fc0c003ab4d11 100644 (file)
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -277,9 +277,9 @@ This variable is buffer-local."
   :type 'boolean
   :group 'comint)
 
-;; AIX puts the name of the person being su'd to in from of the prompt.
+;; AIX puts the name of the person being su'd to in front of the prompt.
 (defcustom comint-password-prompt-regexp
-  "\\(\\([Oo]ld \\|[Nn]ew \\|'s \\|^\\)[Pp]assword\\|pass phrase\\):\\s *\\'"
+  "\\(\\([Oo]ld \\|[Nn]ew \\|'s \\|login \\|^\\)[Pp]assword\\|pass phrase\\):\\s *\\'"
   "*Regexp matching prompts for passwords in the inferior process.
 This is used by `comint-watch-for-password-prompt'."
   :type 'regexp