TakeV
/
spacemacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

[core] disable internal border (#15843) 

* core/core-spacemacs.el: disable internal border with undecorated frame

* core/core-spacemacs.el: enable maximized-at-startup by default
This commit is contained in:
bb2020 2022-12-10 08:46:38 +03:00 committed by GitHub
parent 3be65c7354
commit 866a2d5ae1
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
core/core-dotspacemacs.el
View File

@ -472,7 +472,7 @@ to disable fullscreen animations on macOS."
'boolean
'spacemacs-dotspacemacs-init)
(spacemacs|defc dotspacemacs-maximized-at-startup nil
(spacemacs|defc dotspacemacs-maximized-at-startup t
"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."
'boolean

4
core/core-spacemacs.el
View File

@ -94,7 +94,9 @@ the final step of executing code in `emacs-startup-hook'.")
(when dotspacemacs-undecorated-at-startup
;; this should be called before toggle-frame-maximized
(set-frame-parameter nil 'undecorated t)
(add-to-list 'default-frame-alist '(undecorated . t)))
(set-frame-parameter nil 'internal-border-width 0)
(add-to-list 'default-frame-alist '(undecorated . t))
(add-to-list 'default-frame-alist '(internal-border-width . 0)))
(when dotspacemacs-maximized-at-startup
(unless (frame-parameter nil 'fullscreen)
(toggle-frame-maximized))

8
core/templates/.spacemacs.template
View File

@ -359,12 +359,12 @@ It should only modify the values of Spacemacs settings."
;; If non-nil the frame is maximized when Emacs starts up.
;; Takes effect only if `dotspacemacs-fullscreen-at-startup' is nil.
;; (default nil) (Emacs 24.4+ only)
dotspacemacs-maximized-at-startup nil
;; (default t) (Emacs 24.4+ only)
dotspacemacs-maximized-at-startup t
;; If non-nil the frame is undecorated when Emacs starts up. Combine this
;; variable with `dotspacemacs-maximized-at-startup' in OSX to obtain
;; borderless fullscreen. (default nil)
;; variable with `dotspacemacs-maximized-at-startup' to obtain fullscreen
;; without external boxes. Also disables the internal border. (default nil)
dotspacemacs-undecorated-at-startup nil
;; A value from the range (0..100), in increasing opacity, which describes