# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 760344341 0
# Node ID 54baa5a15850c64ca418e7cfc588e884ccef82d5
# Parent  daac6191540822520c96a1a649d7a20c8a334386
(insert-kbd-macro): Pass (keymap) as KEYMAP arg to where-is-internal.

diff -r daac61915408 -r 54baa5a15850 lisp/macros.el
--- a/lisp/macros.el	Fri Feb 04 06:45:26 1994 +0000
+++ b/lisp/macros.el	Fri Feb 04 06:45:41 1994 +0000
@@ -95,7 +95,7 @@
 		 (insert "\\M-C-?"))))))
     (insert ")\n")
     (if keys
-	(let ((keys (where-is-internal macroname nil)))
+	(let ((keys (where-is-internal macroname '(keymap))))
 	  (while keys
 	    (insert "(global-set-key ")
 	    (prin1 (car keys) (current-buffer))