procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make sure Comint minibuffer password prompts end with space

Browse source 
* lisp/comint.el (comint-watch-for-password-prompt): Add a trailing
space character to the minibuffer password prompt, if it does not
contain one already, per the minibuffer UI conventions.

Bug#76604
This commit is contained in:
Rudolf Adamkovič 2025-02-28 14:54:14 +01:00 • committed by Eli Zaretskii
parent 7e89ef2ced
commit 41c1c6ffac
1 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/comint.el
View file

@ -2601,8 +2601,14 @@ This function could be in the list `comint-output-filter-functions'."
prompt)
(when (let ((case-fold-search t))
(string-match comint-password-prompt-regexp string))
(setq prompt (string-trim (match-string 0 string)
"[ \n\r\t\v\f\b\a]+" "\n+"))
(setq prompt
(let ((content (string-trim (match-string 0 string)
"[ \n\r\t\v\f\b\a]+" "\n+"))
(suffix " "))
(concat content
(and (not (string-empty-p content))
(not (string-suffix-p suffix content))
suffix))))
;; Use `run-at-time' in order not to pause execution of the
;; process filter with a minibuffer
(run-at-time