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
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
|
(require 'jao-themes)
(setq zenburn-override-colors-alist
`(("zenburn-magenta" . "thistle")
("zenburn-cyan" . "LightSteelBlue1")
("zenburn-blue+1" . "LemonChiffon")
("zenburn-blue" . "LemonChiffon1")
("zenburn-blue-1" . "LemonChiffon2")
("zenburn-blue-2" . "LemonChiffon3")
("zenburn-blue-3" . "LemonChiffon4")
("zenburn-blue-4" . "cadet blue")
("zenburn-blue-5" . "dark cyan")))
(use-package zenburn-theme :ensure t)
;; (setq zenburn-colors-alist
;; (append zenburn-default-colors-alist
;; zenburn-override-colors-alist))
(load-theme 'zenburn t)
(zenburn-with-color-variables
(let* ((box '(:box (:line-width 1 :color "grey35")))
(f (jao-themes-parse-faces
`((circe-my-message-face (c "gray70"))
(circe-originator-face (c ,zenburn-yellow-1))
(compilation-info (c ,zenburn-yellow) nul)
(compilation-error (c ,zenburn-red+1) nul)
(custom-button ,@box it)
(dictionary-word-definition-face nil)
(diff-hl-change (c nil ,zenburn-blue-3))
(diff-hl-delete (c nil ,zenburn-red-1))
(diff-hl-insert (c nil ,zenburn-green-1))
(diredp-date-time (c ,zenburn-yellow))
(diredp-dir-name (c ,zenburn-blue-2) bf)
(diredp-exec-priv (c ,zenburn-yellow-2))
(diredp-write-priv (c ,zenburn-yellow-2))
(emms-browser-artist-face (c ,zenburn-yellow-1))
(emms-browser-composer-face (~ emms-browser-artist-face))
(emms-browser-performer-face (~ emms-browser-artist-face))
(emms-browser-year-face (~ emms-browser-artist-face))
(emms-browser-year/genre-face (~ emms-browser-artist-face))
(fill-column-indicator (c ,zenburn-bg+1))
(font-lock-function-name-face (c ,zenburn-yellow) nbf)
(fringe (c ,zenburn-fg-05 nil))
(gnus-cite-1 (c "#b8b8b0"))
(gnus-cite-2 (c ,zenburn-fg-05))
(gnus-cite-3 (c ,zenburn-fg-05))
(gnus-cite-4 (c ,zenburn-fg-05))
(gnus-group-mail-1 (c ,zenburn-yellow))
(gnus-group-mail-2 (c ,zenburn-yellow))
(gnus-group-mail-3 (c ,zenburn-yellow))
(gnus-group-mail-4 (c ,zenburn-yellow))
(gnus-group-mail-5 (c ,zenburn-yellow))
(gnus-group-mail-6 (c ,zenburn-yellow))
(gnus-group-news-1 (c ,zenburn-yellow))
(gnus-group-news-2 (c ,zenburn-yellow))
(gnus-group-news-3 (c ,zenburn-yellow))
(gnus-group-news-4 (c ,zenburn-yellow))
(gnus-group-news-5 (c ,zenburn-yellow))
(gnus-group-news-6 (c ,zenburn-yellow))
(gnus-group-news-1-empty (c ,zenburn-fg-05))
(gnus-group-news-2-empty (c ,zenburn-fg-05))
(gnus-group-news-3-empty (c ,zenburn-fg-05))
(gnus-group-news-4-empty (c ,zenburn-fg-05))
(gnus-group-news-5-empty (c ,zenburn-fg-05))
(gnus-group-news-6-empty (c ,zenburn-fg-05))
(gnus-summary-cancelled (c ,zenburn-red) st)
(gnus-summary-normal-ancient (c ,zenburn-fg-05))
(header-line (c ,zenburn-fg ,zenburn-bg+1))
(isearch (c nil ,zenburn-bg+1))
(ivy-confirm (c ,zenburn-blue))
(ivy-current-match (c ,zenburn-orange))
(ivy-highlight-face (c ,zenburn-bg-08))
(ivy-match-required-face (c ,zenburn-orange))
(ivy-minibuffer-match-highlight (c nil nil))
(ivy-minibuffer-match-face-1 (c ,zenburn-yellow-2) ul)
(ivy-minibuffer-match-face-2 (c ,zenburn-yellow-2) ul)
(ivy-minibuffer-match-face-3 (c ,zenburn-yellow-2) ul)
(ivy-minibuffer-match-face-4 (c ,zenburn-yellow-2) ul)
(ivy-modified-buffer it)
(ivy-subdir (c ,zenburn-green+2))
(link (c ,zenburn-yellow) nbf nul)
(link-visited (c ,zenburn-yellow-2) nbf nul)
(lui-button-face (c ,zenburn-green+2))
(lui-time-stamp-face (c ,zenburn-bg+3))
(magit-diff-added-highlight (c ,zenburn-fg+1 ,zenburn-green))
(magit-hash (c ,zenburn-green))
(match (c ,zenburn-orange) nbf)
(mm-uu-extract (c nil ,zenburn-bg+1))
(mode-line (c ,zenburn-fg ,zenburn-bg+1) ,@box)
(mode-line-buffer-id (c ,zenburn-yellow nil) bf)
(mode-line-buffer-id-inactive (c ,zenburn-fg-1 nil) nbf)
(mode-line-inactive (~ header-line) ,@box)
(org-block nil)
(org-ellipsis (c ,zenburn-yellow) nul bf)
(powerline-active1 (c nil ,zenburn-bg+1))
(powerline-active2 (c nil ,zenburn-bg+3))
(powerline-inactive1 (c nil ,zenburn-bg+1))
(powerline-inactive2 (c nil ,zenburn-bg+2))
(rcirc-track-nick (c ,zenburn-orange))
(spaceline-read-only (c "black" ,zenburn-blue-3))
(spaceline-modified (c "black" ,zenburn-blue-2))
(spaceline-unmodified (c nil ,zenburn-green-1))
(slack-channel-button-face (~ link))
(slack-message-mention-face (p f01))
(slack-message-mention-keyword-face (p f01))
(slack-message-mention-me-face (p error))
(slack-message-output-header (c ,zenburn-yellow) it)
(slack-message-output-text nil)
(slack-new-message-marker-face (p warning))
(slack-preview-face (c ,zenburn-green))
(slack-search-result-message-header-face it)
(slack-user-profile-header-face (p f01))
(slack-user-profile-property-name-face bf)
(TeX-error-description-error (c ,zenburn-red))
(vertical-border (c ,zenburn-bg+2))
(w3m-anchor (~ link))
(w3m-arrived-anchor (~ visited-link))
(w3m-form-button (c ,zenburn-green+2 ,zenburn-bg+1))
(w3m-header-line-location-content (c ,zenburn-yellow))
(w3m-header-line-location-title nil)
(w3m-image-anchor (~ w3m-anchor) (c nil ,zenburn-bg+2))
(w3m-tab-background (~ mode-line))
(w3m-tab-selected (c ,zenburn-red+1 ,zenburn-bg) bf bx)
(w3m-tab-unselected (c ,zenburn-fg "grey30") bx)
(w3m-tab-selected-background (~ w3m-tab-selected))
(w3m-tab-unselected-unseen (~ w3m-tab-unselected))))))
(apply 'custom-theme-set-faces (cons 'zenburn f))
(custom-theme-set-variables 'zenburn `(fci-rule-color ,zenburn-bg+1))))
(provide 'jao-zenburn-theme)
|
