# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 743328415 0
# Node ID b044f6d3c4cbea4fabd7ad9bdddeee1e83c33c8c
# Parent  6a8d48a6ac1034cf25cf01d028a6d5558e59d668
(graft_intervals_into_buffer): When TREE is null,
pass buffer as 2nd arg to reproduce_tree.

diff -r 6a8d48a6ac10 -r b044f6d3c4cb src/intervals.c
--- a/src/intervals.c	Thu Jul 22 07:17:28 1993 +0000
+++ b/src/intervals.c	Thu Jul 22 08:06:55 1993 +0000
@@ -1114,7 +1114,9 @@
 	 simply copy over the interval structure. */
       if ((BUF_Z (buffer) - BUF_BEG (buffer)) == TOTAL_LENGTH (source))
 	{
-	  buffer->intervals = reproduce_tree (source, tree->parent);
+	  Lisp_Object buf;
+	  XSET (buf, Lisp_Buffer, buffer);
+	  buffer->intervals = reproduce_tree (source, buf);
 	  /* Explicitly free the old tree here. */
 
 	  return;