--- a/src/extents.c	Mon Aug 13 08:50:31 2007 +0200
+++ b/src/extents.c	Mon Aug 13 08:51:03 2007 +0200
@@ -4412,6 +4412,7 @@
   if (CONSP (closure->iro) && !NILP (Fmemq (prop, closure->iro)))
     return 0;
 
+#if 0 /* Nobody seems to care for this any more -sb */
   /* Allow deletion if the extent is completely contained in
      the region being deleted.
      This is important for supporting tokens which are internally
@@ -4423,6 +4424,7 @@
       extent_start (extent) >= closure->start &&
       extent_end (extent) <= closure->end)
     return 0;
+#endif
 
   while (1)
     Fsignal (Qbuffer_read_only, (list1 (closure->object)));