[Emacs-diffs] Changes to emacs/src/macros.c

[Kim F. Storm]

Index: emacs/src/macros.c
diff -c emacs/src/macros.c:1.49 emacs/src/macros.c:1.50
*** emacs/src/macros.c:1.49     Sun Sep  8 16:28:46 2002
--- emacs/src/macros.c  Mon Sep  9 18:33:51 2002
***************
*** 131,136 ****
--- 131,149 ----
    return Qnil;
  }
  
+ /* Finish defining the current keyboard macro.  */
+ 
+ void
+ end_kbd_macro ()
+ {
+   current_kboard->defining_kbd_macro = Qnil;
+   update_mode_lines++;
+   current_kboard->Vlast_kbd_macro
+     = make_event_array ((current_kboard->kbd_macro_end
+                        - current_kboard->kbd_macro_buffer),
+                       current_kboard->kbd_macro_buffer);
+ }
+ 
  DEFUN ("end-kbd-macro", Fend_kbd_macro, Send_kbd_macro, 0, 2, "p",
         doc: /* Finish defining a keyboard macro.
  The definition was started by \\[start-kbd-macro].
***************
*** 157,168 ****
  
    if (!NILP (current_kboard->defining_kbd_macro))
      {
!       current_kboard->defining_kbd_macro = Qnil;
!       update_mode_lines++;
!       current_kboard->Vlast_kbd_macro
!       = make_event_array ((current_kboard->kbd_macro_end
!                            - current_kboard->kbd_macro_buffer),
!                           current_kboard->kbd_macro_buffer);
        message ("Keyboard macro defined");
      }
  
--- 170,176 ----
  
    if (!NILP (current_kboard->defining_kbd_macro))
      {
!       end_kbd_macro ();
        message ("Keyboard macro defined");
      }