From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 21 Jul 1997 05:59:08 +0000 (+0000)
Subject: (frame-initialize): Don't alter vertical-scroll-bars
X-Git-Tag: emacs-20.1~1054
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=96a84970c34f09a091132ddbf4a184a3b079cf59;p=emacs.git

(frame-initialize): Don't alter vertical-scroll-bars
parameter here.
---

diff --git a/lisp/frame.el b/lisp/frame.el
index f2face1788d..cd23db06c08 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,