summaryrefslogtreecommitdiff
path: root/lisp/macros.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/macros.el')
-rw-r--r--lisp/macros.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/macros.el b/lisp/macros.el
index 4cb4e98d3fd..35d34d2e337 100644
--- a/lisp/macros.el
+++ b/lisp/macros.el
@@ -134,8 +134,9 @@ use this command, and then save the file."
(_ (prin1 definition (current-buffer))))))
(insert ")\n")
(if keys
- (let ((keys (or (where-is-internal (symbol-function macroname)
- '(keymap))
+ (let ((keys (or (and (symbol-function macroname)
+ (where-is-internal (symbol-function macroname)
+ '(keymap)))
(where-is-internal macroname '(keymap)))))
(while keys
(insert "(global-set-key ")