]> git.eshelyaron.com Git - emacs.git/commitdiff
(frame-initialize): Don't alter vertical-scroll-bars
authorRichard M. Stallman <rms@gnu.org>
Mon, 21 Jul 1997 05:59:08 +0000 (05:59 +0000)
committerRichard M. Stallman <rms@gnu.org>
Mon, 21 Jul 1997 05:59:08 +0000 (05:59 +0000)
parameter here.

lisp/frame.el

index f2face1788d9420ce278db827b1bbb9d890864fd..cd23db06c0854bf556b26358bcfa2a6904bc8272 100644 (file)
@@ -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,