Fix asking maildir reading completing candidate is text-property

Some packages like `vertico-prescient` adding text-property to vertico
candidates will break `mu4e-ask-maildir` response.
This commit is contained in:
stardiviner 2023-05-26 09:59:12 +08:00
parent cd3c7b4c61
commit 9729e2bba8
1 changed files with 7 additions and 6 deletions

View File

@ -307,12 +307,13 @@ from all maildirs under `mu4e-maildir'."
(mu4e-read-option prompt
(append options
'(("oOther..." . other)))))))
(if (eq response 'other)
(progn
(funcall mu4e-completing-read-function prompt
(mu4e-get-maildirs) nil nil
mu4e-maildir-initial-input))
response)))
(substring-no-properties
(if (eq response 'other)
(progn
(funcall mu4e-completing-read-function prompt
(mu4e-get-maildirs) nil nil
mu4e-maildir-initial-input))
response))))
(defun mu4e-ask-maildir-check-exists (prompt)
"Like `mu4e-ask-maildir', PROMPT for existence of the maildir.