]> git.eshelyaron.com Git - emacs.git/commitdiff
get-binding-description: return keymap symbol
authorNoam Postavsky <npostavs@gmail.com>
Thu, 19 Mar 2015 15:25:18 +0000 (11:25 -0400)
committerNoam Postavsky <npostavs@gmail.com>
Thu, 19 Mar 2015 15:25:18 +0000 (11:25 -0400)
instead of "#<keymap>".

lisp/use-package/bind-key.el

index fd143888d5def193758a9db927ee0e12dc6cf8e2..bf4e13b2189eebce6b7895983ba6ae1f70088473 100644 (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