diff options
| author | tslil clingman <> | 2019-09-11 19:18:14 -0400 |
|---|---|---|
| committer | tslil clingman <> | 2019-09-11 19:18:14 -0400 |
| commit | ac1a4884d03fc0495c773500d8a13f84b695fa43 (patch) | |
| tree | 29e5ec49e0ce957d80d8f11a155b47840c74f488 /emacs/themes | |
Init
Diffstat (limited to 'emacs/themes')
| -rw-r--r-- | emacs/themes/acme-theme.el | 148 | ||||
| -rw-r--r-- | emacs/themes/soothe-theme.el | 856 |
2 files changed, 1004 insertions, 0 deletions
diff --git a/emacs/themes/acme-theme.el b/emacs/themes/acme-theme.el new file mode 100644 index 0000000..ad5baab --- /dev/null +++ b/emacs/themes/acme-theme.el @@ -0,0 +1,148 @@ +;; acme-theme.el -- A theme inspired by the classic colours of the ACME editor. +;; Copyright (C) 2014 , Tslil Clingman + +;; Version: 0.1 +;; Package-Requires: ((emacs "24")) + +;; This program is free software: you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. + +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with this program. If not, see <http://www.gnu.org/licenses/>. + +;; This file is not part of Emacs. + +(deftheme acme + "A theme inspired by the classic colours of the ACME editor.") + +(let ((bg-yellow "#FFFFCA") + (bg-blue "#DAEFEF") + + (lazy "#D1D1C0") + (mud "#99994C") + + (yellow "#EAEA9E") + (blue "#268BD2") + (red "#AA0000") + (purple "#8888CC") + (green "#508050") + (link "#D05000")) + (custom-theme-set-faces + 'acme + + `(default ((t (:background ,bg-yellow :foreground "black")))) + '(cursor ((t (:background "black")))) + '(escape-glyph ((t (:foreground "black")))) + '(minibuffer-prompt ((t (:foreground "black" :weight bold)))) + '(highlight ((t (:foreground "grey30")))) + `(region ((t (:background ,yellow :foreground "black")))) + `(secondary-selection ((t (:background ,red)))) + '(trailing-whitespace ((t (:background "grey")))) + + '(font-lock-builtin-face ((t (:foreground "black" :slant normal)))) + '(font-lock-comment-delimiter-face ((default (:inherit (font-lock-comment-face))))) + '(font-lock-comment-face ((t (:foreground "black" :slant italic + :font "Hack")))) + '(font-lock-constant-face ((t (:foreground "black")))) + '(font-lock-doc-face ((t (:foreground "black" :slant italic + :font "Hack")))) + '(font-lock-function-name-face ((t (:foreground "black" :weight bold)))) + '(font-lock-keyword-face ((t (:foreground "black" :weight bold)))) + '(font-lock-negation-char-face ((t (:foreground "black")))) + '(font-lock-preprocessor-face ((t (:inherit (font-lock-builtin-face))))) + '(font-lock-string-face ((t (:foreground "black")))) + '(font-lock-type-face ((t (:foreground "black" :underline t)))) + '(font-lock-variable-name-face ((t (:foreground "black")))) + '(font-lock-warning-face ((t (:foreground "black")))) + + '(button ((t (:inherit (link))))) + `(link ((t (:underline (:color foreground-color :style line) + :foreground ,link)))) + '(link-visited ((default (:inherit (link))) + (((class color) (background light)) (:foreground "magenta4")) + (((class color) (background dark)) (:foreground "violet")))) + + `(fringe ((t (:background ,bg-yellow :foreground "black")))) + '(header-line ((default (:inherit (mode-line))) (((type tty)) (:underline (:color foreground-color :style line) :inverse-video nil)) (((class color grayscale) (background light)) (:box nil :foreground "grey20" :background "grey90")) (((class color grayscale) (background dark)) (:box nil :foreground "grey90" :background "grey20")) (((class mono) (background light)) (:underline (:color foreground-color :style line) :box nil :inverse-video nil :foreground "black" :background "white")) (((class mono) (background dark)) (:underline (:color foreground-color :style line) :box nil :inverse-video nil :foreground "white" :background "black")))) + '(tooltip ((((class color)) + (:inherit (variable-pitch) :foreground "black" :background "lightyellow")) + (t (:inherit (variable-pitch))))) + + `(mode-line ((t (:background ,bg-blue :foreground "black" :box 2)))) + '(mode-line-buffer-id ((t (:foreground "black" :weight bold)))) + '(mode-line-emphasis ((t (:foreground "black")))) + '(mode-line-highlight ((t (:weight bold :box nil :foreground "black")))) + `(mode-line-inactive ((t (:background ,bg-blue :foreground "#393939" :weight normal :box t)))) + + `(isearch ((t (:background ,yellow)))) + `(isearch-fail ((t (:background ,red)))) + `(lazy-highlight ((t (:foreground "black" :weight bold :background ,bg-blue)))) + `(match ((t (:background ,yellow)))) + '(next-error ((t (:inherit (region))))) + '(query-replace ((t (:inherit (isearch))))) + '(table-cell ((t (:inherit (default))))) + + `(show-paren-match ((t (:weight bold :background ,purple)))) + `(show-paren-mismatch ((t (:background ,red)))) + `(sp-show-pair-match-face ((t (:weight bold :background ,purple)))) + `(sp-show-pair-mismatch-face ((t (:background ,red)))) + + '(ivy-modified-buffer ((t (:underline t :inherit (default))))) + + `(company-echo-common ((t (:foreground "black" :background ,bg-blue :weight bold)))) + `(company-scrollbar-bg ((t (:background "grey")))) + `(company-scrollbar-fg ((t (:background ,green)))) + `(company-tooltip ((t (:foreground "black" :background ,bg-blue)))) + `(company-tooltip-search ((t (:foreground "black" :background ,yellow)))) + `(company-tooltip-annotation ((t (:foreground "black" :background "grey" :slant italic)))) + `(company-tooltip-common ((t (:foreground "black" :weight bold)))) + `(company-tooltip-common-selection ((t (:foreground "black" :background ,yellow :weight bold)))) + `(company-tooltip-selection ((t (:background ,yellow :foreground "black")))) + + '(font-latex-bold-face ((t (:weight bold)))) + '(font-latex-italic-face ((t (:slant italic)))) + `(font-latex-math-face ((t (:foreground "black" + :box (:line-width 2 :color ,lazy + :style pressed-button) + :foreground "black")))) + '(font-latex-string-face ((t (:foreground "black")))) + '(font-latex-verbatim-face ((t (:foreground "black")))) + '(font-latex-sedate-face ((t (:foreground "black")))) + '(font-latex-warning-face ((t (:foreground "black")))) + '(font-latex-sectioning-5-face ((t (:foreground "black" :weight normal)))) + + `(shm-current-face ((t (:background ,bg-blue)))) + '(shm-quarantine-face ((t nil))) + + `(avy-goto-char-timer-face ((t (:background ,bg-blue)))) + `(avy-lead-face ((t (:background ,yellow)))) + `(avy-lead-face-0 ((t (:background ,green)))) + `(avy-lead-face-1 ((t (:background ,red)))) + `(avy-lead-face-2 ((t (:background ,purple)))) + + '(company-coq-comment-h1-face ((t (:height 1.8 :slant italic + :inherit (default))))) + '(company-coq-comment-h2-face ((t (:height 1.4 :slant italic + :inherit (default))))) + '(company-coq-comment-h3-face ((t (:height 1.2 :slant italic + :inherit (default))))) + '(company-coq-coqdoc-h1-face ((t (:weight bold :inverse-video t)))) + '(company-coq-coqdoc-h2-face ((t (:weight bold :underline t)))) + '(company-coq-coqdoc-h3-face ((t (:underline t)))) + '(company-coq-coqdoc-h4-face ((t (:inherit (default))))) + + '(company-coq-features/code-folding-bullet-face + ((t (:foreground "black" :weight bold)))) + + `(coq-solve-tactics-face ((t (:foreground "black" :underline t)))) + `(proof-tactics-name-face ((t (:foreground "black" :weight bold)))) + )) + +(provide-theme 'acme) diff --git a/emacs/themes/soothe-theme.el b/emacs/themes/soothe-theme.el new file mode 100644 index 0000000..d4be92a --- /dev/null +++ b/emacs/themes/soothe-theme.el @@ -0,0 +1,856 @@ +;;; soothe-theme.el --- a dark colorful theme for Emacs24. +;;; Author: Jason Milkins <jasonm23@gmail.com> +;;; Changes by Tslil Clingman <tslil.clingman@gmail.com> +;;; Url: https://github.com/jasonm23/emacs-soothe-theme +;; Version: 20141104.2213 +;;; X-Original-Version: 0.3.19 +;;; Package-Requires: ((emacs "24.1")) +;;; +;;; Change Log: +;;; 0.3.19 : Filled in some helm stuff and added company tooltips +;;; 0.3.18 : Added stubs for helm and js3 +;;; 0.3.17 : Added support for which-func face (milkypostman) +;;; 0.3.16 : Fixed flymake colors; also added Package Requres Emacs 24 by Steve Purcell +;;; 0.3.15 : update by Sabof; Magit diff settings migrated over to diff +;;; : (magit will inherit from diff) +;;; 0.3.14 : Changed main-line colors and style, added powerline colors +;;; 0.3.13 : Different colors for hl-line and region +;;; 0.3.12 : Fixed issue #4 - region bg contrast too low. +;;; 0.3.11 : Added rainbow-mode switch for editing +;;; 0.3.10 : Themed Mode line emphasis +;;; 0.3.9 : Slightly improved dired support +;;; 0.3.8 : Added support for isearch +;;; : Additional support for mode-line +;;; : modified main-line colors +;;; : modified link / link-visited +;;; : added tooltip face +;;; 0.3.7 : extended magit support +;;; : added iedit support +;;; : added CUA support +;;; : added AutoComplete support +;;; : changed rainbow delimiters for better visibility +;;; 0.3.6 : beginning work on additional mode support +;;; : added git-gutter +;;; : added dropdown-list +;;; : added stubs/extention lists for gnus, rcirc, message +;;; : ido + magit (more), +;;; : ac, compilation, +;;; : dired, diff, iedit, +;;; : cua, change, Man, woman, +;;; : commint, info, custom, popup +;;; : widget, whitespace, w3m, more... +;;; 0.3.5 : bugfix +;;; 0.3.4 : added support for main-line and flymake +;;; 0.3.0 : cleaned up for elpa +;;; 0.1.0 : initial version +;;; +;;; This program is free software: you can redistribute it and/or modify +;;; it under the terms of the GNU General Public License as published by +;;; the Free Software Foundation, version 3 of the License. +;;; +;;; This file is distributed in the hope that it will be useful, +;;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;; GNU General Public License for more details. +;;; +;;; You should have received a copy of the GNU General Public License +;;; along with GNU Emacs. +;;; +;;; This file is not a part of Emacs +;;; +;;; Commentary: An amalgam of muted color tones and highlighted +;;; backgrounds. Builtin support for rainbow-delimiters, org-mode, +;;; whitespace-mode, ECB, flyspell, ido, linum, highlight +;;; indentation, show-paren-mode, further mode support to come. + +(unless (>= 24 emacs-major-version) + (error "soothe-theme requires Emacs 24 or later.")) + +(deftheme soothe + "soothe-theme An amalgam of muted color tones and highlighted + backgrounds. Has builtin support for rainbow-delimiters, + org-mode, whitespace-mode, ECB, flyspell, ido, linum, + highlight indentation, show-paren-mode, further mode support + to come.") + +(let ( + ;; Palette + (foam "#E0E4CC") + (snow-code "#ECE5CE") + (crem "#F4EAD5") + (dirty-crem "#DBD2BF") + (dirty-crem-bg "#2B2A26") + (gray-1 "#aaaaaa") + (gray-2 "#828282") + (gray-3 "#333333") + (gray-4 "#2a2a2a") + (gray-5 "#252525") + (gray-6 "#202020") + (gray-1bg "#0a0a0a") + (gray-2bg "#111111") + (gray-3bg "#141414") + (gray-4bg "#171717") + (gray-5bg "#1a1a1a") + (gray-6bg "#1e1e1e") + (red-1 "#b13120") + (red-2 "#a23f1e") + (red-3 "#AA1100") + (red-4 "#660000") + (red-1bg "#1D1515") + (red-2bg "#251c1e") + (brown-1 "#8f621d") + (brown-1bg "#2a1f1f") + (orange-1 "#d94a05") + (orange-2 "#FF5211") + (orange-1bg "#1F1710") + (yellow-1 "#ceae3e") + (yellow-1bg "#18140C") + (green-1 "#719f34") + (green-2 "#3e8f75") + (green-3 "#839F5E") + (green-1bg "#1a2321") + (green-2bg "#1a2321") + (turquoise-1 "#01535F") + (turquoise-2 "#073E46") + (turquoise-1bg "#04181C") + (turquoise-2bg "#031316") + (blue-1 "#7c9fc9") + (blue-2 "#317598") + (blue-3 "#009090") + (blue-4 "#364e7a") + (blue-1bg "#1e252f") + (blue-2bg "#1b333e") + (blue-3bg "#132228") + (blue-4bg "#172028") + (purple-1 "#7868b5") + (purple-2 "#8A7FB5") + (purple-3 "#483E6C") + (purple-4 "#342B58") + (purple-1bg "#1D1B25") + (purple-2bg "#302948") + (purple-3bg "#241F36") + (selection "#11253a") + (hl-line "#11252a") + ;; (foreground "#E4DAC5") + ;; (background "#110F13") + ;; (background-dark "#0F0D11") + ;; (alt-background "#111013") + (foreground "grey70") + (background "#131313") + (background-dark "black") + (alt-background "#0B0B0E") + + ;; Somewhat stolen from Gotham + (base0 "#0c1014") + (base1 "#11151c") + (base2 "#091f2e") + (base3 "#0a3749") + (base4 "#245361") + (base5 "#599cab") + (base6 "grey70") + (base7 "grey80") + + ) + + ;; Terminal colors - set background to black. + ;; TODO: Use defface method (class color) (min-colors ...) + + (unless (window-system) + (setq background "#000000") + (setq background-dark "#000000") + (setq alt-background "#000000") + (setq dirty-crem-bg "#000000") + (setq gray-1bg "#000000") + (setq gray-2bg "#000000") + (setq gray-3bg "#000000") + (setq gray-4bg "#000000") + (setq gray-5bg "#000000") + (setq gray-6bg "#000000") + (setq red-1bg "#000000") + (setq red-2bg "#000000") + (setq brown-1bg "#000000") + (setq orange-1bg "#000000") + (setq yellow-1bg "#000000") + (setq green-1bg "#000000") + (setq green-2bg "#000000") + (setq turquoise-1bg "#000000") + (setq turquoise-2bg "#000000") + (setq blue-1bg "#000000") + (setq blue-2bg "#000000") + (setq blue-3bg "#000000") + (setq blue-4bg "#000000") + (setq purple-1bg "#000000") + (setq purple-2bg "#000000") + (setq purple-3bg "#000000") + ) + + (custom-theme-set-faces + 'soothe + + ;;----------------------------------------------------------------------------------------------------------------------- + ;; Basics + `(default ((t (:foreground ,foreground :background ,background )))) + `(cursor ((t ( :background ,orange-1 )))) + `(region ((t (:foreground nil :background ,selection )))) + `(highlight ((t (:foreground ,blue-3 :background ,blue-3bg )))) + `(hl-line ((t ( :background ,hl-line )))) + `(minibuffer-prompt ((t (:foreground ,red-1 :background ,red-1bg )))) + `(escape-glyph ((t (:foreground ,red-1 :background ,purple-1bg )))) + `(error ((t (:foreground ,red-1 :background ,red-1bg )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; Font-lock stuff + `(font-lock-builtin-face ((t (:foreground ,purple-1 :background ,purple-1bg )))) + `(font-lock-constant-face ((t (:foreground ,blue-1 :background ,gray-1bg )))) + `(font-lock-comment-face ((t (:foreground ,turquoise-2 :background ,alt-background :italic t )))) + `(font-lock-comment-delimiter-face ((t (:foreground ,turquoise-1 :background ,alt-background :italic t )))) + `(font-lock-doc-face ((t (:foreground ,blue-3 :background ,gray-1bg )))) + `(font-lock-doc-string-face ((t (:foreground ,blue-3 :background ,gray-1bg )))) + `(font-lock-function-name-face ((t (:foreground ,red-1 :background ,red-1bg )))) + `(font-lock-keyword-face ((t (:foreground ,orange-2 :background ,orange-1bg )))) + `(font-lock-negation-char-face ((t (:foreground ,yellow-1 :background ,yellow-1bg )))) + `(font-lock-preprocessor-face ((t (:foreground ,green-1 :background ,green-1bg )))) + `(font-lock-string-face ((t (:foreground ,blue-3 :background ,turquoise-2bg )))) + `(font-lock-type-face ((t (:foreground ,blue-1 :background ,blue-1bg :bold nil )))) + `(font-lock-variable-name-face ((t (:foreground ,green-1 :background ,green-1bg )))) + `(font-lock-warning-face ((t (:foreground ,red-2 :background ,red-2bg )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; UI related + `(link ((t (:foreground ,blue-1 :background ,blue-1bg )))) + `(link-visited ((t (:foreground ,blue-3 :background ,blue-4bg )))) + `(fringe ((t ( :background ,gray-3bg )))) + `(vertical-border ((t (:foreground ,gray-4 :background ,background )))) + ;; `(mode-line ((t (:foreground ,gray-2 :background ,gray-3bg :box nil :height 120 )))) + ;; `(mode-line-inactive ((t (:foreground ,gray-5 :background ,gray-2bg :inherit mode-line )))) + ;; `(mode-line-highlight ((t (:foreground ,green-1)))) + ;; `(mode-line-buffer-id ((t (:foreground ,orange-1)))) + `(mode-line-emphasis ((t (:bold)))) + `(which-func ((t (:foreground ,blue-1)))) + + `(menu ((t (:background ,base3 :foreground ,base6)))) + `(header-line ((t (:foreground ,base5 :background ,base2 :weight bold)))) + `(mode-line ((t (:foreground ,base5 :background ,base2 :box nil)))) + `(mode-line-inactive ((t (:foreground ,base4 :background ,base1 :box nil)))) + `(mode-line-highlight ((t (:foreground ,base6)))) + `(mode-line-buffer-id ((t (:weight bold)))) + + ;;`(minibuffer-prompt ((t (:foreground ,orange-1 :background ,orange-1bg :box t)))) + + ;;----------------------------------------------------------------------------------------------------------------------- + ;; isearch + `(isearch ((t (:foreground ,orange-1 :background ,blue-2bg :underline t)))) + `(isearch-fail ((t (:foreground ,red-4 :weight bold)))) + `(lazy-highlight ((t (:foreground ,green-1 :background ,green-1bg :underline t)))) + + ;;----------------------------------------------------------------------------------------------------------------------- + ;; Compilation mode + ;; `(compilation-column-number ((t (:foreground ,foam :background ,background )))) + ;; `(compilation-error ((t (:foreground ,foam :background ,background )))) + ;; `(compilation-info ((t (:foreground ,foam :background ,background )))) + ;; `(compilation-line-number ((t (:foreground ,foam :background ,background )))) + ;; `(compilation-mode-line-exit ((t (:foreground ,foam :background ,background )))) + ;; `(compilation-mode-line-fail ((t (:foreground ,foam :background ,background )))) + ;; `(compilation-mode-line-run ((t (:foreground ,foam :background ,background )))) + ;; `(compilation-warning ((t (:foreground ,foam :background ,background )))) + ;; `(completions-annotations ((t (:foreground ,foam :background ,background )))) + ;; `(completions-common-part ((t (:foreground ,foam :background ,background )))) + ;; `(completions-first-difference ((t (:foreground ,foam :background ,background )))) + + ;;----------------------------------------------------------------------------------------------------------------------- + ;; Auto Complete + ;; + `(ac-selection-face ((t (:foreground ,dirty-crem :background ,dirty-crem-bg )))) + `(ac-candidate-face ((t (:foreground ,background :background ,dirty-crem )))) + `(ac-yasnippet-candidate-face ((t (:foreground ,background :background ,green-2 )))) + `(ac-yasnippet-selection-face ((t (:foreground ,foam :background ,dirty-crem-bg )))) + `(ac-gtags-candidate-face ((t (:foreground ,background :background ,purple-3 )))) + `(ac-gtags-selection-face ((t (:foreground ,dirty-crem :background ,dirty-crem-bg )))) + `(ac-candidate-mouse-face ((t (:foreground ,foam :background ,turquoise-1 )))) + `(ac-completion-face ((t (:foreground ,snow-code :background ,purple-3bg :underline t )))) + ;; used by AC + `(popup-tip-face ((t (:foreground ,dirty-crem :background ,dirty-crem-bg )))) + `(tooltip ((t (:foreground ,dirty-crem-bg :background ,dirty-crem :height 110 )))) + + ;;; popup-face + ;;; popup-isearch-match + ;;; popup-menu-face + ;;; popup-menu-mouse-face + ;;; popup-menu-selection-face + ;;; popup-menu-summary-face + ;;; popup-scroll-bar-background-face + ;;; popup-scroll-bar-foreground-face + ;;; popup-summary-face + + ;; ------------------------------------------------------------------------------------------ + ;; Company + `(company-tooltip ((t (:foreground ,blue-1 :background ,blue-4bg)))) + `(company-tooltip-common-selection ((t (:foreground ,orange-1 :background ,blue-2bg)))) + `(company-tooltip-selection ((t (:foreground ,orange-1 :background ,blue-2bg)))) + `(company-tooltip-search ((t (:foreground ,green-1 :background ,green-1bg)))) + `(company-scrollbar-bg ((t (:background ,blue-1bg)))) + `(company-scrollbar-fg ((t (:background ,turquoise-1)))) + `(company-tooltip-common ((t (:foreground ,red-1 :background ,blue-4bg)))) + `(company-tooltip-annotation ((t (:foreground ,foam :background ,blue-4bg)))) + + + ;;----------------------------------------------------------------------------------------------------------------------- + ;; Dired + `(dired-directory ((t (:foreground ,purple-1 :background ,purple-1bg )))) + `(dired-flagged ((t (:foreground ,red-1 :background ,orange-1bg )))) + `(dired-header ((t (:foreground ,orange-1 :background ,background )))) + `(dired-ignored ((t (:foreground ,turquoise-1 :background ,background )))) + `(dired-mark ((t (:foreground ,orange-2 :background ,background )))) + `(dired-marked ((t (:foreground ,green-3 :background ,orange-1bg )))) + `(dired-perm-write ((t (:foreground ,foam :background ,background )))) + `(dired-symlink ((t (:foreground ,blue-1 :background ,blue-4bg )))) + `(dired-warning ((t (:foreground ,red-1 :background ,red-2bg )))) + + ;;----------------------------------------------------------------------------------------------------------------------- + ;; Gnus + + ;; gnus-group-mail-1 + ;; gnus-group-mail-1-empty + ;; gnus-group-mail-2 + ;; gnus-group-mail-2-empty + ;; gnus-group-mail-3 + ;; gnus-group-mail-3-empty + ;; gnus-group-mail-low + ;; gnus-group-mail-low-empty + ;; gnus-group-news-1 + ;; gnus-group-news-1-empty + ;; gnus-group-news-2 + ;; gnus-group-news-2-empty + ;; gnus-group-news-3 + ;; gnus-group-news-3-empty + ;; gnus-group-news-4 + ;; gnus-group-news-4-empty + ;; gnus-group-news-5 + ;; gnus-group-news-5-empty + ;; gnus-group-news-6 + ;; gnus-group-news-6-empty + ;; gnus-group-news-low + ;; gnus-group-news-low-empty + ;; gnus-splash + ;; gnus-summary-cancelled + ;; gnus-summary-high-ancient + ;; gnus-summary-high-read + ;; gnus-summary-high-ticked + ;; gnus-summary-high-undownloaded + ;; gnus-summary-high-unread + ;; gnus-summary-low-ancient + ;; gnus-summary-low-read + ;; gnus-summary-low-ticked + ;; gnus-summary-low-undownloaded + ;; gnus-summary-low-unread + ;; gnus-summary-normal-ancient + ;; gnus-summary-normal-read + ;; gnus-summary-normal-ticked + ;; gnus-summary-normal-undownloaded + ;; gnus-summary-normal-unread + ;; gnus-summary-selected + + ;; ------------------------------------------------------------------------------------------ + ;; helm + `(helm-M-x-key ((t (:foreground ,red-1 :background ,red-1bg :underline t)))) + `(helm-candidate-number ((t (:foreground ,blue-1 :background ,blue-1bg)))) + `(helm-ff-directory ((t (:foreground ,blue-3 :background nil)))) + `(helm-ff-executable ((t (:foreground ,green-2 :background nil)))) + `(helm-ff-file ((t (:foreground ,purple-1 :background nil)))) + `(helm-ff-invalid-symlink ((t (:foreground ,red-1 :background nil)))) + `(helm-ff-prefix ((t (:foreground ,turquoise-1 :background nil)))) + `(helm-ff-symlink ((t (:foreground ,orange-1 :background nil)))) + `(helm-match ((t (:foreground ,green-1 :background ,green-1bg)))) + `(helm-selection ((t (:foreground ,orange-2 :background ,blue-4bg :weight bold)))) + `(helm-source-header ((t (:foreground ,red-1 :background ,red-1bg :box t)))) + `(helm-buffer-file ((t (:foreground ,purple-1 :background nil)))) + `(helm-buffer-directory ((t (:foreground ,blue-3 :background nil)))) + `(helm-buffer-not-saved ((t (:foreground ,red-1 :background nil)))) + `(helm-buffer-process ((t (:foreground ,orange-1 :background nil)))) + `(helm-buffer-size ((t (:foreground "salmon" :background nil)))) + ;; helm-action + ;; helm-bookmark-addressbook + ;; helm-bookmark-directory + ;; helm-bookmark-file + ;; helm-bookmark-gnus + ;; helm-bookmark-info + ;; helm-bookmark-man + ;; helm-bookmark-w3m + ;; helm-buffer-saved-out + ;; helm-buffer-size + ;; helm-grep-cmd-line + ;; helm-grep-file + ;; helm-grep-finish + ;; helm-grep-lineno + ;; helm-grep-match + ;; helm-grep-running + ;; helm-header + ;; helm-helper + ;; helm-history-deleted + ;; helm-history-remote + ;; helm-moccur-buffer + ;; helm-selection-line + ;; helm-separator + ;; helm-visible-mark + + ;; ------------------------------------------------------------------------------------------ + ;; JS3 mode + + ;; js3-error-face + ;; js3-external-variable-face + ;; js3-function-param-face + ;; js3-instance-member-face + ;; js3-jsdoc-html-tag-delimiter-face + ;; js3-jsdoc-html-tag-name-face + ;; js3-jsdoc-tag-face + ;; js3-jsdoc-type-face + ;; js3-jsdoc-value-face + ;; js3-magic-paren-face + ;; js3-private-function-call-face + ;; js3-private-member-face + ;; js3-warning-face + + ;;----------------------------------------------------------------------------------------------------------------------- + ;; Diff + `(diff-added ((t (:foreground ,green-3 :background ,green-2bg )))) + `(diff-removed ((t (:foreground ,red-1 :background ,red-1bg )))) + `(diff-file-header ((t (:foreground ,orange-1 :background ,orange-1bg )))) + `(diff-context ((t (:foreground ,foam )))) + `(diff-hunk-header ((t (:foreground ,purple-1 :background ,purple-1bg )))) + ;; diff-changed + ;; diff-function + ;; diff-header + ;; diff-index + ;; diff-indicator-added + ;; diff-indicator-changed + ;; diff-indicator-removed + ;; diff-nonexistent + ;; diff-refine-added + ;; diff-refine-change + ;; diff-refine-removed + + ;;----------------------------------------------------------------------------------------------------------------------- + ;; Linum + `(linum ((t (:foreground ,gray-3 :background ,alt-background :height 120 )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; show-paren-mode + `(show-paren-match ((t (:foreground ,gray-2 :background ,gray-4 )))) + `(Show-paren-mismatch ((t (:foreground ,orange-1 :background ,red-2bg )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; ido + `(ido-only-match ((t (:foreground ,green-1 :background ,green-1bg )))) + `(ido-subdir ((t (:foreground ,purple-1 :background ,purple-1bg )))) + `(ido-first-match ((t (:foreground ,orange-1 :background ,orange-1bg )))) + `(ido-incomplete-regexp ((t (:foreground ,red-1 :background ,orange-1bg )))) + `(ido-indicator ((t (:foreground ,turquoise-1 :background ,turquoise-1bg )))) + `(ido-virtual ((t (:foreground ,green-3 :background ,turquoise-1bg )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; whitespace-mode + `(whitespace-empty ((t (:foreground ,yellow-1 :background ,turquoise-2bg )))) + `(whitespace-hspace ((t (:foreground ,turquoise-2 :background ,turquoise-2bg )))) + `(whitespace-indentation ((t (:foreground ,turquoise-2 :background ,turquoise-2bg )))) + `(whitespace-line ((t (:foreground ,orange-1 :background ,turquoise-2bg )))) + `(whitespace-newline ((t (:foreground ,turquoise-2 :background ,turquoise-2bg )))) + `(whitespace-space ((t (:foreground ,turquoise-2 :background ,turquoise-2bg )))) + `(whitespace-space-after-tab ((t (:foreground ,turquoise-2 :background ,turquoise-2bg )))) + `(whitespace-tab ((t (:foreground ,turquoise-2 :background ,turquoise-2bg )))) + `(whitespace-trailing ((t (:foreground ,red-1 :background ,turquoise-2bg )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; flyspell-mode + `(flyspell-incorrect ((t (:underline ,red-2 )))) + `(flyspell-duplicate ((t (:underline ,green-2 )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; flymake-mode + `(flymake-errline ((t (:underline ,red-2 :background nil :inherit nil )))) + `(flymake-warnline ((t (:underline ,green-2 :background nil :inherit nil )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; dropdown-list + `(dropdown-list-selection-face ((t (:foreground ,foam :background ,purple-1bg )))) + `(dropdown-list-face ((t (:foreground ,background :background ,foam )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; git gutter mode + `(git-gutter:added ((t (:foreground ,green-1 :background ,green-2bg )))) + `(git-gutter:deleted ((t (:foreground ,red-1 :background ,red-1bg )))) + `(git-gutter:modified ((t (:foreground ,purple-1 :background ,purple-1bg )))) + `(git-gutter:unchanged ((t ( :background ,yellow-1bg )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; magit + `(magit-item-highlight ((t ( :background ,purple-3bg )))) + `(magit-branch ((t (:foreground ,green-2 :background ,green-2bg )))) + `(magit-whitespace-warning-face ((t (:foreground ,red-3 :background ,red-1bg )))) + `(magit-section-title ((t (:foreground ,purple-1 :background ,purple-1bg )))) + `(magit-header ((t (:foreground ,orange-1 :background ,orange-1bg )))) + `(magit-item-mark ((t (:foreground ,green-1 )))) + `(magit-diff-merge-proposed ((t (:foreground ,foam )))) + `(magit-diff-merge-current ((t (:foreground ,blue-1 )))) + `(magit-diff-merge-separator ((t (:foreground ,blue-2 )))) + `(magit-log-author ((t (:foreground ,purple-1 :background ,purple-1bg )))) + `(magit-log-graph ((t (:foreground ,blue-2 :background ,blue-2bg )))) + `(magit-log-head-label-bisect-good ((t (:foreground ,turquoise-1 :background ,turquoise-1bg )))) + `(magit-log-head-label-local ((t (:foreground ,foam :background ,turquoise-1bg )))) + `(magit-log-head-label-remote ((t (:foreground ,foam :background ,purple-2bg )))) + `(magit-log-message ((t (:foreground ,dirty-crem :background ,background )))) + `(magit-log-date ((t (:foreground ,blue-4 :background ,background )))) + `(magit-log-head-label-bisect-bad ((t (:foreground ,red-1 :background ,red-1bg )))) + `(magit-log-head-label-default ((t (:foreground ,foam :background ,turquoise-1bg )))) + `(magit-log-head-label-patches ((t (:foreground ,blue-2 :background ,blue-1bg )))) + `(magit-log-head-label-tags ((t (:foreground ,orange-1 :background ,orange-1bg )))) + `(magit-log-sha1 ((t (:foreground ,turquoise-1 :background ,turquoise-1bg )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; IEdit + `(iedit-occurrence ((t (:foreground ,green-3 :background ,orange-1bg )))) + `(iedit-read-only-occurrence ((t (:foreground ,red-1 :background ,orange-1bg )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; highlight-indentation-mode + `(highlight-indentation-face ((t ( :background ,background-dark )))) + `(highlight-indentation-current-column-face ((t ( :background ,gray-5 )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; ECB + `(ecb-default-general-face ((t (:foreground ,gray-1 :background ,gray-1bg )))) + `(ecb-default-highlight-face ((t (:foreground ,red-1 :background ,red-1bg )))) + `(ecb-method-face ((t (:foreground ,red-1 :background ,red-1bg )))) + `(ecb-tag-header-face ((t ( :background ,blue-2bg )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; org-mode + `(org-date ((t (:foreground ,purple-1 :background ,purple-1bg )))) + `(org-done ((t (:foreground ,green-1 :background ,green-1bg )))) + `(org-hide ((t (:foreground ,gray-3 :background ,gray-1bg )))) + `(org-link ((t (:foreground ,blue-1 :background ,blue-1bg )))) + `(org-todo ((t (:foreground ,red-1 :background ,red-1bg )))) + ;;----------------------------------------------------------------------------------------------------------------------- + ;; cua-mode + `(cua-global-mark ((t(:foreground ,foam :background ,turquoise-1 )))) + `(cua-rectangle ((t(:foreground ,foam :background ,purple-4 )))) + `(cua-rectangle-noselect ((t(:foreground ,foam :background ,orange-1 )))) + + ;;----------------------------------------------------------------------------------------------------------------------- + ;; smartparens + `(sp-show-pair-match-face ((t (:foreground nil :background "grey10")))) + ) + + (custom-theme-set-variables + 'soothe + + `(main-line-color1 ,gray-6bg) + `(main-line-color2 ,gray-2bg) + + `(main-line-separator-style + 'chamfer + ) + + `(powerline-color1 ,gray-6bg) + `(powerline-color2 ,gray-2bg) + + ;; `(Linum-format "%7i ") + `(fringe-mode 4) + + ;; Fill Column Indicator mode + `(fci-rule-color ,gray-6) + `(fci-rule-character-color ,gray-6) + + `(ansi-color-names-vector + ;; black, red, green, yellow, blue, magenta, cyan, white + [,background ,red-1 ,green-1 ,yellow-1 ,blue-1 ,purple-1 ,blue-3 ,foreground]) + `(ansi-term-color-vector + ;; black, red, green, yellow, blue, magenta, cyan, white + [unspecified ,background ,red-1 ,green-1 ,yellow-1 ,blue-1 ,purple-1 ,blue-3 ,foreground]) + ) + ) + +;; Rainbow delimiters +(defun soothe-rainbow-delim-set-face () + (set-face-attribute 'rainbow-delimiters-depth-1-face nil :foreground "#2B583D") + (set-face-attribute 'rainbow-delimiters-depth-2-face nil :foreground "#2B5858") + (set-face-attribute 'rainbow-delimiters-depth-3-face nil :foreground "#2B3C58") + (set-face-attribute 'rainbow-delimiters-depth-4-face nil :foreground "#342B58") + (set-face-attribute 'rainbow-delimiters-depth-5-face nil :foreground "#4F2B58") + (set-face-attribute 'rainbow-delimiters-depth-6-face nil :foreground "#582B45") + (set-face-attribute 'rainbow-delimiters-depth-7-face nil :foreground "#58462B") + (set-face-attribute 'rainbow-delimiters-depth-8-face nil :foreground "#4E582B") + (set-face-attribute 'rainbow-delimiters-depth-9-face nil :foreground "#33582B") + (set-face-attribute 'rainbow-delimiters-unmatched-face nil :foreground "#660000")) + + +(eval-after-load "rainbow-delimiters" '(soothe-rainbow-delim-set-face)) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'soothe) + +;;; List of themes to include... + +;;; Man-overstrike +;;; Man-reverse +;;; Man-underline + +;;; bold +;;; bold-italic +;;; border +;;; buffer-menu-buffer +;;; button + +;;; c-annotation-face + +;;; change-log-acknowledgment +;;; change-log-conditionals +;;; change-log-date +;;; change-log-email +;;; change-log-file +;;; change-log-function +;;; change-log-list +;;; change-log-name + +;;; comint-highlight-input +;;; comint-highlight-prompt + +;;; completions-annotations +;;; completions-common-part +;;; completions-first-difference + +;;; custom-button +;;; custom-button-mouse +;;; custom-button-pressed +;;; custom-button-pressed-unraised +;;; custom-button-unraised +;;; custom-changed +;;; custom-comment +;;; custom-comment-tag +;;; custom-documentation +;;; custom-face-tag +;;; custom-group-subtitle +;;; custom-group-tag +;;; custom-group-tag-1 +;;; custom-invalid +;;; custom-link +;;; custom-modified +;;; custom-rogue +;;; custom-saved +;;; custom-set +;;; custom-state +;;; custom-themed +;;; custom-variable-button +;;; custom-variable-tag +;;; custom-visibility + +;;; ecb-default-general-face +;;; ecb-default-highlight-face +;;; ecb-method-face +;;; ecb-tag-header-face + +;;; error +;;; escape-glyph +;;; file-name-shadow +;;; fixed-pitch + +;;; glyphless-char + +;;; header-line +;;; help-argument-name + +;;; hi-black-b +;;; hi-black-hb +;;; hi-blue +;;; hi-blue-b +;;; hi-green +;;; hi-green-b +;;; hi-pink +;;; hi-red-b +;;; hi-yellow + +;;; hideshowvis-hidable-face + +;;; highlight +;;; highlight-changes +;;; highlight-changes-delete +;;; highlight-indentation-current-column-face +;;; highlight-indentation-face + +;;; hl-line + +;;; hs-face +;;; hs-fringe-face + +;;; info-header-node +;;; info-header-xref +;;; info-menu-header +;;; info-menu-star +;;; info-node +;;; info-title-1 +;;; info-title-2 +;;; info-title-3 +;;; info-title-4 +;;; info-xref +;;; info-xref-visited + +;;; italic + +;;; lazy-highlight + +;;; link +;;; link-visited + +;;; log-edit-header +;;; log-edit-summary +;;; log-edit-unknown-header + +;;; mac-ts-caret-position +;;; mac-ts-converted-text +;;; mac-ts-raw-text +;;; mac-ts-selected-converted-text + +;;; match +;;; menu + +;;; message-cited-text +;;; message-header-cc +;;; message-header-name +;;; message-header-newsgroups +;;; message-header-other +;;; message-header-subject +;;; message-header-to +;;; message-header-xheader +;;; message-mml +;;; message-separator + +;;; minibuffer-prompt + + +;;; mouse + +;;; next-error + +;;; nobreak-space + +;;; org-date +;;; org-done +;;; org-hide +;;; org-link +;;; org-todo + +;;; powerline-active1 +;;; powerline-active2 +;;; powerline-inactive1 +;;; powerline-inactive2 + +;;; proced-mark +;;; proced-marked +;;; proced-sort-header + +;;; query-replace + +;;; rcirc-bright-nick +;;; rcirc-dim-nick +;;; rcirc-keyword +;;; rcirc-my-nick +;;; rcirc-nick-in-message +;;; rcirc-nick-in-message-full-line +;;; rcirc-other-nick +;;; rcirc-prompt +;;; rcirc-server +;;; rcirc-server-prefix +;;; rcirc-timestamp +;;; rcirc-track-keyword +;;; rcirc-track-nick +;;; rcirc-url + +;;; rst-adornment +;;; rst-block +;;; rst-comment +;;; rst-definition +;;; rst-directive +;;; rst-emphasis1 +;;; rst-emphasis2 +;;; rst-external +;;; rst-level-1 +;;; rst-level-2 +;;; rst-level-3 +;;; rst-level-4 +;;; rst-level-5 +;;; rst-level-6 +;;; rst-literal +;;; rst-reference +;;; rst-transition + +;;; scroll-bar + +;;; secondary-selection +;;; shadow + +;;; show-paren-match +;;; show-paren-mismatch + +;;; speedbar-button-face +;;; speedbar-directory-face +;;; speedbar-file-face +;;; speedbar-highlight-face +;;; speedbar-selected-face +;;; speedbar-separator-face +;;; speedbar-tag-face + +;;; success + +;;; tool-bar + + +;;; trailing-whitespace + +;;; underline + +;;; variable-pitch + +;;; vertical-border + +;;; w3m-anchor +;;; w3m-arrived-anchor +;;; w3m-bold +;;; w3m-current-anchor +;;; w3m-form-button +;;; w3m-form-button-mouse +;;; w3m-form-button-pressed +;;; w3m-header-line-location-content +;;; w3m-header-line-location-title +;;; w3m-history-current-url +;;; w3m-image +;;; w3m-image-anchor +;;; w3m-insert +;;; w3m-italic +;;; w3m-strike-through +;;; w3m-tab-background +;;; w3m-tab-mouse +;;; w3m-tab-selected +;;; w3m-tab-selected-background +;;; w3m-tab-selected-retrieving +;;; w3m-tab-unselected +;;; w3m-tab-unselected-retrieving +;;; w3m-tab-unselected-unseen +;;; w3m-underline + +;;; warning + +;;; whitespace-empty +;;; whitespace-hspace +;;; whitespace-indentation +;;; whitespace-line +;;; whitespace-newline +;;; whitespace-space +;;; whitespace-space-after-tab +;;; whitespace-tab +;;; whitespace-trailing + +;;; widget-button +;;; widget-button-pressed +;;; widget-documentation +;;; widget-field +;;; widget-inactive +;;; widget-single-line-field + +;;; woman-addition +;;; woman-bold +;;; woman-italic +;;; woman-unknown + +;;; yas--field-debug-face +;;; yas-field-highlight-face + +;;; soothe-theme.el ends here |