From 4d5ad8a16e1fe925dd3fa0993aabb2612a82622b Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Thu, 18 Mar 2021 11:17:34 +0100 Subject: [PATCH] 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 bb28db7614a..65072b01376 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 de1bc548e18..8a9a41f452f 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'.") -- 2.39.5