From 6445414a594d14ed33cf48ed1ae95764f81bcbc7 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 6 Apr 1999 08:49:28 +0000 Subject: [PATCH] (graft_intervals_into_buffer): Turn off inhibit_modification_hooks around calling Fset_text_properties. --- src/intervals.c | 3 +++ 1 file changed, 3 insertions(+) diff --git a/src/intervals.c b/src/intervals.c index 28fa540a383..1a5c2c95322 100644 --- a/src/intervals.c +++ b/src/intervals.c @@ -1579,10 +1579,13 @@ graft_intervals_into_buffer (source, position, length, buffer, inherit) Lisp_Object buf; if (!inherit && ! NULL_INTERVAL_P (tree)) { + int saved_inhibit_modification_hooks = inhibit_modification_hooks; XSETBUFFER (buf, buffer); + inhibit_modification_hooks = 1; Fset_text_properties (make_number (position), make_number (position + length), Qnil, buf); + inhibit_modification_hooks = saved_inhibit_modification_hooks; } if (! NULL_INTERVAL_P (BUF_INTERVALS (buffer))) BUF_INTERVALS (buffer) = balance_an_interval (BUF_INTERVALS (buffer)); -- 2.39.2