Mercurial > emacs
changeset 23434:1dd05eb0443d
(Fexecute_kbd_macro): Set real_this_command.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 12 Oct 1998 20:03:15 +0000 |
| parents | a53274056f20 |
| children | dd68893482a9 |
| files | src/macros.c |
| diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
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); }