commit 1e5ce8b2cc91dad27fa460c4b473ed44fb36771a
parent 7319a7a638fc2f8bcea5d1ffecab13a4c18818cf
Author: Wilfred Hughes <me@wilfred.me.uk>
Date: Mon, 2 Oct 2017 14:03:26 -0500
Merge pull request #43 from narendraj9/master
Guard helpful-update against keys bound to undefined commands
Diffstat:
1 file changed, 4 insertions(+), 0 deletions(-)
diff --git a/helpful.el b/helpful.el
@@ -747,6 +747,10 @@ 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 %s which is not a command"
+ (key-description key-sequence)
+ sym))
(pop-to-buffer (helpful--buffer sym t))
(helpful-update)))