diff src/composite.c @ 89633:40b05b530518

(update_compositions): Bind inhibit-read-only, etc to t before calling remove-list-of-text-properties.
author Kenichi Handa <handa@m17n.org>
date Tue, 18 Nov 2003 06:29:24 +0000
parents c380df3cc4df
children 13df47fbaa54
line wrap: on
line diff
--- a/src/composite.c	Tue Nov 18 02:44:59 2003 +0000
+++ b/src/composite.c	Tue Nov 18 06:29:24 2003 +0000
@@ -562,9 +562,17 @@
 	}
     }
   if (min_pos < max_pos)
-    Fremove_list_of_text_properties (make_number (min_pos),
-				     make_number (max_pos),
-				     Fcons (Qauto_composed, Qnil), Qnil);
+    {
+      int count = SPECPDL_INDEX ();
+
+      specbind (Qinhibit_read_only, Qt);
+      specbind (Qinhibit_modification_hooks, Qt);
+      specbind (Qinhibit_point_motion_hooks, Qt);
+      Fremove_list_of_text_properties (make_number (min_pos),
+				       make_number (max_pos),
+				       Fcons (Qauto_composed, Qnil), Qnil);
+      unbind_to (count, Qnil);
+    }
 }