Mercurial > emacs
changeset 3433:2f5a9b79edf7
(frame-initialize): Delete geometry parms from initial-frame-alist.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 02 Jun 1993 19:10:31 +0000 |
parents | 972428ca06b6 |
children | e7558407ad29 |
files | lisp/frame.el |
diffstat | 1 files changed, 10 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/frame.el Wed Jun 02 18:40:44 1993 +0000 +++ b/lisp/frame.el Wed Jun 02 19:10:31 1993 +0000 @@ -98,6 +98,16 @@ (setq default-minibuffer-frame (setq frame-initial-frame (new-frame initial-frame-alist))) + ;; Delete any specifications for window geometry parameters + ;; so that we won't reapply them in frame-notice-user-settings. + ;; It would be wrong to reapply them then, + ;; because that would override explicit user resizing. + (setq initial-frame-alist + (delq (assq 'height initial-frame-alist) + (delq (assq 'width initial-frame-alist) + (delq (assq 'left initial-frame-alist) + (delq (assq 'top initial-frame-alist) + initial-frame-alist))))) ;; Handle `reverse' as a parameter. (if (cdr (or (assq 'reverse initial-frame-alist) (assq 'reverse default-frame-alist)