Mercurial > emacs
comparison src/insdel.c @ 26604:381c4e70f9fb
(insert_1_both): Call set_text_properties with last
parameter nil so that no after changes will be signaled.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Fri, 26 Nov 1999 12:07:04 +0000 |
parents | c3c9cc1c2379 |
children | 626e80b37895 |
comparison
equal
deleted
inserted
replaced
26603:30dbdfd88028 | 26604:381c4e70f9fb |
---|---|
566 m->bytepos = from_byte + new_bytes + combined_after_bytes; | 566 m->bytepos = from_byte + new_bytes + combined_after_bytes; |
567 m->charpos = from + new_chars - combined_before_bytes; | 567 m->charpos = from + new_chars - combined_before_bytes; |
568 } | 568 } |
569 else | 569 else |
570 { | 570 { |
571 m->charpos += diff_chars; | 571 m->charpos = min (from + new_chars, m->charpos + diff_chars); |
572 m->bytepos += diff_bytes; | 572 m->bytepos = min (from_byte + new_bytes, |
573 m->bytepos + diff_bytes); | |
573 } | 574 } |
574 } | 575 } |
575 else if (m->bytepos >= from_byte) | 576 else if (m->bytepos >= from_byte) |
576 { | 577 { |
577 m->charpos = from; | 578 m->charpos = from; |
1186 | 1187 |
1187 if (BUF_INTERVALS (current_buffer) != 0) | 1188 if (BUF_INTERVALS (current_buffer) != 0) |
1188 offset_intervals (current_buffer, PT, nchars); | 1189 offset_intervals (current_buffer, PT, nchars); |
1189 | 1190 |
1190 if (!inherit && BUF_INTERVALS (current_buffer) != 0) | 1191 if (!inherit && BUF_INTERVALS (current_buffer) != 0) |
1191 Fset_text_properties (make_number (PT), make_number (PT + nchars), | 1192 set_text_properties (make_number (PT), make_number (PT + nchars), |
1192 Qnil, Qnil); | 1193 Qnil, Qnil, Qnil); |
1193 | 1194 |
1194 { | 1195 { |
1195 int pos = PT, pos_byte = PT_BYTE; | 1196 int pos = PT, pos_byte = PT_BYTE; |
1196 | 1197 |
1197 adjust_point (nchars + combined_after_bytes, | 1198 adjust_point (nchars + combined_after_bytes, |