(Fmake_indirect_buffer): Set the buffer's tag.

diff --git a/src/ChangeLog b/src/ChangeLog
index 12e0a492bddc7f65a9d133dd6957fdc2445d6c67..bbbaa2b368c80af3c396b312e208167fedee3874 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2007-10-14  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * buffer.c (Fmake_indirect_buffer): Set the buffer's tag.
+
 2007-10-14  Juanma Barranquero  <lekktu@gmail.com>
 
        * eval.c (do_autoload): Don't save autoloads.

diff --git a/src/buffer.c b/src/buffer.c
index 289cd07879304ce79c362be95ca2930c97d95930..740f9fe53d64dcfda065fe2c4129bbd44482a99e 100644 (file)
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -568,6 +568,7 @@ CLONE nil means the indirect buffer's state is reset to default values.  */)
 
   b = (struct buffer *) allocate_buffer ();
   b->size = sizeof (struct buffer) / sizeof (EMACS_INT);
+  XSETPVECTYPE (b, PVEC_BUFFER);
 
   if (XBUFFER (base_buffer)->base_buffer)
     b->base_buffer = XBUFFER (base_buffer)->base_buffer;