diff options
author | Richard M. Stallman <rms@gnu.org> | 1993-07-22 08:06:55 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1993-07-22 08:06:55 +0000 |
commit | 77a7063a3f09d7f2bd45cc0cb56ef1a1af6daf5a (patch) | |
tree | 8fc92ccdb01dc04f4b2dbc3aca252f4382e74cc9 /src/intervals.c | |
parent | 159ab5c6764db2a66cc739d267d75957ab46c224 (diff) | |
download | emacs-77a7063a3f09d7f2bd45cc0cb56ef1a1af6daf5a.tar.gz |
(graft_intervals_into_buffer): When TREE is null,
pass buffer as 2nd arg to reproduce_tree.
Diffstat (limited to 'src/intervals.c')
-rw-r--r-- | src/intervals.c | 4 |
1 files changed, 3 insertions, 1 deletions
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; |