From: Alex Kost <alezost@gmail.com>
Date: Mon, 22 Jun 2015 16:43:55 +0000 (+0300)
Subject: Handle the case when keymap has a broken documentation
X-Git-Tag: emacs-29.0.90~1306^2~15^2~311^2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d81390f6de016d939f2a95a31ce9c5a1e55bebcf;p=emacs.git

Handle the case when keymap has a broken documentation
---

diff --git a/lisp/use-package/bind-key.el b/lisp/use-package/bind-key.el
index 5cace724196..ad0bf5c2df5 100644
--- a/lisp/use-package/bind-key.el
+++ b/lisp/use-package/bind-key.el
@@ -256,7 +256,8 @@ function symbol (unquoted)."
       elem)))
    ;; must be a symbol, non-symbol keymap case covered above
    ((and bind-key-describe-special-forms (keymapp elem))
-    (get elem 'variable-documentation))
+    (let ((doc (get elem 'variable-documentation)))
+      (if (stringp doc) doc elem)))
    ((symbolp elem)
     elem)
    (t