Mercurial > emacs

diff src/macros.c @ 23434:1dd05eb0443d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fexecute_kbd_macro): Set real_this_command.
author Richard M. Stallman <rms@gnu.org>
date Mon, 12 Oct 1998 20:03:15 +0000
parents edcf24874ef5
children 9b722e922325
line wrap: on
line diff
--- a/src/macros.c	Mon Oct 12 17:27:23 1998 +0000
+++ b/src/macros.c	Mon Oct 12 20:03:15 1998 +0000
@@ -51,6 +51,8 @@
 
 Lisp_Object executing_macro;
 
+extern Lisp_Object real_this_command;
+
 Lisp_Object Fexecute_kbd_macro ();
 
 DEFUN ("start-kbd-macro", Fstart_kbd_macro, Sstart_kbd_macro, 1, 1, "P",
@@ -286,6 +288,8 @@
 
   executing_macro = Qnil;
 
+  real_this_command = Vexecuting_macro;
+
   UNGCPRO;
   return unbind_to (pdlcount, Qnil);
 }