aboutsummaryrefslogtreecommitdiffstats
path: root/src/macros.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/macros.c')
-rw-r--r--src/macros.c15
1 files changed, 8 insertions, 7 deletions
diff --git a/src/macros.c b/src/macros.c
index d74d12e6158..e81068181b9 100644
--- a/src/macros.c
+++ b/src/macros.c
@@ -127,7 +127,7 @@ macro before appending to it. */)
127 127
128 message ("Appending to kbd macro..."); 128 message ("Appending to kbd macro...");
129 } 129 }
130 KSET (current_kboard, defining_kbd_macro, Qt); 130 kset_defining_kbd_macro (current_kboard, Qt);
131 131
132 return Qnil; 132 return Qnil;
133} 133}
@@ -137,12 +137,13 @@ macro before appending to it. */)
137void 137void
138end_kbd_macro (void) 138end_kbd_macro (void)
139{ 139{
140 KSET (current_kboard, defining_kbd_macro, Qnil); 140 kset_defining_kbd_macro (current_kboard, Qnil);
141 update_mode_lines++; 141 update_mode_lines++;
142 KSET (current_kboard, Vlast_kbd_macro, 142 kset_last_kbd_macro
143 make_event_array ((current_kboard->kbd_macro_end 143 (current_kboard,
144 - current_kboard->kbd_macro_buffer), 144 make_event_array ((current_kboard->kbd_macro_end
145 current_kboard->kbd_macro_buffer)); 145 - current_kboard->kbd_macro_buffer),
146 current_kboard->kbd_macro_buffer));
146} 147}
147 148
148DEFUN ("end-kbd-macro", Fend_kbd_macro, Send_kbd_macro, 0, 2, "p", 149DEFUN ("end-kbd-macro", Fend_kbd_macro, Send_kbd_macro, 0, 2, "p",
@@ -330,7 +331,7 @@ each iteration of the macro. Iteration stops if LOOPFUNC returns nil. */)
330 executing_kbd_macro = final; 331 executing_kbd_macro = final;
331 executing_kbd_macro_index = 0; 332 executing_kbd_macro_index = 0;
332 333
333 KSET (current_kboard, Vprefix_arg, Qnil); 334 kset_prefix_arg (current_kboard, Qnil);
334 335
335 if (!NILP (loopfunc)) 336 if (!NILP (loopfunc))
336 { 337 {