(update_compositions): Bind inhibit-read-only, etc

to t before calling remove-list-of-text-properties.

diff --git a/src/composite.c b/src/composite.c
index e8dd721f805dca143a390244662e1f2a9186c74a..683330731ed602973e8b9d2fc1f0ea1e0c0ec99a 100644 (file)
--- a/src/composite.c
+++ b/src/composite.c
@@ -562,9 +562,17 @@ update_compositions (from, to, check_mask)
        }
     }
   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);
+    }
 }