mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-24 08:51:10 -08:00
Code Issues Projects Releases Wiki Activity

Improve which-key--format-and-replace

Browse source 
Do a better job with nil descriptions
This commit is contained in:
Justin Burkett 2018-01-31 09:06:19 -05:00
parent e5db4b6256
commit fce520f8af
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
which-key.el
View file

@ -1632,9 +1632,11 @@ alists. Returns a list (key separator description)."
(hl-face (which-key--highlight-face orig-desc))
(key-binding (which-key--maybe-replace (cons keys orig-desc)))
(final-desc (which-key--propertize-description
(cdr key-binding) group local hl-face orig-desc))
(final-desc (which-key--maybe-add-docstring final-desc orig-desc))
(final-desc (which-key--truncate-description final-desc)))
(cdr key-binding) group local hl-face orig-desc)))
(when final-desc
(setq final-desc
(which-key--truncate-description
(which-key--maybe-add-docstring final-desc orig-desc))))
(when (consp key-binding)
(push
(list (which-key--propertize-key