diff src/w32fns.c @ 83616:b78afd4acd43

* term.c (init_tty): Better initialize ttys in windows. * w32fns.c (Fx_create_frame): Set the default minibuffer frame, window_system and the rest of the frame parameters following what is done in X11.

--- a/src/w32fns.c	Thu May 17 12:29:09 2007 +0000
+++ b/src/w32fns.c	Thu May 17 13:17:56 2007 +0000
@@ -4430,6 +4430,22 @@
 	/* Must have been Qnil.  */
 	;
     }
+
+  /* Initialize `default-minibuffer-frame' in case this is the first
+     frame on this terminal.  */
+  if (FRAME_HAS_MINIBUF_P (f)
+      && (!FRAMEP (kb->Vdefault_minibuffer_frame)
+          || !FRAME_LIVE_P (XFRAME (kb->Vdefault_minibuffer_frame))))
+    kb->Vdefault_minibuffer_frame = frame;
+
+  /* All remaining specified parameters, which have not been "used"
+     by x_get_arg and friends, now go in the misc. alist of the frame.  */
+  for (tem = parameters; !NILP (tem); tem = XCDR (tem))
+    if (CONSP (XCAR (tem)) && !NILP (XCAR (XCAR (tem))))
+      f->param_alist = Fcons (XCAR (tem), f->param_alist);
+
+  store_frame_param (f, Qwindow_system, Qw32);
+  
   UNGCPRO;
 
   /* Make sure windows on this frame appear in calls to next-window