From xemacs-m  Wed Apr 30 22:30:12 1997
Received: from jagor.srce.hr (hniksic@jagor.srce.hr [161.53.2.130])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id WAA23308
	for <xemacs-beta@xemacs.org>; Wed, 30 Apr 1997 22:30:11 -0500 (CDT)
Received: (from hniksic@localhost)
          by jagor.srce.hr (8.8.5/8.8.4)
	  id FAA28399; Thu, 1 May 1997 05:30:07 +0200 (MET DST)
To: XEmacs Developers <xemacs-beta@xemacs.org>
Subject: `make-indirect-buffer': a long-standing gripe
X-Save-Project-Gutenberg: <URL:http://www.promo.net/pg/nl/pgny_nov96.html>
X-Attribution: Hrv
X-Face: Mie8:rOV<\c/~z{s.X4A{!?vY7{drJ([U]0O=W/<W*SMo/Mv:58:*_y~ki>xDi&N7XG
        KV^$k0m3Oe/)'e%3=$PCR&3ITUXH,cK>]bci&<qQ>Ff%x_>1`T(+M2Gg/fgndU%k*ft
        [(7._6e0n-V%|%'[c|q:;}td$#INd+;?!-V=c8Pqf}3J
From: Hrvoje Niksic <hniksic@srce.hr>
Date: 01 May 1997 05:30:05 +0200
Message-ID: <kigd8rbj2de.fsf@jagor.srce.hr>
Lines: 59
X-Mailer: Gnus v5.4.45/XEmacs 19.15

We should nuke others like this one, too.

--- src/ChangeLog.orig	Thu May  1 05:23:11 1997
+++ src/ChangeLog	Thu May  1 05:24:56 1997
@@ -1,3 +1,7 @@
+Thu May  1 05:24:25 1997  Hrvoje Niksic  <hniksic@srce.hr>
+
+	* buffer.c (Fmake_indirect_buffer): Don't pretend it's there.
+
 Fri Apr 25 10:53:07 1997  Steven L Baur  <steve@altair.xemacs.org>
 
 	* glyphs-x.c: libpng already includes setjmp.h, so don't attempt
--- src/buffer.c.orig	Thu May  1 05:23:06 1997
+++ src/buffer.c	Thu May  1 05:25:12 1997
@@ -648,6 +648,7 @@
   return finish_init_buffer (b, name);
 }
 
+#if 0 /* #### implement this!  Need various changes in insdel.c */
 DEFUN ("make-indirect-buffer", Fmake_indirect_buffer, 2, 2,
        "bMake indirect buffer (to buffer): \nBName of indirect buffer: ", /*
 Create and return an indirect buffer for buffer BASE, named NAME.
@@ -659,10 +660,6 @@
 */
        (base_buffer, name))
 {
-  error ("make-indirect-buffer not yet implemented, oops");
-  return Qnil;
-
-#if 0 /* #### implement this!  Need various changes in insdel.c */
   Lisp_Object buf;
   REGISTER struct buffer *b;
 
@@ -699,8 +696,8 @@
   init_buffer_text (b, 1);
 
   return finish_init_buffer (b, name);
-#endif /* 0 */
 }
+#endif /* 0 */
 
 
 static void
@@ -1917,7 +1914,9 @@
   DEFSUBR (Fget_buffer);
   DEFSUBR (Fget_file_buffer);
   DEFSUBR (Fget_buffer_create);
+#if 0
   DEFSUBR (Fmake_indirect_buffer);
+#endif
 
   DEFSUBR (Fgenerate_new_buffer_name);
   DEFSUBR (Fbuffer_name);

-- 
Hrvoje Niksic <hniksic@srce.hr> | Student at FER Zagreb, Croatia
--------------------------------+--------------------------------
Unspeakable horrors from outer space paralyze the living and
resurrect the dead!

