alx/mu4e
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

* cosmetic

Browse Source
This commit is contained in:
djcb
2012-04-12 09:02:43 +03:00
parent 47467726d4
commit a3a5d1a6ca
1 changed files with 2 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
emacs/mu4e-utils.el
View File

@ -101,10 +101,9 @@ Function returns the CHAR typed."
(ignore-errors (ignore-errors
(read-char (read-char
(concat prompt optionsstr (concat prompt optionsstr
" [or press " (propertize "C-g" 'face 'highlight) " to quit]"))))) " [" (propertize "C-g" 'face 'highlight) " to quit]")))))
;; if the input is not one of the options, try again ;; if the input is not one of the options, try again
(unless (member response optionkars) (unless (member response optionkars) (mu4e-read-option prompt options))
(mu4e-read-option prompt options))
;; otherwise, return the response char ;; otherwise, return the response char
response)) response))