mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-27 07:37:33 +00:00
Code Issues Releases Activity

get-binding-description: return keymap symbol

Browse Source 
instead of "#<keymap>".
This commit is contained in:
Noam Postavsky 2015-03-19 11:25:18 -04:00
parent 1b6605652c
commit f5f4102ca1
1 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lisp/use-package/bind-key.el
View File

@ -234,12 +234,9 @@ function symbol (unquoted)."
"#<keymap>")
(t
elem)))
((keymapp elem)
(if (and bind-key-describe-special-forms
(symbolp elem)
(get elem 'variable-documentation))
(format "%s" (get elem 'variable-documentation))
"#<keymap>"))
;; must be a symbol, non-symbol keymap case covered above
((and bind-key-describe-special-forms (keymapp elem))
(get elem 'variable-documentation))
((symbolp elem)
elem)
(t