changeset 42932:5676a5820a04

(x-handle-geometry): Put sizes on both initial-frame-alist and default-frame-alist.
author Richard M. Stallman <rms@gnu.org>
date Thu, 24 Jan 2002 19:20:12 +0000
parents 0c70cb5b2661
children 1d21c0e2179b
files lisp/term/x-win.el
diffstat 1 files changed, 5 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/term/x-win.el	Thu Jan 24 18:56:45 2002 +0000
+++ b/lisp/term/x-win.el	Thu Jan 24 19:20:12 2002 +0000
@@ -153,6 +153,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