1 ;;; tsdh-light-theme.el --- Tassilo's light custom theme
3 ;; Copyright (C) 2011-2017 Free Software Foundation, Inc.
5 ;; This file is part of GNU Emacs.
7 ;; GNU Emacs is free software: you can redistribute it and/or modify
8 ;; it under the terms of the GNU General Public License as published by
9 ;; the Free Software Foundation, either version 3 of the License, or
10 ;; (at your option) any later version.
12 ;; GNU Emacs is distributed in the hope that it will be useful,
13 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
14 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 ;; GNU General Public License for more details.
17 ;; You should have received a copy of the GNU General Public License
18 ;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
23 "Minor tweaks to the Emacs white-background defaults.
24 Used and created by Tassilo Horn.")
26 (custom-theme-set-faces
28 '(Info-quoted ((t (:underline
"gray40" :weight bold
))))
29 '(aw-leading-char-face ((t (:background
"red" :foreground
"white" :weight bold
))))
30 '(default ((t (:background
"white" :foreground
"black"))))
31 '(diff-added ((t (:inherit diff-changed
:background
"light green"))))
32 '(diff-changed ((t (:background
"light steel blue"))))
33 '(diff-indicator-added ((t (:inherit diff-indicator-changed
))))
34 '(diff-indicator-changed ((t (:weight bold
))))
35 '(diff-indicator-removed ((t (:inherit diff-indicator-changed
))))
36 '(diff-removed ((t (:inherit diff-changed
:background
"sandy brown"))))
37 '(dired-directory ((t (:inherit font-lock-function-name-face
:weight bold
))))
38 '(font-lock-regexp-grouping-backslash ((t (:inherit bold
:foreground
"black"))))
39 '(font-lock-regexp-grouping-construct ((t (:inherit bold
:foreground
"black"))))
40 '(gnus-button ((t (:inherit button
))))
41 '(gnus-header-name ((t (:box
(:line-width
1 :style released-button
) :weight bold
))))
42 '(gnus-group-mail-1 ((t (:inherit gnus-group-mail-1-empty
:weight bold
))))
43 '(gnus-group-mail-1-empty ((t (:foreground
"DodgerBlue4"))))
44 '(gnus-group-mail-2 ((t (:inherit gnus-group-mail-2-empty
:weight bold
))))
45 '(gnus-group-mail-2-empty ((t (:foreground
"DodgerBlue3"))))
46 '(gnus-group-mail-3 ((t (:inherit gnus-group-mail-3-empty
:weight bold
))))
47 '(gnus-group-mail-3-empty ((t (:foreground
"DodgerBlue2"))))
48 '(gnus-group-news-1 ((t (:inherit gnus-group-news-1-empty
:weight bold
))))
49 '(gnus-group-news-1-empty ((t (:foreground
"tomato4"))))
50 '(gnus-group-news-2 ((t (:inherit gnus-group-news-2-empty
:weight bold
))))
51 '(gnus-group-news-2-empty ((t (:foreground
"tomato3"))))
52 '(gnus-group-news-3 ((t (:inherit gnus-group-news-3-empty
:weight bold
))))
53 '(gnus-group-news-3-empty ((t (:foreground
"tomato2")))) '(header-line ((t (:inherit mode-line
:inverse-video t
))))
54 '(hl-line ((t (:background
"grey95"))))
55 '(hl-paren-face ((t (:weight bold
))) t
)
56 '(minibuffer-prompt ((t (:background
"yellow" :foreground
"medium blue" :box
(:line-width -
1 :color
"red" :style released-button
) :weight bold
))))
57 '(mode-line ((t (:background
"wheat" :foreground
"black" :box
(:line-width
1 :color
"tan") :family
"DejaVu Sans"))))
58 '(mode-line-inactive ((t (:inherit mode-line
:foreground
"dark gray"))))
59 '(org-agenda-date ((t (:inherit org-agenda-structure
))))
60 '(org-agenda-date-today ((t (:inherit org-agenda-date
:underline t
))))
61 '(org-agenda-date-weekend ((t (:inherit org-agenda-date
:foreground
"dark green"))))
62 '(org-agenda-structure ((t (:foreground
"Blue1" :weight bold
:height
1.1 :family
"DeJaVu Sans"))))
63 '(org-hide ((t (:foreground
"white"))))
64 '(org-level-1 ((t (:inherit outline-1
:box nil
))))
65 '(org-level-2 ((t (:inherit outline-2
:box nil
))))
66 '(org-level-3 ((t (:inherit outline-3
:box nil
))))
67 '(org-level-4 ((t (:inherit outline-4
:box nil
))))
68 '(org-level-5 ((t (:inherit outline-5
:box nil
))))
69 '(org-level-6 ((t (:inherit outline-6
:box nil
))))
70 '(org-level-7 ((t (:inherit outline-7
:box nil
))))
71 '(org-level-8 ((t (:inherit outline-8
:box nil
))))
72 '(org-tag ((t (:weight bold
))))
73 '(outline-1 ((t (:inherit font-lock-function-name-face
:weight bold
))))
74 '(outline-2 ((t (:inherit font-lock-variable-name-face
:weight bold
))))
75 '(outline-3 ((t (:inherit font-lock-keyword-face
:weight bold
))))
76 '(outline-4 ((t (:inherit font-lock-comment-face
:weight bold
))))
77 '(outline-5 ((t (:inherit font-lock-type-face
:weight bold
))))
78 '(outline-6 ((t (:inherit font-lock-constant-face
:weight bold
))))
79 '(outline-7 ((t (:inherit font-lock-builtin-face
:weight bold
))))
80 '(outline-8 ((t (:inherit font-lock-string-face
:weight bold
))))
81 '(rcirc-my-nick ((t (:foreground
"LightSkyBlue" :weight bold
))))
82 '(region ((t (:background
"lightgoldenrod1"))))
83 '(show-paren-match ((t (:background
"Cyan1" :weight bold
))))
84 '(show-paren-mismatch ((t (:background
"deep pink" :weight bold
))))
85 '(window-number-face ((t (:foreground
"red" :weight bold
)))))
87 (provide-theme 'tsdh-light
)
94 ;;; tsdh-light-theme.el ends here