From: Ken Raeburn <raeburn@raeburn.org>
Date: Mon, 15 Jul 2002 06:54:48 +0000 (+0000)
Subject: * buffer.c (Fget_buffer_create, Fmake_indirect_buffer): Use it.
X-Git-Tag: ttn-vms-21-2-B4~14131
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ab77f05c7fbf2c48faf992cf8fd13b40c497b861;p=emacs.git

* buffer.c (Fget_buffer_create, Fmake_indirect_buffer): Use it.
---

diff --git a/src/buffer.c b/src/buffer.c
index 8ee60578311..2a42164af25 100644
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -397,7 +397,7 @@ The value is never nil.  */)
   b->zv_marker = Qnil;
 
   name = Fcopy_sequence (name);
-  STRING_INTERVALS (name) = NULL_INTERVAL;
+  STRING_SET_INTERVALS (name, NULL_INTERVAL);
   b->name = name;
 
   if (SREF (name, 0) != ' ')
@@ -556,7 +556,7 @@ CLONE nil means the indirect buffer's state is reset to default values.  */)
   all_buffers = b;
 
   name = Fcopy_sequence (name);
-  STRING_INTERVALS (name) = NULL_INTERVAL;
+  STRING_SET_INTERVALS (name, NULL_INTERVAL);
   b->name = name;
 
   reset_buffer (b);