daniel/emacs
1
2
Fork 0
Code Issues 7 Pull Requests Projects Releases Wiki Activity

move default frame settings to early init file

Browse Source
This commit is contained in:
Daniel Weschke
2022-01-16 12:40:42 +01:00
parent 2ffe448212
commit c65ffe449e
3 changed files with 10 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
early-init.el Normal file
View File

@@ -0,0 +1,8 @@
;; (add-to-list 'default-frame-alist '(fullscreen . maximized)) ;; restore saved geometry, see gui-settings.el my-frame-geometry-
(add-to-list 'default-frame-alist '(tool-bar-position . left))
;; (add-to-list 'default-frame-alist '(horizontal-scroll-bars . t)) ;; see gui-settings
;; transparency
(set-frame-parameter (selected-frame) 'alpha '(95 . 95)) ;; VALUE: '(<active> . <inactive>) / <both>
(add-to-list 'default-frame-alist '(alpha . (95 . 95)))

15
settings/general-settings.el
View File

@@ -9,22 +9,7 @@
;; Change "yes or no" to "y or n" ;; Change "yes or no" to "y or n"
(fset 'yes-or-no-p 'y-or-n-p) (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 ;; 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 () (defun transparency-p ()
"Toggle transparency of the frame." "Toggle transparency of the frame."
(let ((alpha (frame-parameter nil 'alpha))) (let ((alpha (frame-parameter nil 'alpha)))

4
settings/org-settings.el
View File

@@ -328,10 +328,10 @@ Example defines
(use-package org-appear (use-package org-appear
:hook (org-mode . org-appear-mode) :hook (org-mode . org-appear-mode)
:config :config
(setq org-appear-autoentities t) ;; toogle entities: \alpha -> ɑ, needs `org-pretty-entries' active (setq org-appear-autoentities t) ;; toogle entities: \alpha -> ɑ, needs `org-pretty-entities' active
(setq org-appear-autoemphasis t) ;; toggle emphasis markers, t by default, needs `org-hide-emphasis-markers' active (setq org-appear-autoemphasis t) ;; toggle emphasis markers, t by default, needs `org-hide-emphasis-markers' active
(setq org-appear-autolinks t) ;; toogle links, needs `org-link-descriptive' active (setq org-appear-autolinks t) ;; toogle links, needs `org-link-descriptive' active
(setq org-appear-autosubmarkers t) ;; toogle subscripts and superscripts: ^3 -> ³, needs `org-pretty-entries' active (setq org-appear-autosubmarkers t) ;; toogle subscripts and superscripts: ^3 -> ³, needs `org-pretty-entities' active
(setq org-appear-autokeywords t)) ;; toogle keywords: #+TITLE: foo -> foo, needs `org-hidden-keywords' active (setq org-appear-autokeywords t)) ;; toogle keywords: #+TITLE: foo -> foo, needs `org-hidden-keywords' active
(use-package org-brain ;; uses org-id If you find that org-brain is missing entries, or list entries which doesn’t exist, try using M-x org-brain-update-id-locations, which syncs the org-brain entries with the org-id caching system. (use-package org-brain ;; uses org-id If you find that org-brain is missing entries, or list entries which doesn’t exist, try using M-x org-brain-update-id-locations, which syncs the org-brain entries with the org-id caching system.