From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 11 Nov 1995 23:50:10 +0000 (+0000)
Subject: (syms_of_frame_1): Set up Vdefault_frame_alist here.
X-Git-Tag: emacs-19.34~2338
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a1aaa23f9f2c12773f301a0fb427db34d425edb9;p=emacs.git

(syms_of_frame_1): Set up Vdefault_frame_alist here.
(syms_of_frame): Not here.
(Vdefault_frame_alist): Definition now unconditional.
---

diff --git a/src/frame.c b/src/frame.c
index c6c7cbb95d3..173f84e1cd1 100644
--- a/src/frame.c
+++ b/src/frame.c
@@ -81,6 +81,7 @@ Lisp_Object Qvisible;
 Lisp_Object Qbuffer_predicate;
 
 Lisp_Object Vterminal_frame;
+Lisp_Object Vdefault_frame_alist;
 
 Lisp_Object Qmouse_leave_buffer_hook;
 
@@ -121,6 +122,19 @@ syms_of_frame_1 ()
 
   Qmouse_leave_buffer_hook = intern ("mouse-leave-buffer-hook");
   staticpro (&Qmouse_leave_buffer_hook);
+
+  DEFVAR_LISP ("default-frame-alist", &Vdefault_frame_alist,
+    "Alist of default values for frame creation.\n\
+These may be set in your init file, like this:\n\
+  (setq default-frame-alist '((width . 80) (height . 55) (menu-bar-lines . 1))\n\
+These override values given in window system configuration data,\n\
+ including X Windows' defaults database.\n\
+For values specific to the first Emacs frame, see `initial-frame-alist'.\n\
+For values specific to the separate minibuffer frame, see\n\
+ `minibuffer-frame-alist'.\n\
+The `menu-bar-lines' element of the list controls whether new frames\n\
+ have menu bars; `menu-bar-mode' works by altering this element.");
+  Vdefault_frame_alist = Qnil;
 }
 
 static void
@@ -185,7 +199,6 @@ set_menu_bar_lines (f, value, oldval)
 
 Lisp_Object Vemacs_iconified;
 Lisp_Object Vframe_list;
-Lisp_Object Vdefault_frame_alist;
 
 extern Lisp_Object Vminibuffer_list;
 extern Lisp_Object get_minibuffer ();
@@ -2000,19 +2013,6 @@ this variable doesn't necessarily say anything meaningful about the\n\
 current set of frames, or where the minibuffer is currently being\n\
 displayed.");
 
-  DEFVAR_LISP ("default-frame-alist", &Vdefault_frame_alist,
-    "Alist of default values for frame creation.\n\
-These may be set in your init file, like this:\n\
-  (setq default-frame-alist '((width . 80) (height . 55) (menu-bar-lines . 1))\n\
-These override values given in window system configuration data,\n\
- including X Windows' defaults database.\n\
-For values specific to the first Emacs frame, see `initial-frame-alist'.\n\
-For values specific to the separate minibuffer frame, see\n\
- `minibuffer-frame-alist'.\n\
-The `menu-bar-lines' element of the list controls whether new frames\n\
- have menu bars; `menu-bar-mode' works by altering this element.");
-  Vdefault_frame_alist = Qnil;
-
   defsubr (&Sactive_minibuffer_window);
   defsubr (&Sframep);
   defsubr (&Sframe_live_p);