Merge pull request from alezost/keymap-doc-fix

Handle the case when keymap has a broken documentation GitHub-reference: https://github.com/jwiegley/use-package/issues/223
2016-02-25 18:19:58 -05:00
parent 947345028e d81390f6de
commit 4593f178e3
1 changed files with 2 additions and 1 deletions
--- a/lisp/use-package/bind-key.el
+++ b/lisp/use-package/bind-key.el
@@ -271,7 +271,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