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

[Juanma Barranquero]

Index: emacs/src/undo.c
diff -c emacs/src/undo.c:1.58 emacs/src/undo.c:1.59
*** emacs/src/undo.c:1.58       Thu Nov 14 09:18:26 2002
--- emacs/src/undo.c    Tue Feb  4 09:03:13 2003
***************
*** 81,87 ****
    if (MODIFF <= SAVE_MODIFF)
      record_first_change ();
  
!   /* If we are just after an undo boundary, and 
       point wasn't at start of deleted range, record where it was.  */
    if (at_boundary
        && last_point_position != pt
--- 81,87 ----
    if (MODIFF <= SAVE_MODIFF)
      record_first_change ();
  
!   /* If we are just after an undo boundary, and
       point wasn't at start of deleted range, record where it was.  */
    if (at_boundary
        && last_point_position != pt
***************
*** 175,181 ****
    if (NILP (pending_boundary))
      pending_boundary = Fcons (Qnil, Qnil);
  
!   if (!BUFFERP (last_undo_buffer) 
        || current_buffer != XBUFFER (last_undo_buffer))
      Fundo_boundary ();
    XSETBUFFER (last_undo_buffer, current_buffer);
--- 175,181 ----
    if (NILP (pending_boundary))
      pending_boundary = Fcons (Qnil, Qnil);
  
!   if (!BUFFERP (last_undo_buffer)
        || current_buffer != XBUFFER (last_undo_buffer))
      Fundo_boundary ();
    XSETBUFFER (last_undo_buffer, current_buffer);
***************
*** 312,318 ****
       If the first element is an undo boundary, skip past it.
  
       Skip, skip, skip the undo, skip, skip, skip the undo,
!      Skip, skip, skip the undo, skip to the undo bound'ry. 
       (Get it?  "Skip to my Loo?")  */
    if (CONSP (next) && NILP (XCAR (next)))
      {
--- 312,318 ----
       If the first element is an undo boundary, skip past it.
  
       Skip, skip, skip the undo, skip, skip, skip the undo,
!      Skip, skip, skip the undo, skip to the undo bound'ry.
       (Get it?  "Skip to my Loo?")  */
    if (CONSP (next) && NILP (XCAR (next)))
      {
***************
*** 402,408 ****
    Lisp_Object next;
    int count = SPECPDL_INDEX ();
    register int arg;
!   
  #if 0  /* This is a good feature, but would make undo-start
          unable to do what is expected.  */
    Lisp_Object tem;
--- 402,408 ----
    Lisp_Object next;
    int count = SPECPDL_INDEX ();
    register int arg;
! 
  #if 0  /* This is a good feature, but would make undo-start
          unable to do what is expected.  */
    Lisp_Object tem;