diff options
| author | Richard M. Stallman | 1993-03-01 08:55:35 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-03-01 08:55:35 +0000 |
| commit | 16032db6875c2840f8b51f86ccb1658940795910 (patch) | |
| tree | 6616a65ef0deaa4cf66bc50c64aac74b02501662 /src | |
| parent | 75cf385a42a7eddf94597112b89997b57e8acf82 (diff) | |
| download | emacs-16032db6875c2840f8b51f86ccb1658940795910.tar.gz emacs-16032db6875c2840f8b51f86ccb1658940795910.zip | |
(del_range): Update point before offset_intervals.
Diffstat (limited to 'src')
| -rw-r--r-- | src/insdel.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/insdel.c b/src/insdel.c index 7f25a967d46..35345440c2a 100644 --- a/src/insdel.c +++ b/src/insdel.c | |||
| @@ -444,9 +444,6 @@ del_range (from, to) | |||
| 444 | record_delete (from, numdel); | 444 | record_delete (from, numdel); |
| 445 | MODIFF++; | 445 | MODIFF++; |
| 446 | 446 | ||
| 447 | /* Only defined if Emacs is compiled with USE_TEXT_PROPERTIES */ | ||
| 448 | offset_intervals (current_buffer, point, - numdel); | ||
| 449 | |||
| 450 | /* Relocate point as if it were a marker. */ | 447 | /* Relocate point as if it were a marker. */ |
| 451 | if (from < point) | 448 | if (from < point) |
| 452 | { | 449 | { |
| @@ -456,6 +453,9 @@ del_range (from, to) | |||
| 456 | SET_PT (point - numdel); | 453 | SET_PT (point - numdel); |
| 457 | } | 454 | } |
| 458 | 455 | ||
| 456 | /* Only defined if Emacs is compiled with USE_TEXT_PROPERTIES */ | ||
| 457 | offset_intervals (current_buffer, point, - numdel); | ||
| 458 | |||
| 459 | /* Relocate all markers pointing into the new, larger gap | 459 | /* Relocate all markers pointing into the new, larger gap |
| 460 | to point at the end of the text before the gap. */ | 460 | to point at the end of the text before the gap. */ |
| 461 | adjust_markers (to + GAP_SIZE, to + GAP_SIZE, - numdel - GAP_SIZE); | 461 | adjust_markers (to + GAP_SIZE, to + GAP_SIZE, - numdel - GAP_SIZE); |