# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 999245023 0
# Node ID a61b3d90709892c7dd329f26fb639afdf6b20da6
# Parent  2a7279b2f60d42b2bf8d4cbb51554f48119fb2fc
(update_compositions): Do nothing if
inhibit-modification-hooks is set.

diff -r 2a7279b2f60d -r a61b3d907098 src/composite.c
--- a/src/composite.c	Fri Aug 31 07:44:38 2001 +0000
+++ b/src/composite.c	Fri Aug 31 08:03:43 2001 +0000
@@ -489,6 +489,9 @@
   Lisp_Object prop;
   int start, end;
 
+  if (inhibit_modification_hooks)
+    return;
+  
   /* If FROM and TO are not in a valid range, do nothing.  */
   if (! (BEGV <= from && from <= to && to <= ZV))
     return;
@@ -602,7 +605,7 @@
      int start, end;
      Lisp_Object string;
 {
-  int count;
+  int count = 0;
   struct gcpro gcpro1;
   Lisp_Object tail, elt, val, to;
   /* Set to nonzero if we don't have to compose ASCII characters.  */