mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-25 10:47:00 +00:00
Code Issues Releases Activity

(del_range_2, replace_range): Don't write an anchor if the gap is empty.

Browse Source
This commit is contained in:
Richard M. Stallman 2004-05-22 22:15:37 +00:00
parent 6924d3b7d3
commit 017e09acc2
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/insdel.c
View File

@ -1556,7 +1556,7 @@ replace_range (from, to, new, prepare, inherit, markers)
Z_BYTE -= nbytes_del;
GPT = from;
GPT_BYTE = from_byte;
*(GPT_ADDR) = 0; /* Put an anchor. */
if (GAP_SIZE > 0) *(GPT_ADDR) = 0; /* Put an anchor. */
if (GPT_BYTE < GPT)
abort ();
@ -1839,7 +1839,7 @@ del_range_2 (from, from_byte, to, to_byte, ret_string)
Z -= nchars_del;
GPT = from;
GPT_BYTE = from_byte;
*(GPT_ADDR) = 0; /* Put an anchor. */
if (GAP_SIZE > 0) *(GPT_ADDR) = 0; /* Put an anchor. */
if (GPT_BYTE < GPT)
abort ();