1 ;;; naquadah-theme.el --- A color theme
3 ;; Copyright (C) 2011 Julien Danjou
5 ;; Authors: Julien Danjou <julien@danjou.info>
7 ;; This file is NOT part of GNU Emacs.
9 ;; GNU Emacs is free software: you can redistribute it and/or modify
10 ;; it under the terms of the GNU General Public License as published by
11 ;; the Free Software Foundation, either version 3 of the License, or
12 ;; (at your option) any later version.
14 ;; GNU Emacs is distributed in the hope that it will be useful,
15 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
16 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 ;; GNU General Public License for more details.
19 ;; You should have received a copy of the GNU General Public License
20 ;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
27 (let ((light-blue "#72A0CF")
28 (pale-yellow "#D4F77F")
35 (violet-blue "#5337AD")
38 (background "#252A2B")
40 (custom-theme-set-faces
42 `(default ((((min-colors 4096)) (:background ,background :foreground "#eeeeec"))))
43 `(shadow ((t (:foreground ,shadow))))
44 '(cursor ((t (:background "#aa0000"))))
45 '(hl-line ((t (:background "#191919"))))
46 '(highlight ((t (:background "brown1" :foreground nil))))
47 '(fringe ((t (:background "gray10"))))
48 '(mode-line ((t (:foreground "#fafafa" :background "#000000" :box (:line-width 1 :color "#444444")))))
49 '(mode-line-inactive ((t (:foreground "#888888" :background "#2c2f2f" :box (:line-width 1 :color "black")))))
50 `(mode-line-buffer-id ((t (:bold t :foreground ,orange))))
51 '(header-line ((t (:foreground "#dddddd" :background "#1e2426" :box (:line-width 1 :color "#444444")))))
52 '(region ((t (:background "grey30"))))
53 `(link ((t (:underline t :foreground ,light-blue))))
54 '(custom-link ((t (:inherit 'link))))
55 '(match ((t (:bold t :background "#e9b96e" :foreground "#2e3436"))))
56 '(tooltip ((t (:inherit 'variable-pitch :foreground "LightYellow" :background "black"))))
57 '(bold ((t (:bold t :underline nil :background nil))))
58 '(italic ((t (:italic t :underline nil :background nil))))
59 `(font-lock-builtin-face ((t (:foreground ,light-blue))))
60 '(font-lock-comment-face ((t (:inherit 'shadow :italic t))))
61 '(font-lock-comment-delimiter-face ((t (:inherit 'font-lock-comment-face))))
62 `(font-lock-constant-face ((t (:foreground ,green))))
63 '(font-lock-doc-face ((t (:inherit 'shadow))))
64 '(font-lock-keyword-face ((t (:inherit 'font-lock-builtin-face :bold t))))
65 `(font-lock-string-face ((t (:foreground ,violet))))
66 '(font-lock-type-face ((t (:inherit 'font-lock-constant-face :bold t))))
67 `(font-lock-variable-name-face ((t (:foreground ,tomato))))
68 `(font-lock-warning-face ((t (:bold t :foreground ,orange))))
69 `(font-lock-function-name-face ((t (:foreground ,yellow :bold t))))
70 '(comint-highlight-input ((t (:italic t :bold t))))
71 `(comint-highlight-prompt ((t (:foreground ,green))))
72 `(isearch ((t (:background ,orange :foreground ,background))))
73 `(show-paren-match-face ((t (:background ,green))))
74 `(show-paren-mismatch-face ((t (:background ,violet))))
75 `(minibuffer-prompt ((t (:foreground ,light-blue :bold t))))
76 `(info-xref ((t (:foreground ,light-blue))))
77 `(info-xref-visited ((t (:foreground ,violet))))
78 '(widget-button ((t (:bold t))))
79 `(widget-mouse-face ((t (:bold t :foreground "white" :background ,red))))
80 `(widget-field ((t (:foreground ,orange :background "gray30"))))
81 `(widget-single-line-field ((t (:foreground ,orange :background "gray30"))))
82 `(custom-group-tag ((t (:bold t :foreground ,orange :height 1.3))))
83 '(custom-variable-tag ((t (:bold t :foreground "#edd400" :height 1.1))))
84 '(custom-face-tag ((t (:bold t :foreground "#edd400" :height 1.1))))
85 `(custom-state-face ((t (:foreground ,light-blue))))
86 '(custom-button ((t (:box (:line-width 1 :style released-button) :background "gray50" :foreground "black"))))
87 '(custom-variable-button ((t (:inherit 'custom-button))))
88 '(custom-button-mouse ((t (:inherit 'custom-button :background "gray60"))))
89 '(custom-button-unraised ((t (:background "gray50" :foreground "black"))))
90 '(custom-button-mouse-unraised ((t (:inherit 'custom-button-unraised :background "gray60"))))
91 '(custom-button-pressed ((t (:inherit 'custom-button :box (:style pressed-button)))))
92 '(custom-button-mouse-pressed-unraised ((t (:inherit 'custom-button-unraised :background "gray60"))))
93 '(custom-documentation ((t (:italic t))))
94 '(gnus-cite-face-1 ((t (:foreground "#ad7fa3"))))
95 '(gnus-cite-face-2 ((t (:foreground "sienna3"))))
96 '(gnus-cite-face-3 ((t (:foreground "khaki4"))))
97 '(gnus-cite-face-4 ((t (:foreground "PaleTurquoise4"))))
98 '(gnus-header-name-face ((t (:bold t :foreground "#729fcf"))))
99 '(gnus-header-from ((t (:bold t :foreground "#e0d400"))))
100 '(gnus-header-subject ((t (:foreground "#e0d400"))))
101 '(gnus-header-content ((t (:italic t :foreground "#8ae234"))))
102 '(gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3"))))
103 '(gnus-signature-face ((t (:italic t :foreground "OliveDrab1"))))
104 `(gnus-summary-cancelled-face ((t (:background "black" :foreground ,yellow))))
105 '(gnus-summary-normal-ancient-face ((t (:foreground "medium sea green"))))
106 '(gnus-summary-normal-read-face ((t (:foreground "lime green"))))
107 `(gnus-summary-normal-ticked-face ((t (:foreground ,tomato))))
108 '(gnus-summary-normal-unread-face ((t (:foreground "white"))))
109 '(gnus-summary-high-ancient-face ((t (:inherit 'gnus-summary-normal-ancient-face))))
110 '(gnus-summary-high-read-face ((t (:inherit 'gnus-summary-normal-read-face))))
111 `(gnus-summary-high-ticked-face ((t (:inherit 'gnus-summary-normal-ticked-face)))))
112 '(gnus-summary-high-unread-face ((t (:inherit 'gnus-summary-normal-unread-face))))
113 '(gnus-summary-low-ancient-face ((t (:inherit 'gnus-summary-normal-ancient-face) :italic t)))
114 '(gnus-summary-low-read-face ((t (:inherit 'gnus-summary-normal-read-face :italic t))))
115 '(gnus-summary-low-ticked-face ((t (:inherit 'gnus-summary-normal-ticked-face :italic t))))
116 '(gnus-summary-low-unread-face ((t (:inherit 'gnus-summary-normal-unread-face :italic t))))
117 '(spam-face ((t (:background "black" :foreground "magenta3"))))
118 `(gnus-summary-selected ((t (:background ,light-blue :foreground "white"))))
119 '(message-header-name-face ((t (:foreground "#729cfc"))))
120 '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3"))))
121 '(message-header-other-face ((t (:foreground "LightSkyBlue3"))))
122 '(message-header-xheader-face ((t (:foreground "DodgerBlue3"))))
123 '(message-header-subject ((t (:foreground "white"))))
124 '(message-header-to ((t (:foreground "white"))))
125 '(message-header-cc ((t (:foreground "white"))))
126 '(org-hide ((t (:foreground "#252a2b"))))
127 '(org-level-1 ((t (:bold t :foreground "#4788cc" :height 1.2))))
128 '(org-level-2 ((t (:bold t :foreground "#6ac214" :height 1.1))))
129 '(org-level-3 ((t (:bold t :foreground "#edd400" :height 1.0))))
130 '(org-level-4 ((t (:bold t :foreground "tomato" :height 1.0))))
131 '(org-footnote ((t (:underline t :foreground "magenta3"))))
132 '(org-link ((t (:foreground "SkyBlue2"))))
133 '(org-special-keyword ((t (:foreground "brown1"))))
134 '(org-verbatim ((t (:foreground "#eeeeec" :underline t :slant italic))))
135 '(org-block ((t (:foreground "#bbbbbc"))))
136 '(org-quote ((t (:inherit org-block :slant italic))))
137 '(org-verse ((t (:inherit org-block :slant italic))))
138 '(org-todo ((t (:bold t :foreground "#ff2020"))))
139 '(org-done ((t (:bold t :foreground "forest green"))))
140 '(org-mode-line-clock ((t (:foreground "#cc77ff" :background nil))))
141 '(org-date ((t (:underline nil :foreground "#edd466" :background nil))))
142 '(org-agenda-date ((t (:underline nil :foreground "SkyBlue2" :height 1.2))))
143 '(org-agenda-date-today ((t (:inherit org-agenda-date :foreground "#edd466" :weight bold))))
144 '(org-agenda-date-telecommuting ((t (:inherit org-agenda-date :foreground "#ffbb22" :weight bold))))
145 '(org-agenda-date-weekend ((t (:inherit org-agenda-date :foreground "brown3" :weight bold))))
146 '(anything-header ((t (:bold t :background "gray15" :foreground "#edd400"))))
147 '(egocentric-face ((t (:foreground "#ff4289" :weight bold))))
148 '(erc-direct-msg-face ((t (:foreground "#ee5577"))))
149 '(erc-header-line ((t (:background "black" :foreground "white"))))
150 '(erc-input-face ((t (:foreground "gray70"))))
151 '(erc-my-nick-face ((t (:inherit egocentric-face :weight thin :foreground nil))))
152 '(erc-notice-face ((t (:foreground "light blue" :weight thin))))
153 '(erc-prompt-face ((t (:background "black" :foreground "gray80" :weight bold))))
154 '(erc-timestamp-face ((t (:foreground "gray70" :weight bold))))
155 '(erc-pal-face ((t (:foreground "DarkOliveGreen3" :weight bold))))
156 '(erc-fool-face ((t (:foreground "gray60" :weight thin))))
157 '(erc-current-nick-face ((t (:inherit egocentric-face :weight thin :foreground nil))))
158 '(ido-subdir ((t (:foreground "orange1"))))
159 '(which-func ((t (:foreground "#729cfc"))))
160 '(mm-uu-extract ((t (:background "#404040"))))
161 `(diff-added ((t (:foreground ,green))))
162 `(diff-changed ((t (:foreground ,orange))))
163 `(diff-removed ((t (:foreground ,red))))
164 '(diff-hunk-header ((t (:bold t))))
165 `(diff-function ((t (:foreground ,orange))))
166 '(diff-header ((t (:background "grey10"))))
167 '(diff-file-header ((t (:background nil :foreground "white"))))
168 '(git-commit-summary-face ((t (:bold t))))
169 `(git-commit-branch-face ((t (:foreground ,orange :bold t))))
170 '(git-commit-nonempty-second-line-face ((t (:foreground "red"))))
171 '(git-commit-comment-face ((t (:inherit font-lock-comment-face))))
172 '(git-commit-known-pseudo-header-face ((t (:inherit gnus-header-name-face))))
173 '(git-commit-pseudo-header-face ((t (:inherit gnus-header-content))))
174 '(rst-level-1-face ((t (:inherit org-level-1 :background nil))))
175 '(rst-level-2-face ((t (:inherit org-level-2 :background nil))))
176 '(rst-level-3-face ((t (:inherit org-level-3 :background nil))))
177 '(rst-level-4-face ((t (:inherit org-level-4 :background nil)))))
179 (provide-theme 'naquadah)
182 ;; no-byte-compile: t
185 ;;; naquadah-theme.el ends here