willemml/dotfiles.nix
1
0
Fork 0
mirror of https://github.com/willemml/dotfiles.nix.git synced 2025-04-13 19:57:19 +00:00
Code Issues Projects Releases Packages Wiki Activity

Fixes Emacs transparency, fmt init.el

Browse source
This commit is contained in:
willemml 2023-11-18 04:17:14 -08:00
parent 7910b9cc99
commit 1b03aad8dc
Signed by: willemml
GPG key ID: C3DE5DF6198DACBD
1 changed files with 9 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
home/programs/emacs/init.el
View file

@ -14,11 +14,9 @@
(setq inhibit-default-init t) (setq inhibit-default-init t)
;; Transparent background for Emacs in terminal windows. ;; Transparent background for Emacs in terminal windows.
(defun on-after-init () (add-hook 'server-switch-hook
(unless (display-graphic-p (selected-frame)) (lambda ()
(set-face-background 'default "unspecified-bg" (selected-frame)))) (set-face-background 'default "unspecified-bg" (selected-frame))))
(add-hook 'window-setup-hook 'on-after-init)
;; Typically, I only want spaces when pressing the TAB key. I also ;; Typically, I only want spaces when pressing the TAB key. I also
;; want 4 of them. ;; want 4 of them.
@ -91,13 +89,13 @@
(pinentry-start) (pinentry-start)
(let ((org-config (expand-file-name "~/.emacs.d/org-tex-cfg.el"))) (let ((org-config (expand-file-name "~/.emacs.d/org-tex-cfg.el")))
(when (file-exists-p org-config) (when (file-exists-p org-config)
(load-file org-config)) (load-file org-config))
) )
(let ((nix-extraconfig (expand-file-name "~/.emacs.d/nix-extraconfig.el"))) (let ((nix-extraconfig (expand-file-name "~/.emacs.d/nix-extraconfig.el")))
(when (file-exists-p nix-extraconfig) (when (file-exists-p nix-extraconfig)
(load-file nix-extraconfig)) (load-file nix-extraconfig))
) )
(setq org-directory (expand-file-name "~/Documents/org")) (setq org-directory (expand-file-name "~/Documents/org"))