# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 887938847 0
# Node ID f77dcb2556c5f39b9b052640d788d6025483ef55
# Parent  5c60cd16452b9afbfb2f2fb4cea8661eb5e27b94
(adjust_before_replace): Comment added.
(adjust_after_replace): Comment added.  Give correct args to
adjust_point.  Don't call signal_after_change here.

diff -r 5c60cd16452b -r f77dcb2556c5 src/insdel.c
--- a/src/insdel.c	Fri Feb 20 01:40:47 1998 +0000
+++ b/src/insdel.c	Fri Feb 20 01:40:47 1998 +0000
@@ -1076,6 +1076,12 @@
 			       current_buffer, inherit);
 }
 
+/* This function should be called after moving gap to FROM and before
+   altering LEN chars of text starting from FROM.  This adjusts
+   various position keepers and markers and as if the text is deleted.
+   Don't forget to call adjust_after_replace after you actually alter
+   the text.  */
+
 void
 adjust_before_replace (from, from_byte, to, to_byte)
      int from, from_byte, to, to_byte;
@@ -1084,13 +1090,16 @@
   record_delete (from, to - from);
 }
 
+/* This function should be called after altering the text between FROM
+   and TO to a new text of LEN chars (LEN_BYTE bytes).  */
+
 void
 adjust_after_replace (from, from_byte, to, to_byte, len, len_byte)
      int from, from_byte, to, to_byte, len, len_byte;
 {
   record_insert (from, len);
   if (from < PT)
-    adjust_point (len, len_byte);
+    adjust_point (len - (to - from), len_byte - (to_byte - from_byte));
 #ifdef USE_TEXT_PROPERTIES
   offset_intervals (current_buffer, PT, len - (to - from));
 #endif
@@ -1101,7 +1110,6 @@
   if (len == 0)
     evaporate_overlays (from);
   MODIFF++;
-  signal_after_change (from, to - from, len);
 }
 
 /* Replace the text from character positions FROM to TO with NEW,