(del_range): Second argument in call to

offset_intervals is 'from', not 'point'.

(modify_region): Call record_first_change if necessary.

(insert_from_string): Pass LENGTH arg to graft_intervals_into_buffer.

diff --git a/src/insdel.c b/src/insdel.c
index 711e272da597174f5a71673bc022e6843b334805..2a84b4d533d521f8c6f4930ff086cafeafb9c380 100644 (file)
--- a/src/insdel.c
+++ b/src/insdel.c
@@ -456,7 +456,7 @@ del_range (from, to)
     }
 
   /* Only defined if Emacs is compiled with USE_TEXT_PROPERTIES */
-  offset_intervals (current_buffer, point, - numdel);
+  offset_intervals (current_buffer, from, - numdel);
 
   /* Relocate all markers pointing into the new, larger gap
      to point at the end of the text before the gap.  */
@@ -495,6 +495,9 @@ modify_region (buffer, start, end)
   if (Z - end < end_unchanged
       || unchanged_modified == MODIFF)
     end_unchanged = Z - end;
+
+  if (MODIFF <= current_buffer->save_modified)
+    record_first_change ();
   MODIFF++;
 
   if (buffer != old_buffer)