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

mu4e: show bookmark name in modeline

Browse Source 
... if there's a bookmark matching the current query. Controllable
through mu4e-modeline-prefer-bookmark-name.

Fixes #1318.
This commit is contained in:
Dirk-Jan C. Binnema
2023-01-17 19:47:55 +02:00
parent 413bdc0980
commit 190ace5574
2 changed files with 22 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
mu4e/mu4e-search.el
View File

@ -499,7 +499,17 @@ the mode-line.")
"Skip duplicate messages")
(,mu4e-search-hide-enabled
,mu4e-search-hide-label
"Enable message hide predicate"))))
"Enable message hide predicate")))
;; can we fin find a bookmark corresponding
;; with this query?
(bookmark
(and mu4e-modeline-prefer-bookmark-name
(seq-find (lambda (item)
(string=
mu4e--search-last-query
(or (plist-get item :effective-query)
(plist-get item :query))))
(mu4e-query-items 'bookmarks)))))
(concat
(propertize
(mapconcat
@ -516,7 +526,9 @@ the mode-line.")
props "\n")))
" ["
(propertize
mu4e--search-last-query
(if bookmark ;; show the bookmark name instead of the query?
(plist-get bookmark :name)
mu4e--search-last-query)
'face 'mu4e-title-face
'help-echo (format "mu4e query:\n\t%s" mu4e--search-last-query))
"]")))