mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-01 08:17:38 +00:00
Code Issues Releases Activity

Improve describe-text-properties display

Browse Source 
* lisp/descr-text.el (describe-property-list): Don't propertize white
space with the 'help-argument-name' face.  This improves display
slightly when that face has an underline.
This commit is contained in:
Stefan Kangas 2022-11-27 07:29:54 +01:00
parent a3d8da2476
commit 4a28f55149
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/descr-text.el
View File

@ -77,8 +77,9 @@ into help buttons that call `describe-text-category' or
(prin1-to-string (nth 0 b) t)))))
(let ((key (nth 0 elt))
(value (nth 1 elt)))
(insert (propertize (format " %-20s " key)
'face 'help-argument-name))
(insert (format " %-20s "
(propertize (symbol-name key)
'face 'help-argument-name)))
(cond ((eq key 'category)
(insert-text-button
(symbol-name value)