* fix mu4e-read-option and its callers; update the manual for this.

This commit is contained in:
djcb
2012-06-11 16:40:23 +03:00
parent d5d567d103
commit dcf2b6006c
6 changed files with 73 additions and 82 deletions

View File

@ -240,8 +240,8 @@ action', return nil means 'don't do anything'"
(setq what
(let ((what (mu4e-read-option
"There are existing marks; should we: "
'( ("apply marks" nil apply)
("ignore marks?" nil ignore)))))
'( ("apply marks" . apply)
("ignore marks?" . ignore)))))
;; we determined what to do... now do it
(when (eq what 'apply)
(mu4e-mark-execute-all t))))))))