# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1085264137 0
# Node ID eba675d00657afcba507c9ea27903407f3f681a1
# Parent  cf63ed17e21cae145755b74dec6b6514fbfc07f5
(del_range_2, replace_range): Don't write an anchor if the gap is empty.

diff -r cf63ed17e21c -r eba675d00657 src/insdel.c
--- a/src/insdel.c	Sat May 22 22:11:24 2004 +0000
+++ b/src/insdel.c	Sat May 22 22:15:37 2004 +0000
@@ -1556,7 +1556,7 @@
   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 @@
   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 ();