From d81390f6de016d939f2a95a31ce9c5a1e55bebcf Mon Sep 17 00:00:00 2001 From: Alex Kost Date: Mon, 22 Jun 2015 19:43:55 +0300 Subject: [PATCH] Handle the case when keymap has a broken documentation --- lisp/use-package/bind-key.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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 -- 2.39.2