[Emacs Lisp] Personal ~/.emacs.d/ configuration folder.

Themes.

Commit
515558c11defeee18b107325cc14d7f7d70a38aa
Author
Marius Peter <marius.peter@tutanota.com>
Author date
Committer
Marius Peter <marius.peter@tutanota.com>
Committer date
Changed files
themes/sd-compagnon-dark-theme.el
index 00000000..7f75094b 000000..100644
@@ -0,0 +1,85 @@
1 Added: (deftheme sd-compagnon-dark
2 Added: "Created 2021-07-07.")
3 Added:
4 Added: (custom-theme-set-variables
5 Added: 'sd-compagnon-dark
6 Added: '(cursor-type 'box))
7 Added:
8 Added: (custom-theme-set-faces
9 Added: 'sd-compagnon-dark
10 Added: '(cursor ((t (:background "green"))))
11 Added: '(fixed-pitch ((t (:family "Compagnon Medium"))))
12 Added: '(variable-pitch ((t (:family "Compagnon Roman"))))
13 Added: '(escape-glyph ((t (:foreground "orange"))))
14 Added: '(homoglyph ((t (:foreground "cyan"))))
15 Added: '(minibuffer-prompt ((t (:inherit (org-meta-line)))))
16 Added: '(highlight ((t (:box (:line-width 2 :color "medium spring green") :background "sea green"))))
17 Added: '(region ((t (:extend t :background "medium sea green"))))
18 Added: '(shadow ((t (:foreground "light slate gray"))))
19 Added: '(secondary-selection ((((class color) (min-colors 88) (background light)) (:extend t :background "yellow1")) (((class color) (min-colors 88) (background dark)) (:extend t :background "SkyBlue4")) (((class color) (min-colors 16) (background light)) (:extend t :background "yellow")) (((class color) (min-colors 16) (background dark)) (:extend t :background "SkyBlue4")) (((class color) (min-colors 8)) (:extend t :foreground "black" :background "cyan")) (t (:inverse-video t))))
20 Added: '(trailing-whitespace ((((class color) (background light)) (:background "red1")) (((class color) (background dark)) (:background "red1")) (t (:inverse-video t))))
21 Added: '(font-lock-builtin-face ((t (:foreground "cyan4"))))
22 Added: '(font-lock-comment-delimiter-face ((t (:inherit fixed-pitch :foreground "slate gray"))))
23 Added: '(font-lock-comment-face ((t (:family "Compagnon Bold"))))
24 Added: '(font-lock-constant-face ((t (:foreground "cyan"))))
25 Added: '(font-lock-doc-face ((t (:inherit variable-pitch))))
26 Added: '(font-lock-function-name-face ((t (:foreground "light green" :weight bold))))
27 Added: '(font-lock-keyword-face ((t (:foreground "green yellow"))))
28 Added: '(font-lock-negation-char-face ((t nil)))
29 Added: '(font-lock-preprocessor-face ((t (:inherit font-lock-builtin-face))))
30 Added: '(font-lock-regexp-grouping-backslash ((t (:foreground "orange"))))
31 Added: '(font-lock-regexp-grouping-construct ((t (:foreground "dark orange"))))
32 Added: '(font-lock-string-face ((t (:inherit variable-pitch))))
33 Added: '(font-lock-type-face ((t (:foreground "orchid2"))))
34 Added: '(font-lock-variable-name-face ((t (:weight bold))))
35 Added: '(font-lock-warning-face ((t (:inherit (error)))))
36 Added: '(button ((t (:foundry "Compagnon Light"))))
37 Added: '(link ((t (:foreground "green yellow" :family "Compagnon Light Italic"))))
38 Added: '(link-visited ((t (:inherit link :foreground "yellow green"))))
39 Added: '(fringe ((t (:background "gainsboro"))))
40 Added: '(header-line ((t (:inherit org-meta-line :weight bold :height 1.8))))
41 Added: '(tooltip ((t (:background "white smoke" :foreground "sea green" :family "Hermit"))))
42 Added: '(mode-line ((t (:inherit org-meta-line :box (:line-width -1 :style released-button)))))
43 Added: '(mode-line-buffer-id ((t (:weight bold))))
44 Added: '(mode-line-emphasis ((t (:weight bold))))
45 Added: '(mode-line-highlight ((t (:box (:line-width 2 :color "grey40" :style released-button)))))
46 Added: '(mode-line-inactive ((t (:box (:line-width -1 :color "dark gray") :inherit org-meta-line))))
47 Added: '(isearch ((t (:foreground "white" :background "DodgerBlue1"))))
48 Added: '(isearch-fail ((((class color) (min-colors 88) (background light)) (:background "RosyBrown1")) (((class color) (min-colors 88) (background dark)) (:background "red4")) (((class color) (min-colors 16)) (:background "red")) (((class color) (min-colors 8)) (:background "red")) (((class color grayscale)) (:foreground "grey")) (t (:inverse-video t))))
49 Added: '(lazy-highlight ((t (:foreground "burlywood" :box 2))))
50 Added: '(match ((t (:background "yellow1"))))
51 Added: '(next-error ((t (:inherit (region)))))
52 Added: '(query-replace ((t (:inherit (isearch)))))
53 Added: '(org-meta-line ((t (:foreground "medium spring green" :family "Compagnon Light"))))
54 Added: '(org-table ((t (:inherit default))))
55 Added: '(org-block ((t (:inherit fixed-pitch :extend t))))
56 Added: '(org-code ((t (:inherit fixed-pitch))))
57 Added: '(custom-variable-tag ((t (:weight bold))))
58 Added: '(org-block-begin-line ((t (:inherit org-meta-line))))
59 Added: '(org-block-end-line ((t (:inherit org-block-begin-line))))
60 Added: '(outline-1 ((t (:family "Compagnon Medium"))))
61 Added: '(outline-2 ((t (:inherit outline-1))))
62 Added: '(outline-3 ((t (:inherit outline-1))))
63 Added: '(outline-4 ((t (:inherit outline-1))))
64 Added: '(outline-5 ((t (:inherit outline-1))))
65 Added: '(outline-6 ((t (:inherit outline-1))))
66 Added: '(outline-7 ((t (:inherit outline-1))))
67 Added: '(outline-8 ((t (:inherit outline-1))))
68 Added: '(org-special-keyword ((t (:inherit org-meta-line :background "gray15"))))
69 Added: '(line-number ((t (:foreground "white" :inherit org-meta-line))))
70 Added: '(org-todo ((t (:inherit fixed-pitch :background "tomato" :foreground "white" :weight bold))))
71 Added: '(org-done ((t (:inherit fixed-pitch :background "medium aquamarine" :foreground "white" :weight bold))))
72 Added: '(org-date ((t (:inherit link))))
73 Added: '(bold ((t (:weight bold))))
74 Added: '(italic ((t (:slant italic))))
75 Added: '(bold-italic ((t (:slant italic :weight bold))))
76 Added: '(org-headline-done ((t (:inherit outline-1 :foreground "aquamarine4"))))
77 Added: '(org-footnote ((t (:family "Compagnon Light"))))
78 Added: '(custom-link ((t (:box (:line-width 2 :color "medium spring green" :style released-button)))))
79 Added: '(show-paren-match ((t (:background "aquamarine"))))
80 Added: '(show-paren-mismatch ((t (:background "orange red" :foreground "white"))))
81 Added: '(org-drawer ((t (:inherit org-block-begin-line))))
82 Added: '(org-agenda-structure ((t (:foreground "Green Yellow"))))
83 Added: '(default ((t (:inherit nil :extend nil :stipple nil :background "gray15" :foreground "white" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight semi-bold :height 142 :width normal :foundry "UKWN" :family "Compagnon Medium")))))
84 Added:
85 Added: (provide-theme 'sd-compagnon-dark)
themes/sd-compagnon-theme.el
index 3a4c9b17..8c8f7568 100644..100644
@@ -1,6 +1,10 @@
1 1 (deftheme sd-compagnon
2 Removed: "Created 2021-05-23.")
2 Added: "Created 2021-06-20.")
3 3
4 Added: (custom-theme-set-variables
5 Added: 'sd-compagnon
6 Added: '(cursor-type 'bar))
7 Added:
4 8 (custom-theme-set-faces
5 9 'sd-compagnon
6 10 '(cursor ((t (:background "red"))))
@@ -30,8 +34,8 @@
30 34 '(font-lock-variable-name-face ((t (:weight bold))))
31 35 '(font-lock-warning-face ((t (:inherit (error)))))
32 36 '(button ((t (:inherit link))))
33 Removed: '(link ((t (:family "Compagnon Light Italic"))))
34 Removed: '(link-visited ((t (:inherit link))))
37 Added: '(link ((t (:foreground "green yellow" :family "Compagnon Light Italic"))))
38 Added: '(link-visited ((t (:inherit link :foreground "yellow green"))))
35 39 '(fringe ((t (:background "gainsboro"))))
36 40 '(header-line ((t (:height 1.8 :weight bold :inherit org-meta-line))))
37 41 '(tooltip ((t (:background "old lace" :foreground "black" :family "Hermit"))))
@@ -74,7 +78,7 @@
74 78 '(custom-link ((t (:inherit fixed-pitch :background "burlywood1"))))
75 79 '(show-paren-match ((t (:background "aquamarine"))))
76 80 '(show-paren-mismatch ((t (:background "orange red" :foreground "white"))))
77 Removed: '(default ((t (:inherit nil :extend nil :stipple nil :background "cornsilk" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight semi-bold :height 142 :width normal :foundry "UKWN" :family "Compagnon Medium"))))
78 Removed: '(org-drawer ((t (:inherit org-block-begin-line)))))
81 Added: '(org-drawer ((t (:inherit org-block-begin-line))))
82 Added: '(default ((t (:inherit nil :extend nil :stipple nil :background "cornsilk" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight semi-bold :height 142 :width normal :foundry "UKWN" :family "Compagnon Medium")))))
79 83
80 84 (provide-theme 'sd-compagnon)
themes/sd-light-theme.el
index 404f5faf..6ad85c54 100644..100644
@@ -1,6 +1,10 @@
1 1 (deftheme sd-light
2 Removed: "Created 2021-05-16.")
2 Added: "Created 2021-08-13.")
3 3
4 Added: (custom-theme-set-variables
5 Added: 'sd-light
6 Added: '(cursor-type 'bar))
7 Added:
4 8 (custom-theme-set-faces
5 9 'sd-light
6 10 '(Info-quoted ((t (:inherit org-block))))
@@ -29,7 +33,7 @@
29 33 '(font-lock-variable-name-face ((t (:foreground "DarkOrchid3" :weight bold))))
30 34 '(font-lock-warning-face ((t (:inherit (error)))))
31 35 '(fringe ((t (:background "gainsboro"))))
32 Removed: '(header-line ((t (:inherit org-meta-line :weight extra-bold :height 1.8))))
36 Added: '(header-line ((t (:height 1.8 :weight extra-bold :inherit org-meta-line))))
33 37 '(highlight ((t (:background "LightSkyBlue1"))))
34 38 '(homoglyph ((((background dark)) (:foreground "cyan")) (((type pc)) (:foreground "magenta")) (t (:foreground "brown"))))
35 39 '(isearch ((t (:background "DodgerBlue1" :foreground "white"))))
@@ -97,6 +101,6 @@
97 101 '(swiper-background-match-face-3 ((t (:background "orange"))))
98 102 '(swiper-background-match-face-4 ((t (:background "magenta"))))
99 103 '(org-headline-done ((t (:foreground "LightSteelBlue3" :height 1.6))))
100 Removed: '(default ((t (:background "white" :foreground "dark slate blue" :height 142 :family "Hack")))))
104 Added: '(default ((t (:background "white" :foreground "black" :height 142 :family "Hack")))))
101 105
102 106 (provide-theme 'sd-light)