From: Noam Postavsky <npostavs@gmail.com>
Date: Thu, 19 Mar 2015 15:25:18 +0000 (-0400)
Subject: get-binding-description: return keymap symbol
X-Git-Tag: emacs-29.0.90~1306^2~15^2~362^2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f5f4102ca18916786169935ea05a3a486599ab77;p=emacs.git

get-binding-description: return keymap symbol

instead of "#<keymap>".
---

diff --git a/lisp/use-package/bind-key.el b/lisp/use-package/bind-key.el
index fd143888d5d..bf4e13b2189 100644
--- a/lisp/use-package/bind-key.el
+++ b/lisp/use-package/bind-key.el
@@ -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