mu4e-bookmarks: improve modeline item

This commit is contained in:
Dirk-Jan C. Binnema 2023-01-17 21:14:30 +02:00
parent 54210b9c4e
commit 413bdc0980
1 changed files with 14 additions and 4 deletions

View File

@ -181,12 +181,22 @@ one, creates a propertized string for display in the modeline."
((> count 0) mu4e-modeline-all-read)
(t mu4e-modeline-all-clear)))
(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
'keymap '(mode-line keymap
(mouse-1 . mu4e-jump-to-favorite)
(mouse-2 . mu4e-jump-to-favorite)
(mouse-3 . mu4e-jump-to-favorite))))))
(mouse-1 . mu4e-jump-to-favorite)
(mouse-2 . mu4e-jump-to-favorite)
(mouse-3 . mu4e-jump-to-favorite))))))
(provide 'mu4e-bookmarks)
;;; mu4e-bookmarks.el ends here