mirror of https://github.com/djcb/mu.git
parent
2dca07612c
commit
b8861cdbfe
|
@ -164,11 +164,13 @@ Does a local-exit and does not return."
|
|||
nil
|
||||
(mu4e-error "Missing property %s in %s" prop lst))))
|
||||
|
||||
(defun mu4e--read-char-choice (prompt choices)
|
||||
(defun mu4e--read-char-choice (prompt choices &optional key)
|
||||
"Read and return one of CHOICES, prompting for PROMPT.
|
||||
Any input that is not one of CHOICES is ignored. This is mu4e's
|
||||
version of `read-char-choice' which becomes case-insentive after
|
||||
trying an exact match."
|
||||
trying an exact match.
|
||||
|
||||
If optional KEY is provided, use that instead of asking user."
|
||||
(let ((choice) (chosen) (inhibit-quit nil))
|
||||
(while (not chosen)
|
||||
(message nil);; this seems needed...
|
||||
|
|
Loading…
Reference in New Issue