From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 29 Apr 2007 21:57:33 +0000 (+0000)
Subject: (replace_range): For undo, record insertion first.
X-Git-Tag: emacs-pretest-23.0.90~12748
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=bec1aca2ee97c2b4c61dc6e1b00b1653f4f5a8c7;p=emacs.git

(replace_range): For undo, record insertion first.
---

diff --git a/src/insdel.c b/src/insdel.c
index 7f15f7de52d..65d60b6b8e3 100644
--- a/src/insdel.c
+++ b/src/insdel.c
@@ -1603,8 +1603,12 @@ replace_range (from, to, new, prepare, inherit, markers)
 
   if (! EQ (current_buffer->undo_list, Qt))
     {
+      /* Record the insertion first, so that when we undo,
+	 the deletion will be undone first.  Thus, undo
+	 will insert before deleting, and thus will keep
+	 the markers before and after this text separate.  */
+      record_insert (from + SCHARS (deletion), inschars);
       record_delete (from, deletion);
-      record_insert (from, inschars);
     }
 
   GAP_SIZE -= outgoing_insbytes;