diff options
Diffstat (limited to 'lisp/macros.el')
| -rw-r--r-- | lisp/macros.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/macros.el b/lisp/macros.el index 4188a432fe5..fa45d8c6108 100644 --- a/lisp/macros.el +++ b/lisp/macros.el @@ -138,7 +138,8 @@ use this command, and then save the file." (prin1 definition (current-buffer)))) (insert ")\n") (if keys - (let ((keys (where-is-internal macroname '(keymap)))) + (let ((keys (where-is-internal (symbol-function macroname) + '(keymap)))) (while keys (insert "(global-set-key ") (prin1 (car keys) (current-buffer)) |