From 96a84970c34f09a091132ddbf4a184a3b079cf59 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 21 Jul 1997 05:59:08 +0000 Subject: (frame-initialize): Don't alter vertical-scroll-bars parameter here. --- lisp/frame.el | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) (limited to 'lisp/frame.el') diff --git a/lisp/frame.el b/lisp/frame.el index f2face1788..cd23db06c0 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -169,19 +169,13 @@ These supersede the values given in `default-frame-alist'." (progn (setq frame-initial-frame-alist (append initial-frame-alist default-frame-alist)) - ;; Record these with their default values - ;; if they don't have any values explicitly. - (or (assq 'vertical-scroll-bars frame-initial-frame-alist) - (setq frame-initial-frame-alist - (cons '(vertical-scroll-bars . t) - frame-initial-frame-alist))) (or (assq 'horizontal-scroll-bars frame-initial-frame-alist) (setq frame-initial-frame-alist (cons '(horizontal-scroll-bars . t) frame-initial-frame-alist))) (setq default-minibuffer-frame (setq frame-initial-frame - (make-frame initial-frame-alist))) + (make-frame 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, -- cgit v1.2.3