1 ;;; Emacs Color theme based on the Tango Palette colors.
2 ;;; First derived from color-theme-tango.el, created by danranx@gmail.com :
3 ;;; http://www.emacswiki.org/emacs/color-theme-tango.el
5 ;; Copyright (C) 2010 Julien Barnier <julien@nozav.org>
7 ;; Project homepage : http://blog.nozav.org/post/2010/07/12/Updated-tangotango-emacs-color-theme
9 ;; This file is NOT part of GNU Emacs.
11 ;; This is free software; you can redistribute it and/or modify it under
12 ;; the terms of the GNU General Public License as published by the Free
13 ;; Software Foundation; either version 2, or (at your option) any later
16 ;; This file is distributed in the hope that it will be useful, but
17 ;; WITHOUT ANY WARRANTY; without even the implied warranty of
18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 ;; General Public License for more details.
21 ;; You should have received a copy of the GNU General Public License
22 ;; along with Emacs; see the file COPYING, or type `C-h C-c'. If not,
23 ;; write to the Free Software Foundation at this address:
25 ;; Free Software Foundation
26 ;; 51 Franklin Street, Fifth Floor
27 ;; Boston, MA 02110-1301
33 (require 'color-theme
))
35 (defun color-theme-tangotango ()
36 "A color theme based on Tango Palette colors."
38 ;; - blue : "dodger blue"
39 ;; - yellow : "#edd400"
40 ;; - green : "#6ac214"
41 ;; - orange/red : "tomato"
44 '(color-theme-tangotango
45 ((background-color .
"#000000")
46 (background-mode . dark
)
47 (border-color .
"#888a85")
48 (cursor-color .
"#fce94f")
49 (foreground-color .
"#eeeeec")
50 (mouse-color .
"#8ae234"))
51 ((help-highlight-face . underline
)
52 (ibuffer-dired-buffer-face . font-lock-function-name-face
)
53 (ibuffer-help-buffer-face . font-lock-comment-face
)
54 (ibuffer-hidden-buffer-face . font-lock-warning-face
)
55 (ibuffer-occur-match-face . font-lock-warning-face
)
56 (ibuffer-read-only-buffer-face . font-lock-type-face
)
57 (ibuffer-special-buffer-face . font-lock-keyword-face
)
58 (ibuffer-title-face . font-lock-type-face
))
59 (highlight ((t (:background
"brown4" :foreground nil
))))
60 (border ((t (:background
"#888a85"))))
61 (fringe ((t (:background
"grey10"))))
62 (mode-line ((t (:foreground
"#bbbbbc" :background
"#222222" :box
(:line-width
1 :color nil
:style released-button
)))))
63 (mode-line-inactive ((t (:foreground
"#bbbbbc" :background
"#555753"))))
64 (mode-line-buffer-id ((t (:bold t
:foreground
"orange" :background nil
))))
65 (region ((t (:background
"dark slate blue"))))
66 (link ((t (:underline t
:foreground
"dodger blue"))))
67 (custom-link ((t (:inherit
'link
))))
68 (match ((t (:bold t
:background
"#e9b96e" :foreground
"#2e3436"))))
69 (tool-tips ((t (:inherit
'variable-pitch
:foreground
"black" :background
"lightyellow"))))
70 (tooltip ((t (:inherit
'variable-pitch
:foreground
"black" :background
"lightyellow"))))
71 (bold ((t (:bold t
:underline nil
:background nil
))))
72 (italic ((t (:italic t
:underline nil
:background nil
))))
73 (font-lock-builtin-face ((t (:foreground
"#729fcf"))))
74 (font-lock-comment-face ((t (:foreground
"#888a85"))))
75 (font-lock-constant-face ((t (:foreground
"#8ae234"))))
76 (font-lock-doc-face ((t (:foreground
"#888a85"))))
77 (font-lock-keyword-face ((t (:foreground
"#729fcf" :bold t
))))
78 (font-lock-string-face ((t (:foreground
"#ad7fa8" :italic t
))))
79 (font-lock-type-face ((t (:foreground
"#8ae234" :bold t
))))
80 (font-lock-variable-name-face ((t (:foreground
"tomato"))))
81 (font-lock-warning-face ((t (:bold t
:foreground
"#f57900"))))
82 (font-lock-function-name-face ((t (:foreground
"#edd400" :bold t
))))
83 (comint-highlight-input ((t (:italic t
:bold t
))))
84 (comint-highlight-prompt ((t (:foreground
"#8ae234"))))
85 (isearch ((t (:background
"#f57900" :foreground
"#2e3436"))))
86 (isearch-lazy-highlight-face ((t (:foreground
"#2e3436" :background
"#e9b96e"))))
87 (show-paren-match-face ((t (:foreground
"#2e3436" :background
"#73d216"))))
88 (show-paren-mismatch-face ((t (:background
"#ad7fa8" :foreground
"#2e3436"))))
89 (minibuffer-prompt ((t (:foreground
"#729fcf" :bold t
))))
90 (info-xref ((t (:foreground
"#729fcf"))))
91 (info-xref-visited ((t (:foreground
"#ad7fa8"))))
92 (diary-face ((t (:bold t
:foreground
"IndianRed"))))
93 (eshell-ls-clutter-face ((t (:bold t
:foreground
"DimGray"))))
94 (eshell-ls-executable-face ((t (:bold t
:foreground
"Coral"))))
95 (eshell-ls-missing-face ((t (:bold t
:foreground
"black"))))
96 (eshell-ls-special-face ((t (:bold t
:foreground
"Gold"))))
97 (eshell-ls-symlink-face ((t (:bold t
:foreground
"White"))))
98 (widget-button ((t (:bold t
))))
99 (widget-mouse-face ((t (:bold t
:foreground
"white" :background
"brown4"))))
100 (widget-field ((t (:foreground
"orange" :background
"gray30"))))
101 (widget-single-line-field ((t (:foreground
"orange" :background
"gray30"))))
102 (custom-group-tag ((t (:bold t
:foreground
"#edd400" :height
1.3))))
103 (custom-variable-tag ((t (:bold t
:foreground
"#edd400" :height
1.1))))
104 (custom-face-tag ((t (:bold t
:foreground
"#edd400" :height
1.1))))
105 (custom-state-face ((t (:foreground
"#729fcf"))))
106 (custom-button ((t (:box
(:line-width
1 :style released-button
) :background
"grey50" :foreground
"black"))))
107 (custom-variable-button ((t (:inherit
'custom-button
))))
108 (custom-button-mouse ((t (:inherit
'custom-button
:background
"grey60"))))
109 (custom-button-unraised ((t (:background
"grey50" :foreground
"black"))))
110 (custom-button-mouse-unraised ((t (:inherit
'custom-button-unraised
:background
"grey60"))))
111 (custom-button-pressed ((t (:inherit
'custom-button
:box
(:style pressed-button
)))))
112 (custom-button-mouse-pressed-unraised ((t (:inherit
'custom-button-unraised
:background
"grey60"))))
113 (custom-documentation ((t (:italic t
))))
114 (message-cited-text ((t (:foreground
"#edd400"))))
115 (gnus-cite-face-1 ((t (:foreground
"#ad7fa8"))))
116 (gnus-cite-face-2 ((t (:foreground
"sienna4"))))
117 (gnus-cite-face-3 ((t (:foreground
"khaki4"))))
118 (gnus-cite-face-4 ((t (:foreground
"PaleTurquoise4"))))
119 (gnus-group-mail-1-empty-face ((t (:foreground
"light cyan"))))
120 (gnus-group-mail-1-face ((t (:bold t
:foreground
"light cyan"))))
121 (gnus-group-mail-2-empty-face ((t (:foreground
"turquoise"))))
122 (gnus-group-mail-2-face ((t (:bold t
:foreground
"turquoise"))))
123 (gnus-group-mail-3-empty-face ((t (:foreground
"#729fcf"))))
124 (gnus-group-mail-3-face ((t (:bold t
:foreground
"#edd400"))))
125 (gnus-group-mail-low-empty-face ((t (:foreground
"dodger blue"))))
126 (gnus-group-mail-low-face ((t (:bold t
:foreground
"dodger blue"))))
127 (gnus-group-news-1-empty-face ((t (:foreground
"light cyan"))))
128 (gnus-group-news-1-face ((t (:bold t
:foreground
"light cyan"))))
129 (gnus-group-news-2-empty-face ((t (:foreground
"turquoise"))))
130 (gnus-group-news-2-face ((t (:bold t
:foreground
"turquoise"))))
131 (gnus-group-news-3-empty-face ((t (:foreground
"#729fcf"))))
132 (gnus-group-news-3-face ((t (:bold t
:foreground
"#edd400"))))
133 (gnus-group-news-low-empty-face ((t (:foreground
"dodger blue"))))
134 (gnus-group-news-low-face ((t (:bold t
:foreground
"dodger blue"))))
135 (gnus-header-name-face ((t (:bold t
:foreground
"#729fcf"))))
136 (gnus-header-from ((t (:bold t
:foreground
"#edd400"))))
137 (gnus-header-subject ((t (:foreground
"#edd400"))))
138 (gnus-header-content ((t (:italic t
:foreground
"#8ae234"))))
139 (gnus-header-newsgroups-face ((t (:italic t
:bold t
:foreground
"LightSkyBlue3"))))
140 (gnus-signature-face ((t (:italic t
:foreground
"dark grey"))))
141 (gnus-summary-cancelled-face ((t (:background
"black" :foreground
"yellow"))))
142 (gnus-summary-high-ancient-face ((t (:bold t
:foreground
"rotal blue"))))
143 (gnus-summary-high-read-face ((t (:bold t
:foreground
"lime green"))))
144 (gnus-summary-high-ticked-face ((t (:bold t
:foreground
"tomato"))))
145 (gnus-summary-high-unread-face ((t (:bold t
:foreground
"white"))))
146 (gnus-summary-low-ancient-face ((t (:italic t
:foreground
"lime green"))))
147 (gnus-summary-low-read-face ((t (:italic t
:foreground
"royal blue"))))
148 (gnus-summary-low-ticked-face ((t (:italic t
:foreground
"dark red"))))
149 (gnus-summary-low-unread-face ((t (:italic t
:foreground
"white"))))
150 (gnus-summary-normal-ancient-face ((t (:foreground
"royal blue"))))
151 (gnus-summary-normal-read-face ((t (:foreground
"lime green"))))
152 (gnus-summary-normal-ticked-face ((t (:foreground
"indian red"))))
153 (gnus-summary-normal-unread-face ((t (:foreground
"white"))))
154 (gnus-summary-selected ((t (:background
"brown4" :foreground
"white"))))
155 (message-header-name-face ((t (:foreground
"tomato"))))
156 (message-header-newsgroups-face ((t (:italic t
:bold t
:foreground
"LightSkyBlue3"))))
157 (message-header-other-face ((t (:foreground
"LightSkyBlue3"))))
158 (message-header-xheader-face ((t (:foreground
"DodgerBlue3"))))
159 (message-header-subject ((t (:foreground
"white"))))
160 (message-header-to ((t (:foreground
"white"))))
161 (message-header-cc ((t (:foreground
"white"))))
162 (org-hide ((t (:foreground
"#2e3436"))))
163 (org-level-1 ((t (:bold t
:foreground
"dodger blue" :height
1.5))))
164 (org-level-2 ((t (:bold nil
:foreground
"#edd400" :height
1.2))))
165 (org-level-3 ((t (:bold t
:foreground
"#6ac214" :height
1.0))))
166 (org-level-4 ((t (:bold nil
:foreground
"tomato" :height
1.0))))
167 (org-date ((t (:underline t
:foreground
"magenta3"))))
168 (org-footnote ((t (:underline t
:foreground
"magenta3"))))
169 (org-link ((t (:foreground
"skyblue2" :background
"#2e3436"))))
170 (org-special-keyword ((t (:foreground
"brown"))))
171 (org-verbatim ((t (:foreground
"#eeeeec" :underline t
:slant italic
))))
172 (org-block ((t (:foreground
"#bbbbbc"))))
173 (org-quote ((t (:inherit org-block
:slant italic
))))
174 (org-verse ((t (:inherit org-block
:slant italic
))))
175 (org-todo ((t (:bold t
:foreground
"Red"))))
176 (org-done ((t (:bold t
:foreground
"ForestGreen"))))
177 (org-agenda-structure ((t (:weight bold
:foreground
"tomato"))))
178 (org-agenda-date ((t (:foreground
"#6ac214"))))
179 (org-agenda-date-weekend ((t (:weight normal
:foreground
"dodger blue"))))
180 (org-agenda-date-today ((t (:weight bold
:foreground
"#edd400"))))
181 (anything-header ((t (:bold t
:background
"grey15" :foreground
"#edd400"))))
182 (ess-jb-comment-face ((t (:background
"#2e3436" :foreground
"firebrick" :slant italic
))))
183 (ess-jb-hide-face ((t (:background
"#2e3436" :foreground
"#243436"))))
184 (ess-jb-h1-face ((t (:height
1.6 :foreground
"dodger blue" :slant normal
))))
185 (ess-jb-h2-face ((t (:height
1.4 :foreground
"#6ac214" :slant normal
))))
186 (ess-jb-h3-face ((t (:height
1.2 :foreground
"#edd400" :slant normal
))))
187 (ecb-default-highlight-face ((t (:background
"#729fcf"))))
188 (ecb-tag-header-face ((t (:background
"#f57900"))))
189 (magit-header ((t (:foreground
"#edd400"))))
190 (magit-diff-add ((t (:foreground
"#729fcf"))))
191 (magit-item-highlight ((t (:weight extra-bold
:inverse-video t
))))
194 (provide 'color-theme-tangotango
)