diff options
| author | Joakim Verona | 2012-08-19 02:44:11 +0200 |
|---|---|---|
| committer | Joakim Verona | 2012-08-19 02:44:11 +0200 |
| commit | 5436d1df5e2ba0b4d4f72b03a1cd09b20403654b (patch) | |
| tree | 532faa27319b3bb199d414dc85e63a58246d30b0 /src/macros.c | |
| parent | d02344322b0d2fea8dd9ad9dd0a6c70e058f967b (diff) | |
| parent | e757f1c6f393cf82057dbee0a4325b07f0fd55c4 (diff) | |
| download | emacs-5436d1df5e2ba0b4d4f72b03a1cd09b20403654b.tar.gz emacs-5436d1df5e2ba0b4d4f72b03a1cd09b20403654b.zip | |
upstream
Diffstat (limited to 'src/macros.c')
| -rw-r--r-- | src/macros.c | 15 |
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. */) | |||
| 137 | void | 137 | void |
| 138 | end_kbd_macro (void) | 138 | end_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 | ||
| 148 | DEFUN ("end-kbd-macro", Fend_kbd_macro, Send_kbd_macro, 0, 2, "p", | 149 | DEFUN ("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 | { |