Initial Commit Woo

This commit is contained in:
DavidCromp
2021-08-21 17:33:51 -04:00
commit c0f5ccf4d2
4 changed files with 285 additions and 0 deletions

View File

@@ -0,0 +1,51 @@
(deftheme UniverseHighContrast
"Created 2021-07-23.")
(custom-theme-set-faces
'UniverseHighContrast
'(cursor ((t (:background "SeaGreen1"))))
'(fixed-pitch ((t nil)))
'(variable-pitch ((t nil)))
'(escape-glyph ((t (:foreground "magenta"))))
'(minibuffer-prompt ((t (:foreground "lawn green"))))
'(highlight ((t (:foreground "black" :background "turquoise"))))
'(region ((t (:foreground "black" :background "light blue"))))
'(shadow ((((class color grayscale) (min-colors 88) (background light)) (:foreground "grey50")) (((class color grayscale) (min-colors 88) (background dark)) (:foreground "grey70")) (((class color) (min-colors 8) (background light)) (:foreground "green")) (((class color) (min-colors 8) (background dark)) (:foreground "yellow"))))
'(secondary-selection ((t (:foreground "black" :background "aquamarine"))))
'(trailing-whitespace ((t (:background "slate blue"))))
'(font-lock-builtin-face ((t (:foreground "orchid"))))
'(font-lock-comment-delimiter-face ((t (:inherit font-lock-comment-face))))
'(font-lock-comment-face ((t (:foreground "#e512ff"))))
'(font-lock-constant-face ((t (:foreground "DeepPink1"))))
'(font-lock-doc-face ((t (:inherit (font-lock-string-face)))))
'(font-lock-function-name-face ((t (:foreground "green"))))
'(font-lock-keyword-face ((t (:foreground "chartreuse"))))
'(font-lock-negation-char-face ((t nil)))
'(font-lock-preprocessor-face ((t (:inherit (font-lock-builtin-face)))))
'(font-lock-regexp-grouping-backslash ((t (:inherit (bold)))))
'(font-lock-regexp-grouping-construct ((t (:inherit (bold)))))
'(font-lock-string-face ((t (:foreground "spring green"))))
'(font-lock-type-face ((t (:foreground "aquamarine"))))
'(font-lock-variable-name-face ((t (:foreground "deep sky blue"))))
'(font-lock-warning-face ((t (:inherit (error)))))
'(button ((t (:inherit (link)))))
'(link ((t (:foreground "green1" :underline t))))
'(link-visited ((t (:foreground "green3" :underline t))))
'(fringe ((t (:background "gray10"))))
'(header-line ((t (:box nil :foreground "grey90" :background "grey20" :inherit (mode-line)))))
'(tooltip ((t (:foreground "black" :background "lightyellow" :inherit (variable-pitch)))))
'(mode-line ((t (:box (:line-width -1 :color nil :style released-button) :foreground "white" :background "purple4"))))
'(mode-line-buffer-id ((t (:weight bold))))
'(mode-line-emphasis ((t (:weight bold))))
'(mode-line-highlight ((((class color) (min-colors 88)) (:box (:line-width 2 :color "grey40" :style released-button))) (t (:inherit (highlight)))))
'(mode-line-inactive ((t (:weight light :box (:line-width -1 :color "grey40" :style nil) :foreground "grey80" :background "grey30" :inherit (mode-line)))))
'(isearch ((t (:foreground "black" :background "pale green"))))
'(isearch-fail ((t (:background "medium sea green"))))
'(lazy-highlight ((t (:background "gray25"))))
'(match ((((class color) (min-colors 88) (background light)) (:background "yellow1")) (((class color) (min-colors 88) (background dark)) (:background "RoyalBlue3")) (((class color) (min-colors 8) (background light)) (:foreground "black" :background "yellow")) (((class color) (min-colors 8) (background dark)) (:foreground "white" :background "blue")) (((type tty) (class mono)) (:inverse-video t)) (t (:background "gray"))))
'(next-error ((t (:inherit (region)))))
'(query-replace ((t (:inherit (isearch)))))
'(default ((t (:foreground "white" :background "black" :height 150))))
)
(provide-theme 'UniverseHighContrast)