changeset 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.
author Dan Nicolaescu <dann@ics.uci.edu>
date Thu, 17 May 2007 13:17:56 +0000
parents 34d02ab0ec0d
children 9810946e31cf
files src/ChangeLog.multi-tty src/term.c src/w32fns.c
diffstat 3 files changed, 43 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/ChangeLog.multi-tty	Thu May 17 12:29:09 2007 +0000
+++ b/src/ChangeLog.multi-tty	Thu May 17 13:17:56 2007 +0000
@@ -1,3 +1,10 @@
+2007-05-17  Dan Nicolaescu  <dann@ics.uci.edu>
+
+	* 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.
+
 2007-05-17  Jason Rumney  <jasonr@gnu.org>
 
 	* w32term.h (x_output): Remove foreground_pixel and background_pixel.
--- a/src/term.c	Thu May 17 12:29:09 2007 +0000
+++ b/src/term.c	Thu May 17 13:17:56 2007 +0000
@@ -2424,6 +2424,7 @@
                  "Unknown terminal type",
                  "Unknown terminal type");
 
+#ifndef WINDOWSNT  
   if (name == NULL)
     name = "/dev/tty";
   if (!strcmp (name, "/dev/tty"))
@@ -2437,7 +2438,8 @@
   terminal = get_named_tty (name);
   if (terminal)
     return terminal;
-
+#endif
+  
   terminal = create_terminal ();
   tty = (struct tty_display_info *) xmalloc (sizeof (struct tty_display_info));
   bzero (tty, sizeof (struct tty_display_info));
@@ -2451,6 +2453,7 @@
   tty->Wcm = (struct cm *) xmalloc (sizeof (struct cm));
   Wcm_clear (tty);
 
+#ifndef WINDOWSNT
   set_tty_hooks (terminal);
   
   {
@@ -2497,19 +2500,33 @@
     tty->input = file;
     tty->output = file;
   }
-
+  
   tty->type = xstrdup (terminal_type);
 
   add_keyboard_wait_descriptor (fileno (tty->input));
 
+#endif
+
   encode_terminal_bufsize = 0;
 
 #ifdef WINDOWSNT
   initialize_w32_display ();
 
+  /* XXX Can this be non-null?  */
+  if (name)
+    {
+      tty->name = xstrdup (name);
+      terminal->name = xstrdup (name);
+    }
+  tty->type = xstrdup (terminal_type);  
+
+  /* XXX not sure if this line is correct. If it is not set then we
+     crash in update_display_1. */
+  tty->output = stdout;
+  
   Wcm_clear (tty);
 
-  area = (char *) xmalloc (2044);
+  area = (char *) xmalloc (2044); /* XXX this seems unused. */
 
   {
     struct frame *f = XFRAME (selected_frame);
--- 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