# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 943618024 0
# Node ID 381c4e70f9fbe5bc94d37f6cbebbc1b2da8dc242
# Parent  30dbdfd880289e8d0ab10669cbb2720fbfa7a056
(insert_1_both): Call set_text_properties with last
parameter nil so that no after changes will be signaled.

diff -r 30dbdfd88028 -r 381c4e70f9fb src/insdel.c
--- a/src/insdel.c	Fri Nov 26 12:06:29 1999 +0000
+++ b/src/insdel.c	Fri Nov 26 12:07:04 1999 +0000
@@ -568,8 +568,9 @@
 	    }
 	  else
 	    {
-	      m->charpos += diff_chars;
-	      m->bytepos += diff_bytes;
+	      m->charpos = min (from + new_chars, m->charpos + diff_chars);
+	      m->bytepos = min (from_byte + new_bytes,
+				m->bytepos + diff_bytes);
 	    }
 	}
       else if (m->bytepos >= from_byte)
@@ -1188,8 +1189,8 @@
     offset_intervals (current_buffer, PT, nchars);
 
   if (!inherit && BUF_INTERVALS (current_buffer) != 0)
-    Fset_text_properties (make_number (PT), make_number (PT + nchars),
-			  Qnil, Qnil);
+    set_text_properties (make_number (PT), make_number (PT + nchars),
+			 Qnil, Qnil, Qnil);
 
   {
     int pos = PT, pos_byte = PT_BYTE;