bascht
/
dotfiles
1
0
Fork 0
Code Issues 2 Pull Requests Actions Packages Projects Releases Activity

[doom] Clean up config.el a bit and add some of hlissners performance tips

This commit is contained in:
Sebastian Schulze 2022-08-10 21:49:51 +02:00
parent bc794b795a
commit 084d1a1cfb
No known key found for this signature in database
GPG Key ID: F6BA63C6A7D3044E
1 changed files with 25 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
dot_doom.d/config.el.tmpl
View File

@ -10,6 +10,7 @@
doom-font (font-spec :family "JetBrains Mono" :size 14) doom-font (font-spec :family "JetBrains Mono" :size 14)
doom-variable-pitch-font (font-spec :family "Iosevka Term" :size 14) doom-variable-pitch-font (font-spec :family "Iosevka Term" :size 14)
doom-theme (if (bascht/is-comacs) 'doom-one-light 'modus-operandi) doom-theme (if (bascht/is-comacs) 'doom-one-light 'modus-operandi)
doom-modeline-height 23
org-directory "~/Documents/Zettelkasten/" org-directory "~/Documents/Zettelkasten/"
bascht/wzzk "~/WirZwei/Zettelkasten" bascht/wzzk "~/WirZwei/Zettelkasten"
bascht/wzzk-journals "~/WirZwei/Zettelkasten/journals" bascht/wzzk-journals "~/WirZwei/Zettelkasten/journals"
@ -166,7 +167,7 @@
(t . (semilight 1.1))))) (t . (semilight 1.1)))))
; Don't add #0 #1 #2 #3… workspaces :D ; Don't add #0 #1 #2 #3… workspaces :D
(after! persp-mode (after! persp
(setq persp-emacsclient-init-frame-behaviour-override "main")) (setq persp-emacsclient-init-frame-behaviour-override "main"))
; Directly create a matching workspace for the project (when launched with `bin/tn') ; Directly create a matching workspace for the project (when launched with `bin/tn')
@ -195,25 +196,25 @@
(add-to-list 'auto-mode-alist '("\\.txt$" . markdown-mode)) (add-to-list 'auto-mode-alist '("\\.txt$" . markdown-mode))
(add-to-list 'auto-mode-alist '("\\.journal\\'" . ledger-mode)) (add-to-list 'auto-mode-alist '("\\.journal\\'" . ledger-mode))
(add-hook 'yaml-mode-hook (add-hook! 'yaml-mode-hook
(lambda () (setq auto-fill-mode -1)
(auto-fill-mode -1) (flycheck-select-checker 'yaml-yamllint))
(flycheck-select-checker 'yaml-yamllint)
))
(add-hook 'git-commit-mode-hook (lambda () (add-hook! 'git-commit-mode-hook
(end-of-line) (end-of-line)
(spell-fu-mode)
(bascht/switch-spellcheck "en_GB") (bascht/switch-spellcheck "en_GB")
(evil-insert-state))) (evil-insert-state))
(add-hook 'org-capture-mode-hook (lambda () (add-hook! 'org-capture-mode-hook
(bascht/switch-spellcheck "de_DE") (bascht/switch-spellcheck "de_DE")
(evil-insert-state))) (evil-insert-state))
(add-hook 'mu4e-compose-pre-hook (lambda () (add-hook! 'mu4e-compose-pre-hook
(bascht/mu4e-change-from-to-catchall mu4e-compose-parent-message) (bascht/mu4e-change-from-to-catchall mu4e-compose-parent-message)
(spell-fu-mode)
(bascht/switch-spellcheck "de_DE") (bascht/switch-spellcheck "de_DE")
(evil-insert-state))) (evil-insert-state))
(defun bascht/markdown-do () (defun bascht/markdown-do ()
"Keep markdown-do from straight away going into gfm-mode and adding checkboxes" "Keep markdown-do from straight away going into gfm-mode and adding checkboxes"
@ -224,7 +225,7 @@
(t (t
(markdown-do)))) (markdown-do))))
(after! markdown-mode (after! markdown
(setq markdown-enable-wiki-links t (setq markdown-enable-wiki-links t
markdown-wiki-link-search-type '(sub-directories parent-directories) markdown-wiki-link-search-type '(sub-directories parent-directories)
markdown-wiki-link-fontify-missing t markdown-wiki-link-fontify-missing t
@ -253,16 +254,23 @@
{{ end -}} {{ end -}}
)) ))
(custom-set-faces (after! dap
'(mu4e-header-highlight-face ((t (:background "lemon chiffon")))))
(after! dap-mode
(unless (display-graphic-p) (unless (display-graphic-p)
(set-face-background 'dap-ui-marker-face "orange") (set-face-background 'dap-ui-marker-face "orange")
(set-face-attribute 'dap-ui-marker-face nil :inherit nil) (set-face-attribute 'dap-ui-marker-face nil :inherit nil)
(set-face-background 'dap-ui-pending-breakpoint-face "lightpink") (set-face-background 'dap-ui-pending-breakpoint-face "lightpink")
(set-face-attribute 'dap-ui-verified-breakpoint-face nil :inherit 'dap-ui-pending-breakpoint-face))) (set-face-attribute 'dap-ui-verified-breakpoint-face nil :inherit 'dap-ui-pending-breakpoint-face)))
(custom-set-faces
'(mode-line ((t (:family "Iosevka Aile" :height 1.0))))
'(mode-line-active ((t (:family "Iosevka Aile" :height 1.0)))) ; For 29+
'(mode-line-inactive ((t (:family "Iosevka Aile" :height 1.0))))
'(mu4e-header-highlight-face ((t (:background "lemon chiffon"))))
'(org-document-title ((t (:height 1.5 :underline nil))))
'(org-level-1 ((t (:height 1.3 :weight normal))))
'(org-level-2 ((t (:height 1.2 :weight light))))
'(org-level-3 ((t (:height 1.1 :weight light)))))
(load! "mail.el") (load! "mail.el")
(if (not (bascht/is-comacs)) (if (not (bascht/is-comacs))
(load! "org.el")) (load! "org.el"))