mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-02 11:50:48 -08:00
Code Issues Projects Releases Wiki Activity

Add docstring for propertize-description

Browse source
This commit is contained in:
justbur 2015-07-12 21:58:26 -04:00
parent 6ca5819593
commit ce4561c617
1 changed files with 4 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
which-key.el
View file

@ -610,6 +610,10 @@ corresponding `which-key-special-key-face'."
key-w-face))))
(defun which-key/propertize-description (description)
"Add face to DESCRIPTION where the face chosen depends on
whether the description represents a group or a command. Also
make some minor adjustments to the description string, like
removing a \"group:\" prefix."
(let* ((desc description)
(group-prfx (string-match-p "^group:" desc))
(group (or group-prfx