diff options
| author | Richard M. Stallman <[email protected]> | 1997-07-21 05:59:08 +0000 |
|---|---|---|
| committer | Richard M. Stallman <[email protected]> | 1997-07-21 05:59:08 +0000 |
| commit | 96a84970c34f09a091132ddbf4a184a3b079cf59 (patch) | |
| tree | d72705b87ca6822bfc66a1f2b034098faf91433b /lisp/frame.el | |
| parent | 2124851f281f6c2569bc39d263dd5eb45c31f630 (diff) | |
(frame-initialize): Don't alter vertical-scroll-bars
parameter here.
Diffstat (limited to 'lisp/frame.el')
| -rw-r--r-- | lisp/frame.el | 8 |
1 files changed, 1 insertions, 7 deletions
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, |