emacs-30 e618d5ae941: Fix password prompt in comint (don't merge)

[Michael Albinus]

branch: emacs-30
commit e618d5ae941d005e9da6d5d5cba68cc0ecade0e5
Author: Michael Albinus <michael.albinus@gmx.de>
Commit: Michael Albinus <michael.albinus@gmx.de>

    Fix password prompt in comint (don't merge)
    
    * lisp/comint.el (comint-watch-for-password-prompt): Use whole
    string for setting the prompt.  (Bug#74626)
---
 lisp/comint.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lisp/comint.el b/lisp/comint.el
index 8860b3edb11..d52090911b9 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -2573,8 +2573,7 @@ This function could be in the list 
`comint-output-filter-functions'."
     (when (let ((case-fold-search t))
             (string-match comint-password-prompt-regexp
                           (string-replace "\r" "" string)))
-      (setq prompt (string-trim (match-string 0 string)
-                                "[ \n\r\t\v\f\b\a]+" "\n+"))
+      (setq prompt (string-trim string "[ \n\r\t\v\f\b\a]+" "\n+"))
       ;; Use `run-at-time' in order not to pause execution of the
       ;; process filter with a minibuffer
       (run-at-time