comparison lisp/term/w32-win.el @ 50028:601653a63afc

(x-handle-geometry): Put sizes on `initial-frame-alist' too.
author Juanma Barranquero <lekktu@gmail.com>
date Wed, 05 Mar 2003 16:32:53 +0000
parents 3b81891b7703
children c9db5a2dc58b
comparison
equal deleted inserted replaced
50027:95d928fb74f3 50028:601653a63afc
202 (height (assq 'height geo)) 202 (height (assq 'height geo))
203 (width (assq 'width geo))) 203 (width (assq 'width geo)))
204 (if (or height width) 204 (if (or height width)
205 (setq default-frame-alist 205 (setq default-frame-alist
206 (append default-frame-alist 206 (append default-frame-alist
207 '((user-size . t))
208 (if height (list height))
209 (if width (list width)))
210 initial-frame-alist
211 (append initial-frame-alist
207 '((user-size . t)) 212 '((user-size . t))
208 (if height (list height)) 213 (if height (list height))
209 (if width (list width))))) 214 (if width (list width)))))
210 (if (or left top) 215 (if (or left top)
211 (setq initial-frame-alist 216 (setq initial-frame-alist