Mercurial > hg > xemacs-beta

diff src/frame-msw.c @ 290:c9fe270a4101 r21-0b43

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b43
author cvs
date Mon, 13 Aug 2007 10:36:47 +0200
parents c42ec1d1cded
children 4b85ae5eabfb
line wrap: on
line diff
--- a/src/frame-msw.c	Mon Aug 13 10:35:55 2007 +0200
+++ b/src/frame-msw.c	Mon Aug 13 10:36:47 2007 +0200
@@ -85,6 +85,7 @@
   XEMACS_RECT_WH rect_default;
   DWORD style, exstyle;
   HWND hwnd, hwnd_parent;
+  static BOOL first_frame = 1;
 
   /* Pick up relevant properties */
   initially_unmapped = Fplist_get (props, Qinitially_unmapped, Qnil);
@@ -143,6 +144,12 @@
       exstyle = MSWINDOWS_FRAME_EXSTYLE;
       hwnd_parent = NULL;
 
+      if (first_frame)
+        {
+	  style |= WS_VISIBLE;
+	  first_frame = 0;
+	}
+
       /* We always create am overlapped frame with default size,
 	 and later adjust only requested geometry parameters. */
       rect_default.left = rect_default.top = CW_USEDEFAULT;