From: handa <handa>
Date: Mon, 21 Jun 2004 00:26:32 +0000 (+0000)
Subject: (mtext__adjust_plist_for_change): New function.
X-Git-Tag: withdl~60
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=4ae73bb6cb07bcb25656b25de9be3e77bcbb11d6;p=m17n%2Fm17n-lib.git

(mtext__adjust_plist_for_change): New function.
---

diff --git a/src/textprop.c b/src/textprop.c
index f417e39..40705e5 100644
--- a/src/textprop.c
+++ b/src/textprop.c
@@ -1429,6 +1429,20 @@ mtext__adjust_plist_for_insert (MText *mt, int pos, int nchars,
     }
 }
 
+void
+mtext__adjust_plist_for_change (MText *mt, int from, int to)
+{
+  MTextPlist *plist;
+
+  prepare_to_modify (mt, from, to, Mnil);
+  for (plist = mt->plist; plist; plist = plist->next)
+    {
+      pop_all_properties (plist, from, to);
+      xassert (check_plist (plist, 0) == 0);
+    }
+}
+
+
 /*** @} */
 #endif /* !FOR_DOXYGEN || DOXYGEN_INTERNAL_MODULE */