move default frame settings to early init file

This commit is contained in:
2022-01-16 12:40:42 +01:00
parent 2ffe448212
commit c65ffe449e
3 changed files with 10 additions and 17 deletions

View File

@@ -9,22 +9,7 @@
;; Change "yes or no" to "y or n"
(fset 'yes-or-no-p 'y-or-n-p)
;; default-frame-alist not empty
(mapc (lambda (item)
(add-to-list 'default-frame-alist item)
)
'(
;;(fullscreen . maximized) ;; restore saved geometry, see gui-settings.el my-frame-geometry-
(tool-bar-position . left)
;;(horizontal-scroll-bars . t) ;; see gui-settings
)
)
;; transparency
;;(set-frame-parameter (selected-frame) 'alpha '(<active> . <inactive>))
;;(set-frame-parameter (selected-frame) 'alpha <both>)
(set-frame-parameter (selected-frame) 'alpha '(95 . 95))
(add-to-list 'default-frame-alist '(alpha . (95 . 95)))
(defun transparency-p ()
"Toggle transparency of the frame."
(let ((alpha (frame-parameter nil 'alpha)))