mu4e-search-query: include unread counts if available

In the completion annotation.
This commit is contained in:
Dirk-Jan C. Binnema 2023-08-10 21:13:47 +03:00
parent dd5d5e6bbf
commit 677a6d3882
1 changed files with 9 additions and 3 deletions

View File

@ -572,10 +572,16 @@ query before submitting it."
(concat
" "
(make-string (- longest-name (length name)) ?\s)
query))))
query
(make-string (- longest-query (length query)) ?\s)
" "
(mu4e--query-item-display-counts item)))))
(completion-extra-properties
`(:annotation-function ,annotation-func)))
(mu4e-search-bookmark (completing-read "Query: " candidates) edit)))
`(:annotation-function ,annotation-func))
(chosen (completing-read "Query: " candidates))
(query (or (plist-get (cdr-safe (assoc chosen candidates)) :query)
(mu4e-warn "No query for %s" chosen))))
(mu4e-search-bookmark query edit)))
(define-minor-mode mu4e-search-minor-mode
"Mode for searching for messages."