-
Notifications
You must be signed in to change notification settings - Fork 20
/
airline-base16-gui-dark-theme.el
47 lines (34 loc) · 2.88 KB
/
airline-base16-gui-dark-theme.el
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
;;; Code:
(deftheme airline-base16-gui-dark
"Designed for use with the base16 emacs color schemes in the gui
url: https://github.com/mkaito/base16-emacs")
(let ((normal-outer-foreground (face-background 'highlight)) (normal-outer-background (face-foreground 'link))
(normal-inner-foreground (face-foreground 'font-lock-doc-face)) (normal-inner-background (face-background 'fringe))
(normal-center-foreground (face-foreground 'font-lock-doc-face)) (normal-center-background (face-background 'highlight))
(insert-outer-foreground (face-background 'highlight)) (insert-outer-background (face-foreground 'success))
(insert-inner-foreground (face-foreground 'success)) (insert-inner-background (face-background 'default))
(insert-center-foreground (face-foreground 'font-lock-doc-face)) (insert-center-background (face-background 'highlight))
(visual-outer-foreground (face-background 'highlight)) (visual-outer-background (face-foreground 'warning))
(visual-inner-foreground (face-foreground 'warning)) (visual-inner-background (face-background 'default))
(visual-center-foreground (face-foreground 'font-lock-doc-face)) (visual-center-background (face-background 'highlight))
(replace-outer-foreground (face-background 'highlight)) (replace-outer-background (face-foreground 'error))
(replace-inner-foreground (face-foreground 'font-lock-doc-face)) (replace-inner-background (face-background 'fringe))
(replace-center-foreground (face-foreground 'font-lock-doc-face)) (replace-center-background (face-background 'highlight))
(emacs-outer-foreground (face-background 'highlight)) (emacs-outer-background (face-foreground 'link-visited))
(emacs-inner-foreground (face-foreground 'font-lock-doc-face)) (emacs-inner-background (face-background 'fringe))
(emacs-center-foreground (face-foreground 'font-lock-doc-face)) (emacs-center-background (face-background 'highlight))
(inactive1-foreground (face-foreground 'font-lock-doc-face)) (inactive1-background (face-foreground 'highlight))
(inactive2-foreground (face-foreground 'font-lock-doc-face)) (inactive2-background (face-foreground 'highlight))
(inactive3-foreground (face-foreground 'font-lock-doc-face)) (inactive3-background (face-foreground 'highlight)))
(airline-themes-set-deftheme 'airline-base16-gui-dark)
(when airline-cursor-colors
(progn
(setq evil-emacs-state-cursor emacs-outer-background)
(setq evil-normal-state-cursor normal-outer-background)
(setq evil-insert-state-cursor `(bar ,insert-outer-background))
(setq evil-replace-state-cursor replace-outer-background)
(setq evil-visual-state-cursor visual-outer-background)))
)
(airline-themes-set-modeline)
(provide-theme 'airline-base16-gui-dark)
;;; airline-base16-gui-dark-theme.el ends here