Tweak new variable dotspacemacs-maximized-at-startup

This commit is contained in:
syl20bnr 2014-12-15 21:13:01 -05:00
parent d9f670784b
commit 1be173774a
3 changed files with 11 additions and 9 deletions

View File

@ -22,10 +22,11 @@ with `:' and Emacs commands are executed with `<leader> :'.")
"Guide-key delay in seconds.")
(defvar dotspacemacs-fullscreen-at-startup nil
"If non nil the frame put in fullscreen when Emacs starts up (Emacs 24.4+ only).")
"If non nil the frame is fullscreen when Emacs starts up (Emacs 24.4+ only).")
(defvar dotspacemacs-maximized-at-startup nil
"If non nil the frame is maximized when Emacs starts up (Emacs 24.4+ only).")
"If non nil the frame is maximized when Emacs starts up (Emacs 24.4+ only).
Takes effect only if `dotspacemacs-fullscreen-at-startup' is nil.")
(defvar dotspacemacs-smooth-scrolling t
"If non nil smooth scrolling (native-scrolling) is enabled. Smooth scrolling

View File

@ -31,8 +31,11 @@
;; Guide-key delay in seconds. The Guide-key is the popup buffer listing
;; the commands bound to the current keystrokes.
dotspacemacs-guide-key-delay 0.4
;; If non nil the frame is maximized when Emacs starts up (Emacs 24.4+ only)
;; If non nil the frame is fullscreen when Emacs starts up (Emacs 24.4+ only).
dotspacemacs-fullscreen-at-startup nil
;; If non nil the frame is maximized when Emacs starts up (Emacs 24.4+ only).
;; Takes effect only if `dotspacemacs-fullscreen-at-startup' is nil.
dotspacemacs-maximized-at-startup nil
;; If non nil smooth scrolling (native-scrolling) is enabled. Smooth scrolling
;; overrides the default behavior of Emacs which recenters the point when
;; it reaches the top or bottom of the screen

View File

@ -136,12 +136,10 @@ Can be installed with `brew install trash'."
;; Emacs 24.4 new features
(unless (version< emacs-version "24.4")
(if (and (boundp 'dotspacemacs-fullscreen-at-startup)
dotspacemacs-fullscreen-at-startup)
(toggle-frame-fullscreen))
(if (and (boundp 'dotspacemacs-maximized-at-startup)
dotspacemacs-maximized-at-startup)
(toggle-frame-maximized)))
(if dotspacemacs-fullscreen-at-startup
(toggle-frame-fullscreen)
(if dotspacemacs-maximized-at-startup
(toggle-frame-maximized))))
;; ---------------------------------------------------------------------------
;; Session