[Emacs Lisp] Personal ~/.emacs.d/ configuration folder.
1
(deftheme sd-light
2
"Created 2021-09-22.")
3
4
(custom-theme-set-variables
5
'sd-light
6
'(cursor-type 'bar)
7
'(org-fontify-done-headline nil))
8
9
(custom-theme-set-faces
10
'sd-light
11
'(Info-quoted ((t (:inherit org-block))))
12
'(cursor ((t (:background "red"))))
13
'(erc-action-face ((t (:slant italic))))
14
'(erc-button ((t (:inherit link))))
15
'(erc-input-face ((t (:foreground "DarkOrchid4"))))
16
'(erc-nick-default-face ((t (:inherit org-meta-line :weight bold))))
17
'(erc-notice-face ((t (:inherit shadow))))
18
'(erc-timestamp-face ((t (:inherit org-meta-line))))
19
'(escape-glyph ((((background dark)) (:foreground "cyan")) (((type pc)) (:foreground "magenta")) (t (:foreground "brown"))))
20
'(fixed-pitch ((t (:family "Hack"))))
21
'(font-lock-builtin-face ((t (:foreground "medium purple"))))
22
'(font-lock-comment-delimiter-face ((t (:inherit fixed-pitch :foreground "slate gray"))))
23
'(font-lock-comment-face ((t (:inherit org-meta-line :background "white" :slant italic))))
24
'(font-lock-constant-face ((t (:foreground "MediumOrchid4"))))
25
'(font-lock-doc-face ((t (:foreground "midnight blue" :slant italic))))
26
'(font-lock-function-name-face ((t (:foreground "medium violet red" :weight bold))))
27
'(font-lock-keyword-face ((t (:foreground "violet" :weight bold))))
28
'(font-lock-negation-char-face ((t nil)))
29
'(font-lock-preprocessor-face ((t (:inherit font-lock-builtin-face))))
30
'(font-lock-regexp-grouping-backslash ((t (:foreground "dark orange" :weight bold))))
31
'(font-lock-regexp-grouping-construct ((t (:weight bold))))
32
'(font-lock-string-face ((t (:foreground "MediumOrchid3"))))
33
'(font-lock-type-face ((t (:foreground "orchid2"))))
34
'(font-lock-variable-name-face ((t (:foreground "DarkOrchid3" :weight bold))))
35
'(font-lock-warning-face ((t (:inherit (error)))))
36
'(fringe ((t (:background "gainsboro"))))
37
'(header-line ((t (:height 1.8 :weight extra-bold :inherit org-meta-line))))
38
'(highlight ((t (:background "LightSkyBlue1"))))
39
'(homoglyph ((((background dark)) (:foreground "cyan")) (((type pc)) (:foreground "magenta")) (t (:foreground "brown"))))
40
'(isearch ((t (:background "DodgerBlue1" :foreground "white"))))
41
'(isearch-fail ((t (:background "RosyBrown1"))))
42
'(ivy-minibuffer-match-face-1 ((t (:inherit swiper-match-face-1))))
43
'(ivy-minibuffer-match-face-2 ((t (:inherit swiper-match-face-2))))
44
'(ivy-minibuffer-match-face-3 ((t (:inherit swiper-match-face-3))))
45
'(ivy-minibuffer-match-face-4 ((t (:inherit swiper-match-face-4))))
46
'(ivy-minibuffer-match-highlight ((t (:inherit highlight))))
47
'(lazy-highlight ((t (:foreground "DodgerBlue1" :box 2))))
48
'(match ((t (:background "yellow1"))))
49
'(minibuffer-prompt ((t (:inherit org-meta-line))))
50
'(mode-line ((t (:inherit org-meta-line :box (:line-width -1 :style released-button)))))
51
'(mode-line-buffer-id ((t (:weight bold))))
52
'(mode-line-emphasis ((t (:weight bold))))
53
'(mode-line-highlight ((t (:box (:line-width 2 :color "grey40" :style released-button)))))
54
'(mode-line-inactive ((t (:inherit org-meta-line :background "gainsboro" :box (:line-width -1 :color "dark gray")))))
55
'(next-error ((t (:inherit region))))
56
'(org-block ((t (:inherit fixed-pitch :background "snow" :foreground "plum"))))
57
'(org-checkbox ((t (:inherit org-meta-line :weight bold))))
58
'(org-code ((t (:background "gainsboro" :foreground "black" :family "Hack"))))
59
'(org-date ((t (:inherit (link fixed-pitch)))))
60
'(org-document-info ((t (:weight bold))))
61
'(org-document-info-keyword ((t (:inherit org-meta-line))))
62
'(org-document-title ((t (:weight bold :height 2.4))))
63
'(org-done ((t (:background "forest green" :foreground "white" :weight bold :height 1.4 :family "hermit"))))
64
'(org-drawer ((t (:inherit org-meta-line))))
65
'(org-ellipsis ((t (:inherit shadow :background "white"))))
66
'(org-footnote ((t (:inherit (link variable-font)))))
67
'(org-formula ((t (:slant italic :inherit org-table))))
68
'(org-level-1 ((t (:height 1.8))))
69
'(org-level-2 ((t (:height 1.6))))
70
'(org-level-3 ((t (:height 1.4))))
71
'(org-level-4 ((t (:height 1.0))))
72
'(org-level-5 ((t (:inherit org-level-4))))
73
'(org-level-6 ((t (:inherit org-level-4))))
74
'(org-level-7 ((t (:inherit org-level-4))))
75
'(org-level-8 ((t (:inherit org-level-4))))
76
'(org-meta-line ((t (:extend t :background "white smoke" :foreground "LightSteelBlue3" :family "Hermit"))))
77
'(org-priority ((t (:height 1.4 :inherit org-special-keyword))))
78
'(org-quote ((t (:inherit variable-pitch :slant italic))))
79
'(org-special-keyword ((t (:inherit org-meta-line :weight bold :background "white"))))
80
'(org-table ((t (:height 0.8 :family "Hack"))))
81
'(org-tag ((t (:inherit (link fixed-pitch)))))
82
'(org-todo ((t (:background "tomato" :foreground "white" :weight bold :height 1.4 :family "Hermit"))))
83
'(org-verbatim ((t (:inherit org-code :background "white" :foreground "DodgerBlue1" :foundry "Hack"))))
84
'(query-replace ((t (:inherit (isearch)))))
85
'(region ((t (:background "gainsboro"))))
86
'(secondary-selection ((((class color) (min-colors 88) (background light)) (:background "yellow1")) (((class color) (min-colors 88) (background dark)) (:background "SkyBlue4")) (((class color) (min-colors 16) (background light)) (:background "yellow")) (((class color) (min-colors 16) (background dark)) (:background "SkyBlue4")) (((class color) (min-colors 8)) (:foreground "black" :background "cyan")) (t (:inverse-video t))))
87
'(shadow ((t (:foreground "light slate gray"))))
88
'(swiper-match-face-1 ((t (:foreground "red"))))
89
'(swiper-match-face-2 ((t (:foreground "orange red"))))
90
'(swiper-match-face-3 ((t (:foreground "chocolate"))))
91
'(swiper-match-face-4 ((t (:foreground "yellow"))))
92
'(tooltip ((t (:background "gainsboro" :foreground "black" :family "Hermit"))))
93
'(trailing-whitespace ((((class color) (background light)) (:background "red1")) (((class color) (background dark)) (:background "red1")) (t (:inverse-video t))))
94
'(variable-pitch ((t (:foreground "black" :height 1.2 :family "Public Sans"))))
95
'(line-number ((t (:height 0.8 :inherit org-meta-line))))
96
'(show-paren-match ((t (:inherit highlight))))
97
'(show-paren-mismatch ((t (:background "red" :foreground "white"))))
98
'(widget-field ((t (:extend t :background "LightSteelBlue1"))))
99
'(swiper-line-face ((t (:inherit highlight))))
100
'(swiper-background-match-face-1 ((t (:background "cyan"))))
101
'(swiper-background-match-face-2 ((t (:background "chartreuse"))))
102
'(swiper-background-match-face-3 ((t (:background "orange"))))
103
'(swiper-background-match-face-4 ((t (:background "magenta"))))
104
'(default ((t (:background "white" :foreground "black" :height 142 :family "Hack"))))
105
'(org-property-value ((t (:inherit fixed-pitch)))))
106
107
(provide-theme 'sd-light)
108