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

Don't use face for prefix if using echo area

Browse source 
With some themes the switch from the text from echo-keystrokes with no
face to the which-key text with a face is annoying.
This commit is contained in:
justbur 2015-11-13 08:55:20 -05:00
parent b0a13d88df
commit fd8681828e
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
which-key.el
View file

@ -1408,8 +1408,10 @@ enough space based on your settings and frame size." prefix-keys)
(width (nth page-n (plist-get which-key--pages-plist :page-widths)))
(n-shown (nth page-n (plist-get which-key--pages-plist :keys/page)))
(n-tot (plist-get which-key--pages-plist :tot-keys))
(prefix-w-face (which-key--propertize-key prefix-keys))
(dash-w-face (propertize "-" 'face 'which-key-key-face))
(prefix-w-face (if (eq which-key-show-prefix 'echo) prefix-keys
(which-key--propertize-key prefix-keys)))
(dash-w-face (if (eq which-key-show-prefix 'echo) "-"
(propertize "-" 'face 'which-key-key-face)))
(status-left (propertize (format "%s/%s" (1+ page-n) n-pages)
'face 'which-key-separator-face))
(status-top (propertize (which-key--maybe-get-prefix-title