mu4e-helpers: fix whitespace
Follow .dir-locals.
This commit is contained in:
@ -164,11 +164,13 @@ Does a local-exit and does not return."
|
|||||||
nil
|
nil
|
||||||
(mu4e-error "Missing property %s in %s" prop lst))))
|
(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.
|
"Read and return one of CHOICES, prompting for PROMPT.
|
||||||
Any input that is not one of CHOICES is ignored. This is mu4e's
|
Any input that is not one of CHOICES is ignored. This is mu4e's
|
||||||
version of `read-char-choice' which becomes case-insentive after
|
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))
|
(let ((choice) (chosen) (inhibit-quit nil))
|
||||||
(while (not chosen)
|
(while (not chosen)
|
||||||
(message nil);; this seems needed...
|
(message nil);; this seems needed...
|
||||||
|
|||||||
Reference in New Issue
Block a user