~estraw/.emacs.d

ref: 82d8a14103374d32910496eaface737b993fbb60 .emacs.d/modules/module-appearance.el -rw-r--r-- 2.1 KiB
82d8a141Evan Straw Temporarily disable magit-todos as it was slowing stuff down 4 months ago
                                                                                
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
;; -----------------
;; Configure themes
;; -----------------

(defvar dark-theme 'doom-outrun-electric "The theme to use when in dark mode.")
(defvar light-theme 'doom-acario-light "The theme to use when not in dark mode.")

(defcustom use-dark-mode t
  "Whether or not 'dark mode' should be activated, which uses a dark theme instead
of a light theme."
  :type '(boolean))

(declare-function doom-themes-init (buffer-file-name))

(defun dark-mode-on ()
  (interactive)
  (customize-save-variable 'use-dark-mode t)
  (doom-themes-init))

(defun dark-mode-off ()
  (interactive)
  (customize-save-variable 'use-dark-mode nil)
  (doom-themes-init))

(defun dark-mode-toggle ()
  (interactive)
  (if use-dark-mode
      (dark-mode-off)
    (dark-mode-on)))

(use-package doom-themes
  :config
  (setq doom-themes-enable-bold t      ; If nil, bold is universally disabled
	doom-themes-enable-italic t)   ; If nil, italics is universally disabled
  (defun doom-themes-init ()
    (if use-dark-mode
	(load-theme dark-theme t)
      (load-theme light-theme t))
    (doom-themes-visual-bell-config)
    (doom-themes-org-config))
  (doom-themes-init))

(use-package all-the-icons
  :after (doom-themes))

(use-package flymake
  :config (set-face-attribute 'flymake-warning nil :underline '(:color "yellow" :style wave))
  :defer t)

(use-package doom-modeline
  :init
  (defun doom-modeline-daemon (&optional frame)
    "`doom-modeline' strangely does not behave in a daemon-session.
So we need to fix this ourselves."
    (setq doom-modeline-icon t)
    (setq doom-modeline-height 35))
  (add-hook 'after-make-frame-functions #'doom-modeline-daemon)
  :config
  (setq doom-modeline-buffer-file-name-style 'file-name)
  (doom-modeline-mode)
  (doom-modeline-daemon)
  :after (doom-themes all-the-icons))

(use-package org
  :commands (org-agenda)
  :config
  (set-face-attribute 'org-column nil :background nil)
  (set-face-attribute 'org-column-title nil :background nil))

;; allow splitting narrower windows
(setq split-width-threshold 154)

;; fix font
(set-face-attribute 'default nil :height 110 :width 'normal)

(provide 'module-appearance)