mirror of https://github.com/djcb/mu.git
mu4e-bookmarks: improve modeline item
This commit is contained in:
parent
54210b9c4e
commit
413bdc0980
|
@ -181,12 +181,22 @@ one, creates a propertized string for display in the modeline."
|
||||||
((> count 0) mu4e-modeline-all-read)
|
((> count 0) mu4e-modeline-all-read)
|
||||||
(t mu4e-modeline-all-clear)))
|
(t mu4e-modeline-all-clear)))
|
||||||
(mu4e--query-item-display-counts fav))
|
(mu4e--query-item-display-counts fav))
|
||||||
'help-echo (format "mu4e query: '%s'" (mu4e--bookmark-query fav))
|
'help-echo
|
||||||
|
(format
|
||||||
|
(concat
|
||||||
|
"mu4e favorite bookmark '%s':\n"
|
||||||
|
"\t%s\n\n"
|
||||||
|
"number of matches: %d\n"
|
||||||
|
"unread messages: %d\n"
|
||||||
|
"changes since baseline: %+d\n")
|
||||||
|
(plist-get fav :name)
|
||||||
|
(mu4e--bookmark-query fav)
|
||||||
|
count unread delta-unread)
|
||||||
'mouse-face 'mode-line-highlight
|
'mouse-face 'mode-line-highlight
|
||||||
'keymap '(mode-line keymap
|
'keymap '(mode-line keymap
|
||||||
(mouse-1 . mu4e-jump-to-favorite)
|
(mouse-1 . mu4e-jump-to-favorite)
|
||||||
(mouse-2 . mu4e-jump-to-favorite)
|
(mouse-2 . mu4e-jump-to-favorite)
|
||||||
(mouse-3 . mu4e-jump-to-favorite))))))
|
(mouse-3 . mu4e-jump-to-favorite))))))
|
||||||
|
|
||||||
(provide 'mu4e-bookmarks)
|
(provide 'mu4e-bookmarks)
|
||||||
;;; mu4e-bookmarks.el ends here
|
;;; mu4e-bookmarks.el ends here
|
||||||
|
|
Loading…
Reference in New Issue