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

Fix #22

Browse source 
Check for keymap instead of not a symbol.
This commit is contained in:
justbur 2015-07-09 07:44:36 -04:00
parent cddf125c36
commit 7f96e4d86b
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
which-key.el
View file

@ -196,8 +196,10 @@ bottom."
"Fill which-key--buffer with key descriptions and reformat.
Finally, show the buffer."
(let ((prefix-keys (this-single-command-keys)))
;; (when (> (length prefix-keys) 0) (message "key: %s" (key-description prefix-keys)))
;; (when (> (length prefix-keys) 0) (message "key binding: %s" (key-binding prefix-keys)))
(when (and (> (length prefix-keys) 0)
(not (symbolp (key-binding prefix-keys))))
(keymapp (key-binding prefix-keys)))
(let* ((buf (current-buffer))
;; get formatted key bindings
(fmt-width-cons (which-key/get-formatted-key-bindings buf prefix-keys))