* mu4e: don't show messages when we're waiting for user-input

This commit is contained in:
djcb 2012-06-24 11:53:43 +03:00
parent fe755579a7
commit 4164a9bf0a
2 changed files with 6 additions and 5 deletions

2
TODO
View File

@ -33,7 +33,6 @@
- handling of database upgrades
- restore point after rerunning a search
- fix emacs23 auto-completion
- fix message interference
- opening urls is too eager
** Done
@ -71,6 +70,7 @@
- make refresh after changing sort, threads the default
- contact completion (see Jacek's 'mu4e: using' mail)
- *FIX* emacs23 mailto: handling
- *FIX* message interference
# Local Variables:
# mode: org; org-startup-folded: nil

View File

@ -66,9 +66,11 @@ dir already existed, or has been created, nil otherwise."
(concat "[" mu4e-logo "] " (apply 'format frm args)))
(defun mu4e-message (frm &rest args)
"Like `message', but prefixed with mu4e."
(message "%s" (apply 'mu4e-format frm args)))
"Like `message', but prefixed with mu4e. If we're waiting for
user-input, don't show anyhting."
(unless (waiting-for-user-input-p)
(message "%s" (apply 'mu4e-format frm args))))
(defun mu4e~read-char-choice (prompt choices)
"Compatiblity wrapper for `read-char-choice', which is emacs-24
only."
@ -622,7 +624,6 @@ FUNC (if non-nil) afterwards."
doccount (if (= doccount 1) "" "s")))))
;; send the ping
(mu4e~proc-ping)
;; get the address list
(when mu4e-compose-complete-addresses
(setq mu4e-contacts-func 'mu4e~fill-contacts)