# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1046881973 0
# Node ID 601653a63afc03e0f3ccebaf5ef537ab3ac89800
# Parent  95d928fb74f3fce529265875468d213838ff3f82
(x-handle-geometry): Put sizes on `initial-frame-alist' too.

diff -r 95d928fb74f3 -r 601653a63afc lisp/term/w32-win.el
--- a/lisp/term/w32-win.el	Wed Mar 05 16:31:44 2003 +0000
+++ b/lisp/term/w32-win.el	Wed Mar 05 16:32:53 2003 +0000
@@ -206,6 +206,11 @@
 	      (append default-frame-alist
 		      '((user-size . t))
 		      (if height (list height))
+		      (if width (list width)))
+	      initial-frame-alist
+	      (append initial-frame-alist
+		      '((user-size . t))
+		      (if height (list height))
 		      (if width (list width)))))
     (if (or left top)
 	(setq initial-frame-alist