master 4d5ad8a: Add comint-password-prompt-regexp test for "zip -e ..."

[Stefan Kangas]

branch: master
commit 4d5ad8a16e1fe925dd3fa0993aabb2612a82622b
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    Add comint-password-prompt-regexp test for "zip -e ..."
    
    * test/lisp/comint-tests.el (comint-testsuite-password-strings):
    Add test for "zip -e ...".  (Bug#47209)
---
 lisp/comint.el            | 4 +++-
 test/lisp/comint-tests.el | 1 +
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/comint.el b/lisp/comint.el
index bb28db7..65072b0 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -366,6 +366,8 @@ This variable is buffer-local."
 ;; OpenBSD doas prints "doas (user@host) password:".
 ;; See ert test `comint-test-password-regexp'.
 (defcustom comint-password-prompt-regexp
+  ;; When extending this, please also add a corresponding test where
+  ;; possible (see `comint-testsuite-password-strings').
   (concat
    "\\(^ *\\|"
    (regexp-opt
@@ -382,7 +384,7 @@ This variable is buffer-local."
    "\\(?: [[:alpha:]]+ .+\\)?[[:blank:]]*[:：៖][[:space:]]*\\'")
   "Regexp matching prompts for passwords in the inferior process.
 This is used by `comint-watch-for-password-prompt'."
-  :version "27.1"
+  :version "28.1"
   :type 'regexp
   :group 'comint)
 
diff --git a/test/lisp/comint-tests.el b/test/lisp/comint-tests.el
index de1bc54..8a9a41f 100644
--- a/test/lisp/comint-tests.el
+++ b/test/lisp/comint-tests.el
@@ -44,6 +44,7 @@
     "Password (again):"
     "Enter password:"
     "Enter Auth Password:" ; OpenVPN (Bug#35724)
+    "Verify password: "    ; zip -e zipfile.zip ... (Bug#47209)
     "Mot de Passe :" ; localized (Bug#29729)
     "Passwort:") ; localized
   "List of strings that should match `comint-password-prompt-regexp'.")