(graft_intervals_into_buffer): Use new accessor macros instead of calling XSET

directly.

1 files changed, 3 insertions, 3 deletions

diff --git a/src/intervals.c b/src/intervals.c
index 5ec26e2d301..195285517da 100644
--- a/src/intervals.c
+++ b/src/intervals.c
@@ -1434,7 +1434,7 @@ graft_intervals_into_buffer (source, position, length, buffer, inherit)
       Lisp_Object buf;
       if (!inherit && ! NULL_INTERVAL_P (tree))
         {
-          XSET (buf, Lisp_Buffer, buffer);
+          XSETBUFFER (buf, buffer);
           Fset_text_properties (make_number (position),
                                 make_number (position + length),
                                 Qnil, buf);
@@ -1451,7 +1451,7 @@ graft_intervals_into_buffer (source, position, length, buffer, inherit)
       if ((BUF_Z (buffer) - BUF_BEG (buffer)) == TOTAL_LENGTH (source))
         {
           Lisp_Object buf;
-          XSET (buf, Lisp_Buffer, buffer);
+          XSETBUFFER (buf, buffer);
           buffer->intervals = reproduce_tree (source, buf);
           /* Explicitly free the old tree here.  */
 
@@ -1462,7 +1462,7 @@ graft_intervals_into_buffer (source, position, length, buffer, inherit)
          of the intervals of the inserted string.  */
       {
         Lisp_Object buf;
-        XSET (buf, Lisp_Buffer, buffer);
+        XSETBUFFER (buf, buffer);
         tree = create_root_interval (buf);
       }
     }