# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1162642889 0
# Node ID 1533f31680e5579e2639f5f3d854f0693915158b
# Parent  dde3145743e4388ca1b0a471e04bf6428e1e06f2
(w32_createwindow): Remove code for handling -geometry command line option and
`initial-frame-alist' which is superfluous after the last change to
`w32_createwindow'.

diff -r dde3145743e4 -r 1533f31680e5 src/w32fns.c
--- a/src/w32fns.c	Sat Nov 04 12:11:21 2006 +0000
+++ b/src/w32fns.c	Sat Nov 04 12:21:29 2006 +0000
@@ -2080,32 +2080,7 @@
 
   if (!hprevinst)
     {
-      Lisp_Object ifa;
-
       w32_init_class (hinst);
-
-      /* Handle the -geometry command line option and the geometry
-	 settings in the registry.  They are decoded and put into
-	 initial-frame-alist by w32-win.el:x-handle-geometry.  */
-      ifa = Fsymbol_value (intern ("initial-frame-alist"));
-      if (CONSP (ifa))
-	{
-	  Lisp_Object lt = Fassq (Qleft, ifa);
-	  Lisp_Object tp = Fassq (Qtop,  ifa);
-
-	  if (!NILP (lt))
-	    {
-	      lt = XCDR (lt);
-	      if (INTEGERP (lt))
-		left = lt;
-	    }
-	  if (!NILP (tp))
-	    {
-	      tp = XCDR (tp);
-	      if (INTEGERP (tp))
-		top = tp;
-	    }
-	}
     }
 
   if (f->size_hint_flags & USPosition || f->size_hint_flags & PPosition)