From b8e4857c8119527360091b3f8274a7b24c08d686 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 22 Jul 1993 08:06:55 +0000 Subject: [PATCH] (graft_intervals_into_buffer): When TREE is null, pass buffer as 2nd arg to reproduce_tree. --- src/intervals.c | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/intervals.c b/src/intervals.c index 0922a074a96..402b96c4e37 100644 --- a/src/intervals.c +++ b/src/intervals.c @@ -1114,7 +1114,9 @@ graft_intervals_into_buffer (source, position, buffer) 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; -- 2.39.5