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

* mu4e: add tooltips for header fields in message, headers view

Browse Source
This commit is contained in:
djcb
2012-07-10 11:51:54 +03:00
parent 706a686134
commit 129b5ad264
4 changed files with 137 additions and 116 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
emacs/mu4e-utils.el
View File

@ -455,7 +455,7 @@ there is no message at point."
(error "No message at point")
msg)))
(defun mu4e-field-at-point (field)
(defun mu4e-field-at-point (field)
"Get FIELD (a symbol, see `mu4e-header-info') for the message at
point in eiter the headers buffer or the view buffer."
(plist-get (mu4e-message-at-point t) field))
@ -635,8 +635,9 @@ FUNC (if non-nil) afterwards."
(mu4e-message "Started mu4e with %d message%s in store"
doccount (if (= doccount 1) "" "s")))))
;; send the ping
(mu4e~proc-ping)
;; get the address list
(mu4e~proc-ping)
;; get the address list if it's not already set.
(when (and mu4e-compose-complete-addresses
(not mu4e~contacts-for-completion))
(setq mu4e-contacts-func 'mu4e~fill-contacts)
(mu4e~proc-contacts
@ -651,7 +652,8 @@ FUNC (if non-nil) afterwards."
(when mu4e-update-timer
(cancel-timer mu4e-update-timer)
(setq
mu4e-update-timer nil
mu4e-update-timer nil
mu4e~maildir-list nil
mu4e~contacts-for-completion nil))
(mu4e~proc-kill)
;; kill all main/view/headers buffer
@ -661,7 +663,6 @@ FUNC (if non-nil) afterwards."
(when (member major-mode '(mu4e-headers-mode mu4e-view-mode mu4e-main-mode))
(kill-buffer))))
(buffer-list)))
(defvar mu4e-update-timer nil
"*internal* The mu4e update timer.")