# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 819566070 0
# Node ID 5abcd2653057e4b8e77026f18d99f496f2f6c806
# Parent  7b2f71009e4c6a622c5ac4a39e565f611a7ba958
(add_properties, remove_properties, set_properties):
Call signal_after_change.

diff -r 7b2f71009e4c -r 5abcd2653057 src/textprop.c
--- a/src/textprop.c	Thu Dec 21 17:13:56 1995 +0000
+++ b/src/textprop.c	Thu Dec 21 17:14:30 1995 +0000
@@ -304,6 +304,8 @@
 	    record_property_change (interval->position, LENGTH (interval),
 				    XCONS (sym)->car, XCONS (value)->car,
 				    object);
+	    signal_after_change (interval->position, LENGTH (interval),
+				 LENGTH (interval));
 	  }
 
       /* For each new property that has no value at all in the old plist,
@@ -319,6 +321,8 @@
 	    record_property_change (interval->position, LENGTH (interval),
 				    XCONS (sym)->car, Qnil,
 				    object);
+	    signal_after_change (interval->position, LENGTH (interval),
+				 LENGTH (interval));
 	  }
     }
 
@@ -386,6 +390,7 @@
 			       make_number (i->position + LENGTH (i)));
 		record_property_change (i->position, LENGTH (i),
 					sym1, Fcar (this_cdr), object);
+		signal_after_change (i->position, LENGTH (i), LENGTH (i));
 	      }
 
 	    /* I's property has a different value -- change it */
@@ -404,6 +409,7 @@
 			     make_number (i->position + LENGTH (i)));
 	      record_property_change (i->position, LENGTH (i),
 				      sym1, Qnil, object);
+	      signal_after_change (i->position, LENGTH (i), LENGTH (i));
 	    }
 	  i->plist = Fcons (sym1, Fcons (val1, i->plist));
 	  changed++;
@@ -445,6 +451,7 @@
 	      record_property_change (i->position, LENGTH (i),
 				      sym, Fcar (Fcdr (current_plist)),
 				      object);
+	      signal_after_change (i->position, LENGTH (i), LENGTH (i));
 	    }
 
 	  current_plist = Fcdr (Fcdr (current_plist));
@@ -466,6 +473,7 @@
 				 make_number (i->position + LENGTH (i)));
 		  record_property_change (i->position, LENGTH (i),
 					  sym, Fcar (Fcdr (this)), object);
+		  signal_after_change (i->position, LENGTH (i), LENGTH (i));
 		}
 
 	      Fsetcdr (Fcdr (tail2), Fcdr (Fcdr (this)));