Commit 16032db6 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(del_range): Update point before offset_intervals.

parent 75cf385a
......@@ -444,9 +444,6 @@ del_range (from, to)
record_delete (from, numdel);
MODIFF++;
/* Only defined if Emacs is compiled with USE_TEXT_PROPERTIES */
offset_intervals (current_buffer, point, - numdel);
/* Relocate point as if it were a marker. */
if (from < point)
{
......@@ -456,6 +453,9 @@ del_range (from, to)
SET_PT (point - numdel);
}
/* Only defined if Emacs is compiled with USE_TEXT_PROPERTIES */
offset_intervals (current_buffer, point, - numdel);
/* Relocate all markers pointing into the new, larger gap
to point at the end of the text before the gap. */
adjust_markers (to + GAP_SIZE, to + GAP_SIZE, - numdel - GAP_SIZE);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment