# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 756611936 0
# Node ID 63a865489a1ecb330027c22d21e4526d7eecbf8b
# Parent  67767e113d1d2c9b224e514df5b439acc89b7aac
(graft_intervals_into_buffer): If SOURCE is null
and TREE is null, no need to call Fset_text_properties.

diff -r 67767e113d1d -r 63a865489a1e src/intervals.c
--- a/src/intervals.c	Thu Dec 23 01:57:54 1993 +0000
+++ b/src/intervals.c	Thu Dec 23 01:58:56 1993 +0000
@@ -1272,7 +1272,7 @@
   if (NULL_INTERVAL_P (source))
     {
       Lisp_Object buf;
-      if (!inherit)
+      if (!inherit && ! NULL_INTERVAL_P (tree))
 	{
 	  XSET (buf, Lisp_Buffer, buffer);
 	  Fset_text_properties (make_number (position),