From 70888bc547338ed21b05ce537fc94dcd790f96f5 Mon Sep 17 00:00:00 2001 From: José Mota Date: Wed, 8 Jun 2016 09:58:40 +0100 Subject: Vim and emacs templates. #wip --- templates/emacs.el | 455 +++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 455 insertions(+) create mode 100644 templates/emacs.el (limited to 'templates/emacs.el') diff --git a/templates/emacs.el b/templates/emacs.el new file mode 100644 index 0000000..22c89a1 --- /dev/null +++ b/templates/emacs.el @@ -0,0 +1,455 @@ +;; Base16 Thomas (https://github.com/chriskempson/base16) +;; Scheme: José Mota (http://github.com/josemotanet) + +;;; base16-thomas-dark-theme.el + +;;; Code: + +(deftheme thomas) + +(let ((background "#{{BACKGROUND}}") + (darker "#{{DARKER}}") + (dark "#{{DARK}}") + (dark-gray "#{{DARK_GRAY}}") + (light-gray "#{{LIGHT_GRAY}}") + (light "#{{LIGHT}}") + (lighter "#{{LIGHTER}}") + (foreground "#{{FOREGROUND}}") + (red "#{{RED}}") + (orange "#{{ORANGE}}") + (yellow "#{{YELLOW}}") + (green "#{{GREEN}}") + (aqua "#{{AQUA}}") + (blue "#{{BLUE}}") + (purple "#{{PURPLE}}") + (brown "#{{BROWN}}")) + + (custom-theme-set-faces + 'thomas + + ;; Built-in stuff (Emacs 23) + `(border ((t (:background ,darker)))) + `(border-glyph ((t (nil)))) + `(cursor ((t (:background ,red)))) + `(default ((t (:background ,background :foreground ,foreground)))) + `(fringe ((t (:background ,background)))) + `(gui-element ((t (:background ,dark-gray :foreground ,lighter)))) + `(highlight ((t (:background ,darker)))) + `(link ((t (:foreground ,blue)))) + `(link-visited ((t (:foreground ,purple)))) + `(minibuffer-prompt ((t (:foreground ,blue)))) + `(mode-line ((t (:background ,dark :foreground ,light-gray :box nil)))) + `(mode-line-buffer-id ((t (:foreground ,purple :background nil)))) + `(mode-line-emphasis ((t (:foreground ,lighter :slant italic)))) + `(mode-line-highlight ((t (:foreground ,purple :box nil :weight bold)))) + `(mode-line-inactive ((t (:background ,darker :foreground ,dark-gray :box nil)))) + `(region ((t (:background ,dark)))) + `(secondary-selection ((t (:background ,dark-gray)))) + `(error ((t (:foreground ,red :weight bold)))) + `(warning ((t (:foreground ,orange :weight bold)))) + `(success ((t (:foreground ,green :weight bold)))) + + `(header-line ((t (:inherit mode-line :foreground ,purple :background nil)))) + + ;; Font-lock stuff + `(font-lock-builtin-face ((t (:foreground ,aqua)))) + `(font-lock-comment-delimiter-face ((t (:foreground ,dark)))) + `(font-lock-comment-face ((t (:foreground ,dark)))) + `(font-lock-constant-face ((t (:foreground ,orange)))) + `(font-lock-doc-face ((t (:foreground ,light-gray)))) + `(font-lock-doc-string-face ((t (:foreground ,dark-gray)))) + `(font-lock-function-name-face ((t (:foreground ,blue)))) + `(font-lock-keyword-face ((t (:foreground ,red)))) + `(font-lock-negation-char-face ((t (:foreground ,green)))) + `(font-lock-preprocessor-face ((t (:foreground ,blue)))) + `(font-lock-regexp-grouping-backslash ((t (:foreground ,yellow)))) + `(font-lock-regexp-grouping-construct ((t (:foreground ,purple)))) + `(font-lock-string-face ((t (:foreground ,green)))) + `(font-lock-type-face ((t (:foreground ,yellow)))) + `(font-lock-variable-name-face ((t (:foreground ,aqua)))) + `(font-lock-warning-face ((t (:foreground ,red)))) + + ;; linum-mode + `(linum ((t (:background ,darker :foreground ,dark-gray)))) + + ;; Search + `(match ((t (:foreground ,blue :background ,darker :inverse-video t)))) + `(isearch ((t (:foreground ,yellow :background ,darker :inverse-video t)))) + `(isearch-lazy-highlight-face ((t (:foreground ,aqua :background ,darker :inverse-video t)))) + `(isearch-fail ((t (:background ,darker :inherit font-lock-warning-face :inverse-video t)))) + + ;; Flymake + `(flymake-warnline ((t (:underline ,orange :background ,darker)))) + `(flymake-errline ((t (:underline ,red :background ,darker)))) + + ;; Clojure errors + `(clojure-test-failure-face ((t (:background nil :inherit flymake-warnline)))) + `(clojure-test-error-face ((t (:background nil :inherit flymake-errline)))) + `(clojure-test-success-face ((t (:background nil :foreground nil :underline ,green)))) + + ;; For Brian Carper's extended clojure syntax table + `(clojure-keyword ((t (:foreground ,yellow)))) + `(clojure-parens ((t (:foreground ,lighter)))) + `(clojure-braces ((t (:foreground ,green)))) + `(clojure-brackets ((t (:foreground ,yellow)))) + `(clojure-double-quote ((t (:foreground ,aqua :background nil)))) + `(clojure-special ((t (:foreground ,blue)))) + `(clojure-java-call ((t (:foreground ,purple)))) + + ;; MMM-mode + `(mmm-code-submode-face ((t (:background ,dark-gray)))) + `(mmm-comment-submode-face ((t (:inherit font-lock-comment-face)))) + `(mmm-output-submode-face ((t (:background ,dark-gray)))) + + ;; rainbow-delimiters + `(rainbow-delimiters-depth-1-face ((t (:foreground ,purple)))) + `(rainbow-delimiters-depth-2-face ((t (:foreground ,blue)))) + `(rainbow-delimiters-depth-3-face ((t (:foreground ,aqua)))) + `(rainbow-delimiters-depth-4-face ((t (:foreground ,green)))) + `(rainbow-delimiters-depth-5-face ((t (:foreground ,yellow)))) + `(rainbow-delimiters-depth-6-face ((t (:foreground ,orange)))) + `(rainbow-delimiters-depth-7-face ((t (:foreground ,red)))) + `(rainbow-delimiters-depth-8-face ((t (:foreground ,dark-gray)))) + `(rainbow-delimiters-depth-9-face ((t (:foreground ,light)))) + + ;; IDO + `(ido-subdir ((t (:foreground ,light-gray)))) + `(ido-first-match ((t (:foreground ,orange :weight bold)))) + `(ido-only-match ((t (:foreground ,red :weight bold)))) + `(ido-indicator ((t (:foreground ,red :background ,darker)))) + `(ido-virtual ((t (:foreground ,light-gray)))) + + ;; which-function + `(which-func ((t (:foreground ,blue :background nil :weight bold)))) + + `(trailing-whitespace ((t (:background ,aqua :foreground ,yellow)))) + `(whitespace-empty ((t (:foreground ,red :background ,yellow)))) + `(whitespace-hspace ((t (:background ,light-gray :foreground ,light-gray)))) + `(whitespace-indentation ((t (:background ,yellow :foreground ,red)))) + `(whitespace-line ((t (:background ,darker :foreground ,brown)))) + `(whitespace-newline ((t (:foreground ,dark-gray)))) + `(whitespace-space ((t (:background ,darker :foreground ,light-gray)))) + `(whitespace-space-after-tab ((t (:background ,yellow :foreground ,red)))) + `(whitespace-space-before-tab ((t (:background ,orange :foreground ,red)))) + `(whitespace-tab ((t (:background ,light-gray :foreground ,light-gray)))) + `(whitespace-trailing ((t (:background ,red :foreground ,yellow)))) + + ;; Parenthesis matching (built-in) + `(show-paren-match ((t (:background ,dark :foreground ,light-gray)))) + `(show-paren-mismatch ((t (:background ,orange :foreground ,dark-gray)))) + + ;; Parenthesis matching (mic-paren) + `(paren-face-match ((t (:foreground nil :background nil :inherit show-paren-match)))) + `(paren-face-mismatch ((t (:foreground nil :background nil :inherit show-paren-mismatch)))) + `(paren-face-no-match ((t (:foreground nil :background nil :inherit show-paren-mismatch)))) + + ;; Parenthesis dimming (parenface) + `(paren-face ((t (:foreground ,light-gray :background nil)))) + + `(sh-heredoc ((t (:foreground nil :inherit font-lock-string-face :weight normal)))) + `(sh-quoted-exec ((t (:foreground nil :inherit font-lock-preprocessor-face)))) + `(slime-highlight-edits-face ((t (:weight bold)))) + `(slime-repl-input-face ((t (:weight normal :underline nil)))) + `(slime-repl-prompt-face ((t (:underline nil :weight bold :foreground ,purple)))) + `(slime-repl-result-face ((t (:foreground ,green)))) + `(slime-repl-output-face ((t (:foreground ,blue :background ,darker)))) + + `(csv-separator-face ((t (:foreground ,orange)))) + + `(diff-added ((t (:foreground ,green)))) + `(diff-changed ((t (:foreground ,yellow)))) + `(diff-removed ((t (:foreground ,red)))) + `(diff-header ((t (:background ,darker)))) + `(diff-file-header ((t (:background ,dark)))) + `(diff-hunk-header ((t (:background ,darker :foreground ,purple)))) + + `(ediff-even-diff-A ((t (:foreground nil :background nil :inverse-video t)))) + `(ediff-even-diff-B ((t (:foreground nil :background nil :inverse-video t)))) + `(ediff-odd-diff-A ((t (:foreground ,light-gray :background nil :inverse-video t)))) + `(ediff-odd-diff-B ((t (:foreground ,light-gray :background nil :inverse-video t)))) + + `(eldoc-highlight-function-argument ((t (:foreground ,green :weight bold)))) + + ;; undo-tree + `(undo-tree-visualizer-default-face ((t (:foreground ,lighter)))) + `(undo-tree-visualizer-current-face ((t (:foreground ,green :weight bold)))) + `(undo-tree-visualizer-active-branch-face ((t (:foreground ,red)))) + `(undo-tree-visualizer-register-face ((t (:foreground ,yellow)))) + + ;; auctex + `(font-latex-bold-face ((t (:foreground ,green)))) + `(font-latex-doctex-documentation-face ((t (:background ,dark-gray)))) + `(font-latex-italic-face ((t (:foreground ,green)))) + `(font-latex-math-face ((t (:foreground ,orange)))) + `(font-latex-sectioning-0-face ((t (:foreground ,yellow)))) + `(font-latex-sectioning-1-face ((t (:foreground ,yellow)))) + `(font-latex-sectioning-2-face ((t (:foreground ,yellow)))) + `(font-latex-sectioning-3-face ((t (:foreground ,yellow)))) + `(font-latex-sectioning-4-face ((t (:foreground ,yellow)))) + `(font-latex-sectioning-5-face ((t (:foreground ,yellow)))) + `(font-latex-sedate-face ((t (:foreground ,aqua)))) + `(font-latex-string-face ((t (:foreground ,yellow)))) + `(font-latex-verbatim-face ((t (:foreground ,orange)))) + `(font-latex-warning-face ((t (:foreground ,red)))) + + ;; dired+ + `(diredp-compressed-file-suffix ((t (:foreground ,blue)))) + `(diredp-dir-heading ((t (:foreground nil :background nil :inherit heading)))) + `(diredp-dir-priv ((t (:foreground ,aqua :background nil)))) + `(diredp-exec-priv ((t (:foreground ,blue :background nil)))) + `(diredp-executable-tag ((t (:foreground ,red :background nil)))) + `(diredp-file-name ((t (:foreground ,yellow)))) + `(diredp-file-suffix ((t (:foreground ,green)))) + `(diredp-flag-mark-line ((t (:background nil :inherit highlight)))) + `(diredp-ignored-file-name ((t (:foreground ,light-gray)))) + `(diredp-link-priv ((t (:background nil :foreground ,purple)))) + `(diredp-mode-line-flagged ((t (:foreground ,red)))) + `(diredp-mode-line-marked ((t (:foreground ,green)))) + `(diredp-no-priv ((t (:background nil)))) + `(diredp-number ((t (:foreground ,yellow)))) + `(diredp-other-priv ((t (:background nil :foreground ,purple)))) + `(diredp-rare-priv ((t (:foreground ,red :background nil)))) + `(diredp-read-priv ((t (:foreground ,green :background nil)))) + `(diredp-symlink ((t (:foreground ,purple)))) + `(diredp-write-priv ((t (:foreground ,yellow :background nil)))) + + ;; term and ansi-term + `(term-color-black ((t (:foreground ,dark :background ,background)))) + `(term-color-white ((t (:foreground ,light :background ,foreground)))) + `(term-color-red ((t (:foreground ,red :background ,red)))) + `(term-color-yellow ((t (:foreground ,yellow :background ,yellow)))) + `(term-color-green ((t (:foreground ,green :background ,green)))) + `(term-color-cyan ((t (:foreground ,aqua :background ,aqua)))) + `(term-color-blue ((t (:foreground ,blue :background ,blue)))) + `(term-color-magenta ((t (:foreground ,purple :background ,purple)))) + + ;; Magit (a patch is pending in magit to make these standard upstream) + `(magit-branch ((t (:foreground ,green)))) + `(magit-header ((t (:inherit nil :weight bold)))) + `(magit-item-highlight ((t (:inherit highlight :background nil)))) + `(magit-log-graph ((t (:foreground ,light-gray)))) + `(magit-log-sha1 ((t (:foreground ,purple)))) + `(magit-log-head-label-bisect-bad ((t (:foreground ,red)))) + `(magit-log-head-label-bisect-good ((t (:foreground ,green)))) + `(magit-log-head-label-default ((t (:foreground ,yellow :box nil :weight bold)))) + `(magit-log-head-label-local ((t (:foreground ,blue)))) + `(magit-log-head-label-remote ((t (:foreground ,green)))) + `(magit-log-head-label-tags ((t (:foreground ,aqua :box nil :weight bold)))) + `(magit-section-title ((t (:inherit diff-hunk-header)))) + + `(link ((t (:foreground nil :underline t)))) + `(widget-button ((t (:underline t)))) + `(widget-field ((t (:background ,dark-gray :box (:line-width 1 :color ,lighter))))) + + ;; Compilation (most faces politely inherit from 'success, 'error, 'warning etc.) + `(compilation-column-number ((t (:foreground ,yellow)))) + `(compilation-line-number ((t (:foreground ,yellow)))) + `(compilation-message-face ((t (:foreground ,blue)))) + `(compilation-mode-line-exit ((t (:foreground ,green)))) + `(compilation-mode-line-fail ((t (:foreground ,red)))) + `(compilation-mode-line-run ((t (:foreground ,blue)))) + + ;; Grep + `(grep-context-face ((t (:foreground ,light-gray)))) + `(grep-error-face ((t (:foreground ,red :weight bold :underline t)))) + `(grep-hit-face ((t (:foreground ,blue)))) + `(grep-match-face ((t (:foreground nil :background nil :inherit match)))) + + `(regex-tool-matched-face ((t (:foreground nil :background nil :inherit match)))) + + ;; mark-multiple + `(mm/master-face ((t (:inherit region :foreground nil :background nil)))) + `(mm/mirror-face ((t (:inherit region :foreground nil :background nil)))) + + ;; org-mode + `(org-agenda-structure ((t (:foreground ,purple)))) + `(org-agenda-date ((t (:foreground ,blue :underline nil)))) + `(org-agenda-done ((t (:foreground ,green)))) + `(org-agenda-dimmed-todo-face ((t (:foreground ,light-gray)))) + `(org-block ((t (:foreground ,orange)))) + `(org-code ((t (:foreground ,yellow)))) + `(org-column ((t (:background ,dark-gray)))) + `(org-column-title ((t (:inherit org-column :weight bold :underline t)))) + `(org-date ((t (:foreground ,purple :underline t)))) + `(org-document-info ((t (:foreground ,aqua)))) + `(org-document-info-keyword ((t (:foreground ,green)))) + `(org-document-title ((t (:weight bold :foreground ,orange :height 1.44)))) + `(org-done ((t (:foreground ,green)))) + `(org-ellipsis ((t (:foreground ,light-gray)))) + `(org-footnote ((t (:foreground ,aqua)))) + `(org-formula ((t (:foreground ,red)))) + `(org-hide ((t (:foreground ,dark-gray)))) + `(org-link ((t (:foreground ,blue)))) + `(org-scheduled ((t (:foreground ,green)))) + `(org-scheduled-previously ((t (:foreground ,orange)))) + `(org-scheduled-today ((t (:foreground ,green)))) + `(org-special-keyword ((t (:foreground ,orange)))) + `(org-table ((t (:foreground ,purple)))) + `(org-todo ((t (:foreground ,red)))) + `(org-upcoming-deadline ((t (:foreground ,orange)))) + `(org-warning ((t (:weight bold :foreground ,red)))) + + `(markdown-url-face ((t (:inherit link)))) + `(markdown-link-face ((t (:foreground ,blue :underline t)))) + + `(hl-sexp-face ((t (:background ,dark-gray)))) + `(highlight-80+ ((t (:background ,dark-gray)))) + + ;; Python-specific overrides + `(py-builtins-face ((t (:foreground ,orange :weight normal)))) + + ;; js2-mode + `(js2-warning-face ((t (:underline ,orange)))) + `(js2-error-face ((t (:foreground nil :underline ,red)))) + `(js2-external-variable-face ((t (:foreground ,purple)))) + `(js2-function-param-face ((t (:foreground ,blue)))) + `(js2-instance-member-face ((t (:foreground ,blue)))) + `(js2-private-function-call-face ((t (:foreground ,red)))) + + ;; js3-mode + `(js3-warning-face ((t (:underline ,orange)))) + `(js3-error-face ((t (:foreground nil :underline ,red)))) + `(js3-external-variable-face ((t (:foreground ,purple)))) + `(js3-function-param-face ((t (:foreground ,blue)))) + `(js3-jsdoc-tag-face ((t (:foreground ,orange)))) + `(js3-jsdoc-type-face ((t (:foreground ,aqua)))) + `(js3-jsdoc-value-face ((t (:foreground ,yellow)))) + `(js3-jsdoc-html-tag-name-face ((t (:foreground ,blue)))) + `(js3-jsdoc-html-tag-delimiter-face ((t (:foreground ,green)))) + `(js3-instance-member-face ((t (:foreground ,blue)))) + `(js3-private-function-call-face ((t (:foreground ,red)))) + + ;; nxml + `(nxml-name-face ((t (:foreground unspecified :inherit font-lock-constant-face)))) + `(nxml-attribute-local-name-face ((t (:foreground unspecified :inherit font-lock-variable-name-face)))) + `(nxml-ref-face ((t (:foreground unspecified :inherit font-lock-preprocessor-face)))) + `(nxml-delimiter-face ((t (:foreground unspecified :inherit font-lock-keyword-face)))) + `(nxml-delimited-data-face ((t (:foreground unspecified :inherit font-lock-string-face)))) + `(rng-error-face ((t (:underline ,red)))) + + ;; RHTML + `(erb-delim-face ((t (:background ,dark-gray)))) + `(erb-exec-face ((t (:background ,dark-gray :weight bold)))) + `(erb-exec-delim-face ((t (:background ,dark-gray)))) + `(erb-out-face ((t (:background ,dark-gray :weight bold)))) + `(erb-out-delim-face ((t (:background ,dark-gray)))) + `(erb-comment-face ((t (:background ,dark-gray :weight bold :slant italic)))) + `(erb-comment-delim-face ((t (:background ,dark-gray)))) + + ;; Message-mode + `(message-header-other ((t (:foreground nil :background nil :weight normal)))) + `(message-header-subject ((t (:inherit message-header-other :weight bold :foreground ,yellow)))) + `(message-header-to ((t (:inherit message-header-other :weight bold :foreground ,orange)))) + `(message-header-cc ((t (:inherit message-header-to :foreground nil)))) + `(message-header-name ((t (:foreground ,blue :background nil)))) + `(message-header-newsgroups ((t (:foreground ,aqua :background nil :slant normal)))) + `(message-separator ((t (:foreground ,purple)))) + + ;; Jabber + `(jabber-chat-prompt-local ((t (:foreground ,yellow)))) + `(jabber-chat-prompt-foreign ((t (:foreground ,orange)))) + `(jabber-chat-prompt-system ((t (:foreground ,yellow :weight bold)))) + `(jabber-chat-text-local ((t (:foreground ,yellow)))) + `(jabber-chat-text-foreign ((t (:foreground ,orange)))) + `(jabber-chat-text-error ((t (:foreground ,red)))) + + `(jabber-roster-user-online ((t (:foreground ,green)))) + `(jabber-roster-user-xa ((t :foreground ,light-gray))) + `(jabber-roster-user-dnd ((t :foreground ,yellow))) + `(jabber-roster-user-away ((t (:foreground ,orange)))) + `(jabber-roster-user-chatty ((t (:foreground ,purple)))) + `(jabber-roster-user-error ((t (:foreground ,red)))) + `(jabber-roster-user-offline ((t (:foreground ,light-gray)))) + + `(jabber-rare-time-face ((t (:foreground ,light-gray)))) + `(jabber-activity-face ((t (:foreground ,purple)))) + `(jabber-activity-personal-face ((t (:foreground ,aqua)))) + + ;; Gnus + `(gnus-cite-1 ((t (:inherit outline-1 :foreground nil)))) + `(gnus-cite-2 ((t (:inherit outline-2 :foreground nil)))) + `(gnus-cite-3 ((t (:inherit outline-3 :foreground nil)))) + `(gnus-cite-4 ((t (:inherit outline-4 :foreground nil)))) + `(gnus-cite-5 ((t (:inherit outline-5 :foreground nil)))) + `(gnus-cite-6 ((t (:inherit outline-6 :foreground nil)))) + `(gnus-cite-7 ((t (:inherit outline-7 :foreground nil)))) + `(gnus-cite-8 ((t (:inherit outline-8 :foreground nil)))) + ;; there are several more -cite- faces... + `(gnus-header-content ((t (:inherit message-header-other)))) + `(gnus-header-subject ((t (:inherit message-header-subject)))) + `(gnus-header-from ((t (:inherit message-header-other-face :weight bold :foreground ,orange)))) + `(gnus-header-name ((t (:inherit message-header-name)))) + `(gnus-button ((t (:inherit link :foreground nil)))) + `(gnus-signature ((t (:inherit font-lock-comment-face)))) + + `(gnus-summary-normal-unread ((t (:foreground ,blue :weight normal)))) + `(gnus-summary-normal-read ((t (:foreground ,lighter :weight normal)))) + `(gnus-summary-normal-ancient ((t (:foreground ,aqua :weight normal)))) + `(gnus-summary-normal-ticked ((t (:foreground ,orange :weight normal)))) + `(gnus-summary-low-unread ((t (:foreground ,light-gray :weight normal)))) + `(gnus-summary-low-read ((t (:foreground ,light-gray :weight normal)))) + `(gnus-summary-low-ancient ((t (:foreground ,light-gray :weight normal)))) + `(gnus-summary-high-unread ((t (:foreground ,yellow :weight normal)))) + `(gnus-summary-high-read ((t (:foreground ,green :weight normal)))) + `(gnus-summary-high-ancient ((t (:foreground ,green :weight normal)))) + `(gnus-summary-high-ticked ((t (:foreground ,orange :weight normal)))) + `(gnus-summary-cancelled ((t (:foreground ,red :background nil :weight normal)))) + + `(gnus-group-mail-low ((t (:foreground ,light-gray)))) + `(gnus-group-mail-low-empty ((t (:foreground ,light-gray)))) + `(gnus-group-mail-1 ((t (:foreground nil :weight normal :inherit outline-1)))) + `(gnus-group-mail-2 ((t (:foreground nil :weight normal :inherit outline-2)))) + `(gnus-group-mail-3 ((t (:foreground nil :weight normal :inherit outline-3)))) + `(gnus-group-mail-4 ((t (:foreground nil :weight normal :inherit outline-4)))) + `(gnus-group-mail-5 ((t (:foreground nil :weight normal :inherit outline-5)))) + `(gnus-group-mail-6 ((t (:foreground nil :weight normal :inherit outline-6)))) + `(gnus-group-mail-1-empty ((t (:inherit gnus-group-mail-1 :foreground ,light-gray)))) + `(gnus-group-mail-2-empty ((t (:inherit gnus-group-mail-2 :foreground ,light-gray)))) + `(gnus-group-mail-3-empty ((t (:inherit gnus-group-mail-3 :foreground ,light-gray)))) + `(gnus-group-mail-4-empty ((t (:inherit gnus-group-mail-4 :foreground ,light-gray)))) + `(gnus-group-mail-5-empty ((t (:inherit gnus-group-mail-5 :foreground ,light-gray)))) + `(gnus-group-mail-6-empty ((t (:inherit gnus-group-mail-6 :foreground ,light-gray)))) + `(gnus-group-news-1 ((t (:foreground nil :weight normal :inherit outline-5)))) + `(gnus-group-news-2 ((t (:foreground nil :weight normal :inherit outline-6)))) + `(gnus-group-news-3 ((t (:foreground nil :weight normal :inherit outline-7)))) + `(gnus-group-news-4 ((t (:foreground nil :weight normal :inherit outline-8)))) + `(gnus-group-news-5 ((t (:foreground nil :weight normal :inherit outline-1)))) + `(gnus-group-news-6 ((t (:foreground nil :weight normal :inherit outline-2)))) + `(gnus-group-news-1-empty ((t (:inherit gnus-group-news-1 :foreground ,light-gray)))) + `(gnus-group-news-2-empty ((t (:inherit gnus-group-news-2 :foreground ,light-gray)))) + `(gnus-group-news-3-empty ((t (:inherit gnus-group-news-3 :foreground ,light-gray)))) + `(gnus-group-news-4-empty ((t (:inherit gnus-group-news-4 :foreground ,light-gray)))) + `(gnus-group-news-5-empty ((t (:inherit gnus-group-news-5 :foreground ,light-gray)))) + `(gnus-group-news-6-empty ((t (:inherit gnus-group-news-6 :foreground ,light-gray)))) + + `(erc-direct-msg-face ((t (:foreground ,orange)))) + `(erc-error-face ((t (:foreground ,red)))) + `(erc-header-face ((t (:foreground ,lighter :background ,light-gray)))) + `(erc-input-face ((t (:foreground ,green)))) + `(erc-keyword-face ((t (:foreground ,yellow)))) + `(erc-current-nick-face ((t (:foreground ,green)))) + `(erc-my-nick-face ((t (:foreground ,green)))) + `(erc-nick-default-face ((t (:weight normal :foreground ,purple)))) + `(erc-nick-msg-face ((t (:weight normal :foreground ,yellow)))) + `(erc-notice-face ((t (:foreground ,light-gray)))) + `(erc-pal-face ((t (:foreground ,orange)))) + `(erc-prompt-face ((t (:foreground ,blue)))) + `(erc-timestamp-face ((t (:foreground ,aqua)))) + + `(custom-variable-tag ((t (:foreground ,blue)))) + `(custom-group-tag ((t (:foreground ,blue)))) + `(custom-state ((t (:foreground ,green))))) + + (custom-theme-set-variables + 'thomas + + `(ansi-color-names-vector + ;; black, red, green, yellow, blue, magenta, cyan, white + [,background ,red ,green ,yellow ,blue ,purple ,blue ,light]) + `(ansi-term-color-vector + ;; black, red, green, yellow, blue, magenta, cyan, white + [unspecified ,background ,red ,green ,yellow ,blue ,purple ,blue ,light]))) + +(provide-theme 'thomas) + +;;; thomas-theme.el ends here -- cgit v1.2.3-54-g00ecf