From: Kenichi Handa <handa@m17n.org>
Date: Thu, 16 Oct 2003 00:44:43 +0000 (+0000)
Subject: (insert_from_gap): Adjust intervals correctly.
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1750
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c669988b6b099aaecd7b8bb2d544cae7a5f8c5ae;p=emacs.git

(insert_from_gap): Adjust intervals correctly.
---

diff --git a/src/insdel.c b/src/insdel.c
index 2d9befb677d..405b3835213 100644
--- a/src/insdel.c
+++ b/src/insdel.c
@@ -1182,13 +1182,16 @@ insert_from_gap (nchars, nbytes)
   if (GPT_BYTE < GPT)
     abort ();
 
-  adjust_overlays_for_insert (GPT, nchars);
-  adjust_markers_for_insert (GPT, GPT_BYTE,
-			     GPT + nchars, GPT_BYTE + nbytes,
-			     0);
+  adjust_overlays_for_insert (GPT - nchars, nchars);
+  adjust_markers_for_insert (GPT - nchars, GPT_BYTE - nbytes,
+			     GPT, GPT_BYTE, 0);
 
   if (BUF_INTERVALS (current_buffer) != 0)
-    offset_intervals (current_buffer, GPT, nchars);
+    {
+      offset_intervals (current_buffer, GPT - nchars, nchars);
+      graft_intervals_into_buffer (NULL_INTERVAL, GPT - nchars, nchars,
+				   current_buffer, 0);
+    }
 
   if (GPT - nchars < PT)
     adjust_point (nchars, nbytes);