Mercurial > emacs
comparison lisp/comint.el @ 108969:cdae067c62d3
Fix for comint-password-prompt-regexp (Bug#6367).
* lisp/comint.el (comint-password-prompt-regexp): Fix 2010-04-10 change
(Bug#6367).
* comint-testsuite.el: New file.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Fri, 11 Jun 2010 10:39:54 -0400 |
| parents | bd3afd9376c5 |
| children | 60516122d066 |
comparison
equal
deleted
inserted
replaced
| 108968:a4e18a1ee55d | 108969:cdae067c62d3 |
|---|---|
| 338 ;; Ubuntu's sudo prompts like `[sudo] password for user:' | 338 ;; Ubuntu's sudo prompts like `[sudo] password for user:' |
| 339 ;; Some implementations of passwd use "Password (again)" as the 2nd prompt. | 339 ;; Some implementations of passwd use "Password (again)" as the 2nd prompt. |
| 340 ;; Something called "perforce" uses "Enter password:". | 340 ;; Something called "perforce" uses "Enter password:". |
| 341 (defcustom comint-password-prompt-regexp | 341 (defcustom comint-password-prompt-regexp |
| 342 (concat | 342 (concat |
| 343 "^\\(" | 343 "\\(" |
| 344 (regexp-opt | 344 (regexp-opt |
| 345 '("Enter" "Enter same" "Old" "old" "New" "new" "'s" "login" | 345 '("Enter" "Enter same" "Old" "old" "New" "new" "'s" "login" |
| 346 "Kerberos" "CVS" "UNIX" " SMB" "LDAP" "[sudo]" "Repeat" "Bad")) | 346 "Kerberos" "CVS" "UNIX" " SMB" "LDAP" "[sudo]" "Repeat" "Bad")) |
| 347 " +\\)?" | 347 " +\\)?" |
| 348 (regexp-opt | 348 (regexp-opt |