From: Gerd Moellmann <gerd@gnu.org>
Date: Mon, 13 Sep 1999 11:13:16 +0000 (+0000)
Subject: (Fother_buffer): Change for Lisp_Object selected_frame.
X-Git-Tag: emacs-pretest-21.0.90~6778
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9ba9623dc3b50df0e67424ab2f588dbb62b3c8c8;p=emacs.git

(Fother_buffer): Change for Lisp_Object selected_frame.
(record_buffer): Ditto.
---

diff --git a/src/buffer.c b/src/buffer.c
index 68013d4032a..99683385786 100644
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -921,7 +921,7 @@ If BUFFER is omitted or nil, some interesting buffer is returned.")
   notsogood = Qnil;
 
   if (NILP (frame))
-    frame = Fselected_frame ();
+    frame = selected_frame;
 
   tail = Vbuffer_alist;
   pred = frame_buffer_predicate (frame);
@@ -1241,7 +1241,7 @@ record_buffer (buf)
 {
   register Lisp_Object link, prev;
   Lisp_Object frame;
-  frame = Fselected_frame ();
+  frame = selected_frame;
 
   prev = Qnil;
   for (link = Vbuffer_alist; CONSP (link); link = XCONS (link)->cdr)