mirror of https://github.com/djcb/mu.git
mu4e-main: put bookmark/maildir query in help-echo
This commit is contained in:
parent
817675d83c
commit
ae10d3a3f8
|
@ -202,16 +202,18 @@ character of the keyboard shortcut
|
||||||
(mapconcat
|
(mapconcat
|
||||||
(lambda (item)
|
(lambda (item)
|
||||||
(cl-destructuring-bind
|
(cl-destructuring-bind
|
||||||
(&key hide name key favorite &allow-other-keys) item
|
(&key hide name key favorite query &allow-other-keys) item
|
||||||
;; hide items explicitly hidden, without key or wrong category.
|
;; hide items explicitly hidden, without key or wrong category.
|
||||||
(if hide
|
(if hide
|
||||||
""
|
""
|
||||||
(concat
|
(concat
|
||||||
(mu4e--main-action-str
|
(mu4e--main-action-str
|
||||||
(format "\t* [%s] %s " (format "%c%c" shortcut key)
|
(format "\t* [%s] %s "
|
||||||
|
(format "%c%c" shortcut key)
|
||||||
(propertize
|
(propertize
|
||||||
name 'face
|
name
|
||||||
(if favorite 'mu4e-header-key-face nil))))
|
'face (if favorite 'mu4e-header-key-face nil)
|
||||||
|
'help-echo query)))
|
||||||
(format "%s%s\n"
|
(format "%s%s\n"
|
||||||
(make-string (- max-length (string-width name)) ?\s)
|
(make-string (- max-length (string-width name)) ?\s)
|
||||||
(mu4e--query-item-display-counts item)))))) data ""))
|
(mu4e--query-item-display-counts item)))))) data ""))
|
||||||
|
|
Loading…
Reference in New Issue