From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 9 May 1998 23:55:27 +0000 (+0000)
Subject: (Qbuffer_name_history): New variable.
X-Git-Tag: emacs-20.3~1067
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=406e55df207fa649e1690d20e8febe9d757166bb;p=emacs.git

(Qbuffer_name_history): New variable.
(syms_of_minibuf): Initialize it.
(Fread_buffer): Use that history list.
---

diff --git a/src/minibuf.c b/src/minibuf.c
index bd3fc5779ae..f41e03072fe 100644
--- a/src/minibuf.c
+++ b/src/minibuf.c
@@ -77,7 +77,7 @@ Lisp_Object Vminibuffer_history_variable;
 
 Lisp_Object Vminibuffer_history_position;
 
-Lisp_Object Qminibuffer_history;
+Lisp_Object Qminibuffer_history, Qbuffer_name_history;
 
 Lisp_Object Qread_file_name_internal;
 
@@ -855,7 +855,8 @@ If optional third arg REQUIRE-MATCH is non-nil, only existing buffer names are a
 	}
 
       return Fcompleting_read (prompt, Vbuffer_alist, Qnil,
-			       require_match, Qnil, Qnil, def, Qnil);
+			       require_match, Qnil, Qbuffer_name_history,
+			       def, Qnil);
     }
   else
     {
@@ -2103,6 +2104,9 @@ syms_of_minibuf ()
   Qminibuffer_history = intern ("minibuffer-history");
   staticpro (&Qminibuffer_history);
 
+  Qbuffer_name_history = intern ("buffer-name-history");
+  staticpro (&Qbuffer_name_history);
+
   Qminibuffer_setup_hook = intern ("minibuffer-setup-hook");
   staticpro (&Qminibuffer_setup_hook);