Mercurial > emacs

changeset 11774:0b5cb5170084

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fx_create_frame): Pass kb to make_frame_without_minibuffer.
author Karl Heuer <kwzh@gnu.org>
date Tue, 09 May 1995 04:57:39 +0000
parents bde1a67e0455
children fe7852953b75
files src/xfns.c
diffstat 1 files changed, 9 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/xfns.c	Tue May 09 04:49:03 1995 +0000
+++ b/src/xfns.c	Tue May 09 04:57:39 1995 +0000
@@ -2739,6 +2739,7 @@
   Lisp_Object display;
   struct x_display_info *dpyinfo;
   Lisp_Object parent;
+  struct kboard *kb;
 
   check_x ();
 
@@ -2746,6 +2747,11 @@
   if (EQ (display, Qunbound))
     display = Qnil;
   dpyinfo = check_x_display_info (display);
+#ifdef MULTI_KBOARD
+  kb = dpyinfo->kboard;
+#else
+  kb = &the_only_kboard;
+#endif
 
   name = x_get_arg (parms, Qname, "title", "Title", string);
   if (!STRINGP (name)
@@ -2762,14 +2768,14 @@
 
   tem = x_get_arg (parms, Qminibuffer, 0, 0, symbol);
   if (EQ (tem, Qnone) || NILP (tem))
-    f = make_frame_without_minibuffer (Qnil);
+    f = make_frame_without_minibuffer (Qnil, kb);
   else if (EQ (tem, Qonly))
     {
       f = make_minibuffer_frame ();
       minibuffer_only = 1;
     }
   else if (WINDOWP (tem))
-    f = make_frame_without_minibuffer (tem);
+    f = make_frame_without_minibuffer (tem, kb);
   else
     f = make_frame (1);
 
@@ -2786,7 +2792,7 @@
 
   FRAME_X_DISPLAY_INFO (f) = dpyinfo;
 #ifdef MULTI_KBOARD
-  FRAME_KBOARD (f) = dpyinfo->kboard;
+  FRAME_KBOARD (f) = kb;
 #endif
 
   /* Specify the parent under which to make this X window.  */