commit 3e2f35d807a876a88ed1f43267ad1736c2c41fcc
parent 7319a7a638fc2f8bcea5d1ffecab13a4c18818cf
Author: Narendra Joshi <narendraj9@gmail.com>
Date: Fri, 29 Sep 2017 22:44:15 +0530
Guard helpful-update against keys bound to undefined commands
Diffstat:
1 file changed, 3 insertions(+), 0 deletions(-)
diff --git a/helpful.el b/helpful.el
@@ -747,6 +747,9 @@ For example, \"(some-func FOO &optional BAR)\"."
(unless sym
(user-error "No command is bound to %s"
(key-description key-sequence)))
+ (unless (commandp sym)
+ (user-error "%s is bound to symbol that is not a command"
+ (key-description key-sequence)))
(pop-to-buffer (helpful--buffer sym t))
(helpful-update)))