diff --git a/replace-colorthemes/.gitignore b/replace-colorthemes/.gitignore new file mode 100644 index 0000000..3843b04 --- /dev/null +++ b/replace-colorthemes/.gitignore @@ -0,0 +1,3 @@ +conf.el +*.elc +update_readme.pl diff --git a/replace-colorthemes/Changes b/replace-colorthemes/Changes new file mode 100644 index 0000000..cc31b54 --- /dev/null +++ b/replace-colorthemes/Changes @@ -0,0 +1,8 @@ +Revision history for color-theme-modern + +Revision 0.0.2 2016/04/12 syohex + - Fix wrong cursor color configurations of themes(#19, #20) + Thanks vedvyas + +Revision 0.0.1 2015/11/11 syohex + - Register MELPA diff --git a/replace-colorthemes/LICENSE b/replace-colorthemes/LICENSE new file mode 100644 index 0000000..c1b1549 --- /dev/null +++ b/replace-colorthemes/LICENSE @@ -0,0 +1,43 @@ +Source: https://github.com/emacs-jp/replace-colorthemes + +Files: * +Copyright: [please refer to the individual files] +License: GPL-3+ + 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 . + +Files: railscast-theme.el +Copyright: 2009 Oleg Shaldybin + 2014 by Syohei YOSHIDA +License: MIT + Permission is hereby granted, free of charge, to any person + obtaining a copy of this software and associated documentation + files (the "Software"), to deal in the Software without + restriction, including without limitation the rights to use, + copy, modify, merge, publish, distribute, sublicense, and/or + sell copies of the Software, and to permit persons to whom the + Software is furnished to do so, subject to the following + conditions: + + The above copyright notice and this permission notice shall + be included in all copies or substantial portions of the + Software. + + THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, + EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES + OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND + NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT + HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, + WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING + FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR + OTHER DEALINGS IN THE SOFTWARE. diff --git a/replace-colorthemes/README.md b/replace-colorthemes/README.md new file mode 100644 index 0000000..c8cdbb3 --- /dev/null +++ b/replace-colorthemes/README.md @@ -0,0 +1,165 @@ +# color-theme-modern [![melpa badge][melpa-badge]][melpa-link] [![melpa stable badge][melpa-stable-badge]][melpa-stable-link] + +This project replaces [color-theme](http://www.nongnu.org/color-theme/) with Emacs 24 theme framework. + +Please request by [issues](https://github.com/emacs-jp/replace-colorthemes/issues) if you want me to port your favorite theme from the old colorthemes. + +## Screenshot + +Screenshots are [here](screenshots.md) + +## Installation + +All themes are available on [MELPA](https://melpa.org/) and [MELPA stable](https://stable.melpa.org/) + +You can install `color-theme-modern` with the following command. + +M-x package-install [RET] color-theme-modern [RET] + +NOTE: Package name is different from repository name. + +``` + # Download your favorite theme ~/.emacs.d + % cd ~/.emacs.d + % curl -LO https://raw.githubusercontent.com/emacs-jp/replace-colorthemes/master/aalto-dark-theme.el +``` + +Or + +``` + # Download all themes + % git clone https://github.com/emacs-jp/replace-colorthemes.git +``` + +And add following code to your configuration file: +```lisp +;; Please set your themes directory to 'custom-theme-load-path +(add-to-list 'custom-theme-load-path + (file-name-as-directory "your cloned directory path")) +``` + +Users of Debian ≥11, or derivatives such as Ubuntu ≥20.04 may simply `sudo apt install elpa-color-theme-modern`. + +## Activating a Theme +To use color-theme-modern, a theme must be selected, loaded, and activated. Do this by adding something like the following lines to your Emacs configuration: +```lisp + (load-theme 'aalto-dark t t) + (enable-theme 'aalto-dark) +``` + +## Ported themes +* [aalto-dark](screenshots.md#aalto-dark) +* [aalto-light](screenshots.md#aalto-light) +* [aliceblue](screenshots.md#aliceblue) +* [andreas](screenshots.md#andreas) +* [arjen](screenshots.md#arjen) +* [beige-diff](screenshots.md#beige-diff) +* [beige-eshell](screenshots.md#beige-eshell) +* [bharadwaj-slate](screenshots.md#bharadwaj-slate) +* [bharadwaj](screenshots.md#bharadwaj) +* [billw](screenshots.md#billw) +* [black-on-gray](screenshots.md#black-on-gray) +* [blippblopp](screenshots.md#blippblopp) +* [blue-erc](screenshots.md#blue-erc) +* [blue-eshell](screenshots.md#blue-eshell) +* [blue-gnus](screenshots.md#blue-gnus) +* [blue-mood](screenshots.md#blue-mood) +* [blue-sea](screenshots.md#blue-sea) +* [calm-forest](screenshots.md#calm-forest) +* [charcoal-black](screenshots.md#charcoal-black) +* [clarity](screenshots.md#clarity) +* [classic](screenshots.md#classic) +* [cobalt](screenshots.md#cobalt) +* [comidia](screenshots.md#comidia) +* [dark-blue](screenshots.md#dark-blue) +* [dark-blue2](screenshots.md#dark-blue2) +* [dark-erc](screenshots.md#dark-erc) +* [dark-font-lock](screenshots.md#dark-font-lock) +* [dark-gnus](screenshots.md#dark-gnus) +* [dark-green](screenshots.md#dark-green) +* [dark-info](screenshots.md#dark-info) +* [dark-laptop](screenshots.md#dark-laptop) +* [deep-blue](screenshots.md#deep-blue) +* [desert](screenshots.md#desert) +* [digital-ofs1](screenshots.md#digital-ofs1) +* [emacs-21](screenshots.md#emacs-21) +* [emacs-nw](screenshots.md#emacs-nw) +* [euphoria](screenshots.md#euphoria) +* [feng-shui](screenshots.md#feng-shui) +* [fischmeister](screenshots.md#fischmeister) +* [gnome](screenshots.md#gnome) +* [gnome2](screenshots.md#gnome2) +* [goldenrod](screenshots.md#goldenrod) +* [gray1](screenshots.md#gray1) +* [gray30](screenshots.md#gray30) +* [greiner](screenshots.md#greiner) +* [gtk-ide](screenshots.md#gtk-ide) +* [high-contrast](screenshots.md#high-contrast) +* [hober](screenshots.md#hober) +* [infodoc](screenshots.md#infodoc) +* [jb-simple](screenshots.md#jb-simple) +* [jedit-grey](screenshots.md#jedit-grey) +* [jonadabian-slate](screenshots.md#jonadabian-slate) +* [jonadabian](screenshots.md#jonadabian) +* [jsc-dark](screenshots.md#jsc-dark) +* [jsc-light](screenshots.md#jsc-light) +* [jsc-light2](screenshots.md#jsc-light2) +* [katester](screenshots.md#katester) +* [kingsajz](screenshots.md#kingsajz) +* [late-night](screenshots.md#late-night) +* [lawrence](screenshots.md#lawrence) +* [ld-dark](screenshots.md#ld-dark) +* [lethe](screenshots.md#lethe) +* [marine](screenshots.md#marine) +* [marquardt](screenshots.md#marquardt) +* [matrix](screenshots.md#matrix) +* [midnight](screenshots.md#midnight) +* [mistyday](screenshots.md#mistyday) +* [montz](screenshots.md#montz) +* [oswald](screenshots.md#oswald) +* [parus](screenshots.md#parus) +* [pierson](screenshots.md#pierson) +* [pok-wob](screenshots.md#pok-wob) +* [pok-wog](screenshots.md#pok-wog) +* [ramangalahy](screenshots.md#ramangalahy) +* [raspopovic](screenshots.md#raspopovic) +* [renegade](screenshots.md#renegade) +* [resolve](screenshots.md#resolve) +* [retro-green](screenshots.md#retro-green) +* [retro-orange](screenshots.md#retro-orange) +* [robin-hood](screenshots.md#robin-hood) +* [rotor](screenshots.md#rotor) +* [ryerson](screenshots.md#ryerson) +* [salmon-diff](screenshots.md#salmon-diff) +* [salmon-font-lock](screenshots.md#salmon-font-lock) +* [scintilla](screenshots.md#scintilla) +* [shaman](screenshots.md#shaman) +* [simple-1](screenshots.md#simple-1) +* [sitaramv-nt](screenshots.md#sitaramv-nt) +* [sitaramv-solaris](screenshots.md#sitaramv-solaris) +* [snow](screenshots.md#snow) +* [snowish](screenshots.md#snowish) +* [standard-ediff](screenshots.md#standard-ediff) +* [standard](screenshots.md#standard) +* [subtle-blue](screenshots.md#subtle-blue) +* [subtle-hacker](screenshots.md#subtle-hacker) +* [taming-mr-arneson](screenshots.md#taming-mr-arneson) +* [taylor](screenshots.md#taylor) +* [tty-dark](screenshots.md#tty-dark) +* [vim-colors](screenshots.md#vim-colors) +* [whateveryouwant](screenshots.md#whateveryouwant) +* [wheat](screenshots.md#wheat) +* [word-perfect](screenshots.md#word-perfect) +* [xemacs](screenshots.md#xemacs) +* [xp](screenshots.md#xp) + +## 3rd Party Theme + +* [julie](screenshots.md#julie) +* [subdued](screenshots.md#subdued) +* [railscast](screenshots.md#railscast) + +[melpa-link]: https://melpa.org/#/color-theme-modern +[melpa-stable-link]: https://stable.melpa.org/#/color-theme-modern +[melpa-badge]: https://melpa.org/packages/color-theme-modern-badge.svg +[melpa-stable-badge]: https://stable.melpa.org/packages/color-theme-modern-badge.svg diff --git a/replace-colorthemes/aalto-dark-theme.el b/replace-colorthemes/aalto-dark-theme.el new file mode 100644 index 0000000..df28177 --- /dev/null +++ b/replace-colorthemes/aalto-dark-theme.el @@ -0,0 +1,87 @@ +;;; aalto-dark-theme.el --- aalto-dark theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of aalto-dark theme from `color-themes' + +;;; Code: + +(deftheme aalto-dark + "aalto-dark theme") + +(custom-theme-set-faces + 'aalto-dark + + '(default ((t (:background "DeepSkyBlue3" :foreground "white")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "yellow")))) + '(border ((t (:foreground "black")))) + + '(bold ((t (:bold t :background "blue3" :foreground "white")))) + '(bold-italic ((t (:italic t :bold t :foreground "blue3")))) + '(calendar-today-face ((t (:underline t)))) + '(diary-face ((t (:foreground "red")))) + '(font-lock-builtin-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-comment-face ((t (:foreground "OrangeRed")))) + '(font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(font-lock-function-name-face ((t (:foreground "LightSkyBlue")))) + '(font-lock-keyword-face ((t (:foreground "Cyan")))) + '(font-lock-string-face ((t (:foreground "LightSalmon")))) + '(font-lock-type-face ((t (:foreground "PaleGreen")))) + '(font-lock-variable-name-face ((t (:foreground "LightGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink")))) + '(highlight ((t (:background "blue3" :foreground "white")))) + '(holiday-face ((t (:background "pink")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:italic t :bold t)))) + '(info-xref ((t (:bold t)))) + '(italic ((t (:italic t :background "gray")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:bold t :foreground "green4")))) + '(message-header-name-face ((t (:foreground "DarkGreen")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow")))) + '(message-header-other-face ((t (:foreground "#b00000")))) + '(message-header-subject-face ((t (:foreground "green3")))) + '(message-header-to-face ((t (:bold t :foreground "green2")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "blue3")))) + '(mode-line ((t (:background "white" :foreground "DeepSkyBlue3")))) + '(mode-line-buffer-id ((t (:background "white" :foreground "DeepSkyBlue3")))) + '(mode-line-mousable ((t (:background "white" :foreground "DeepSkyBlue3")))) + '(mode-line-mousable-minor-mode ((t (:background "white" :foreground "DeepSkyBlue3")))) + '(region ((t (:background "gray")))) + '(secondary-selection ((t (:background "darkslateblue")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(underline ((t (:underline t))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'aalto-dark) + +;;; aalto-dark-theme.el ends here diff --git a/replace-colorthemes/aalto-light-theme.el b/replace-colorthemes/aalto-light-theme.el new file mode 100644 index 0000000..cb1faa6 --- /dev/null +++ b/replace-colorthemes/aalto-light-theme.el @@ -0,0 +1,168 @@ +;;; aalto-light-theme.el --- aalto-light theme + +;; Copyright (C) 2001 Jari Aalto +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of aalto-light theme from `color-themes' + +;;; Code: + +(deftheme aalto-light + "aalto-light theme") + +(custom-theme-set-faces + 'aalto-light + + '(default ((t (:background "#FFFFE0" :foreground "DarkSlateGray4")))) + '(mouse ((t (:foreground "LawnGreen")))) + '(cursor ((t (:background "black")))) + '(border ((t (:foreground "black")))) + + '(gnus-mouse-face ((t (:background "darkseagreen2")))) + '(list-matching-lines-face ((t (:bold t)))) + '(tinyreplace-:face ((t (:background "darkseagreen2")))) + '(view-highlight-face ((t (:background "darkseagreen2")))) + + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(calendar-today-face ((t (:underline t)))) + '(cvs-filename-face ((t (:foreground "blue4")))) + '(cvs-handled-face ((t (:foreground "pink")))) + '(cvs-header-face ((t (:bold t :foreground "blue4")))) + '(cvs-marked-face ((t (:bold t :foreground "green3")))) + '(cvs-msg-face ((t (:italic t)))) + '(cvs-need-action-face ((t (:foreground "orange")))) + '(cvs-unknown-face ((t (:foreground "red")))) + '(diary-face ((t (:foreground "red")))) + '(eshell-test-failed-face ((t (:bold t :foreground "OrangeRed")))) + '(eshell-test-ok-face ((t (:bold t :foreground "Green")))) + '(font-lock-builtin-face ((t (:foreground "Orchid")))) + '(font-lock-comment-face ((t (:foreground "Firebrick")))) + '(font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(font-lock-function-name-face ((t (:foreground "Blue")))) + '(font-lock-keyword-face ((t (:foreground "Purple")))) + '(font-lock-string-face ((t (:foreground "RosyBrown")))) + '(font-lock-type-face ((t (:foreground "ForestGreen")))) + '(font-lock-variable-name-face ((t (:foreground "DarkGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t)))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen")))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-header-content-face ((t (:italic t :foreground "indianred4")))) + '(gnus-header-from-face ((t (:foreground "red3")))) + '(gnus-header-name-face ((t (:foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue")))) + '(gnus-header-subject-face ((t (:foreground "red4")))) + '(gnus-signature-face ((t (:italic t)))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(highlight ((t (:background "darkseagreen2")))) + '(holiday-face ((t (:background "pink")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:italic t :bold t)))) + '(info-xref ((t (:bold t)))) + '(italic ((t (:italic t)))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4")))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "black" :foreground "white")))) + '(mode-line-buffer-id ((t (:background "black" :foreground "white")))) + '(mode-line-mousable ((t (:background "black" :foreground "white")))) + '(mode-line-mousable-minor-mode ((t (:background "black" :foreground "white")))) + '(region ((t (:background "gray")))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(sgml-comment-face ((t (:foreground "dark turquoise")))) + '(sgml-doctype-face ((t (:foreground "red")))) + '(sgml-end-tag-face ((t (:foreground "blue")))) + '(sgml-entity-face ((t (:foreground "magenta")))) + '(sgml-ignored-face ((t (:background "gray60" :foreground "gray40")))) + '(sgml-ms-end-face ((t (:foreground "green")))) + '(sgml-ms-start-face ((t (:foreground "green")))) + '(sgml-pi-face ((t (:foreground "lime green")))) + '(sgml-sgml-face ((t (:foreground "brown")))) + '(sgml-short-ref-face ((t (:foreground "deep sky blue")))) + '(sgml-start-tag-face ((t (:foreground "blue")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(underline ((t (:underline t)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'aalto-light) + +;;; aalto-light-theme.el ends here diff --git a/replace-colorthemes/aliceblue-theme.el b/replace-colorthemes/aliceblue-theme.el new file mode 100644 index 0000000..5ce00f8 --- /dev/null +++ b/replace-colorthemes/aliceblue-theme.el @@ -0,0 +1,147 @@ +;;; aliceblue-theme.el --- aliceblue theme + +;; Copyright (C) 2002 by Girish Bharadwaj +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of aliceblue theme from `color-themes' + +;;; Code: + +(deftheme aliceblue + "aliceblue theme") + +(custom-theme-set-faces + 'aliceblue + + '(default ((t (:background "AliceBlue" :foreground "DarkSlateGray4")))) + '(mouse ((t (:background "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:background "black")))) + + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "dark blue")))) + '(custom-button-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button))))) + '(custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button))))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "gray85")))) + '(custom-comment-tag-face ((t (:foreground "blue4")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:bold t :weight bold :height 1.2)))) + '(custom-group-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2)))) + '(custom-group-tag-face-1 ((t (:bold t :foreground "red" :weight bold :height 1.2)))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:bold t :underline t :weight bold)))) + '(custom-variable-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2)))) + + '(font-lock-builtin-face ((t (:foreground "Orchid")))) + '(font-lock-comment-face ((t (:italic t :foreground "Firebrick" :slant oblique)))) + '(font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(font-lock-function-name-face ((t (:bold t :foreground "Blue" :weight extra-bold)))) + '(font-lock-keyword-face ((t (:bold t :foreground "Purple" :weight semi-bold)))) + '(font-lock-preprocessor-face ((t (:foreground "CadetBlue")))) + '(font-lock-reference-face ((t (:foreground "Orchid")))) + '(font-lock-string-face ((t (:foreground "RosyBrown")))) + '(font-lock-type-face ((t (:italic t :foreground "ForestGreen" :slant italic)))) + '(font-lock-variable-name-face ((t (:foreground "DarkGoldenrod" :width condensed)))) + '(font-lock-warning-face ((t (:bold t :foreground "Red" :weight bold)))) + '(fringe ((t (:background "DarkSlateBlue")))) + '(header-line ((t (:box (:line-width -1 :style released-button) :background "grey90" :foreground "grey20" :box nil)))) + '(highlight ((t (:background "darkseagreen2")))) + '(isearch ((t (:background "magenta4" :foreground "lightskyblue1")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise")))) + '(italic ((t (:italic t :slant italic)))) + '(jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan")))) + '(jde-db-active-breakpoint-face ((t (:background "red" :foreground "black")))) + '(jde-db-requested-breakpoint-face ((t (:background "yellow" :foreground "black")))) + '(jde-db-spec-breakpoint-face ((t (:background "green" :foreground "black")))) + '(jde-java-font-lock-api-face ((t (:foreground "dark goldenrod")))) + '(jde-java-font-lock-bold-face ((t (:bold t :weight bold)))) + '(jde-java-font-lock-code-face ((t (nil)))) + '(jde-java-font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(jde-java-font-lock-doc-tag-face ((t (:foreground "green4")))) + '(jde-java-font-lock-italic-face ((t (:italic t :slant italic)))) + '(jde-java-font-lock-link-face ((t (:foreground "blue" :underline t :slant normal)))) + '(jde-java-font-lock-modifier-face ((t (:foreground "Orchid")))) + '(jde-java-font-lock-number-face ((t (:foreground "RosyBrown")))) + '(jde-java-font-lock-operator-face ((t (:foreground "medium blue")))) + '(jde-java-font-lock-package-face ((t (:foreground "blue3")))) + '(jde-java-font-lock-pre-face ((t (nil)))) + '(jde-java-font-lock-underline-face ((t (:underline t)))) + '(menu ((t (nil)))) + '(mode-line ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button))))) + '(mode-line-buffer-id ((t (:background "grey75" :foreground "black")))) + '(mode-line-mousable ((t (:background "grey75" :foreground "black")))) + '(mode-line-mousable-minor-mode ((t (:background "grey75" :foreground "black")))) + '(primary-selection ((t (:background "lightgoldenrod2")))) + '(region ((t (:background "lightgoldenrod2")))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "yellow")))) + '(semantic-dirty-token-face ((t (:background "lightyellow")))) + '(semantic-unmatched-syntax-face ((t (:underline "red")))) + '(senator-intangible-face ((t (:foreground "gray25")))) + '(senator-momentary-highlight-face ((t (:background "gray70")))) + '(senator-read-only-face ((t (:background "#CCBBBB")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(template-message-face ((t (:bold t :weight bold)))) + '(tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button))))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85")))) + '(zmacs-region ((t (:background "lightgoldenrod2"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'aliceblue) + +;;; aliceblue-theme.el ends here diff --git a/replace-colorthemes/andreas-theme.el b/replace-colorthemes/andreas-theme.el new file mode 100644 index 0000000..e364e96 --- /dev/null +++ b/replace-colorthemes/andreas-theme.el @@ -0,0 +1,220 @@ +;;; andreas-theme.el --- andreas theme + +;; Copyright (C) 2003 by Andreas Busch +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of andreas theme from `color-themes' + +;;; Code: + +(deftheme andreas + "andreas theme") + +(custom-theme-set-faces + 'andreas + + '(default ((t (:background "white" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:foreground "black")))) + '(OrangeRed ((t (nil)))) + '(gnus-mouse-face ((t (nil)))) + '(ispell-highlight-face ((t (nil)))) + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(border-glyph ((t (nil)))) + '(calendar-today-face ((t (:underline t)))) + '(color-mode-face-@ ((t (:foreground "orange")))) + '(color-mode-face-a ((t (:foreground "blue")))) + '(color-mode-face-b ((t (:foreground "red")))) + '(color-mode-face-c ((t (:foreground "green3")))) + '(color-mode-face-d ((t (:background "red" :foreground "white")))) + '(color-mode-face-e ((t (:background "orange" :foreground "blue")))) + '(color-mode-face-f ((t (:background "blue" :foreground "yellow")))) + '(color-mode-face-g ((t (:background "lightblue" :foreground "brown")))) + '(color-mode-face-h ((t (:background "brown" :foreground "white")))) + '(custom-button-face ((t (:bold t)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :foreground "blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "red")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:underline t :bold t :background "gray90")))) + '(custom-variable-tag-face ((t (:underline t :background "gray95" :foreground "blue")))) + '(diary-face ((t (:foreground "red")))) + '(display-time-mail-balloon-enhance-face ((t (:background "orange")))) + '(display-time-mail-balloon-gnus-group-face ((t (:foreground "blue")))) + '(display-time-time-balloon-face ((t (:foreground "red")))) + '(emacs-wiki-bad-link-face ((t (:bold t :foreground "red")))) + '(emacs-wiki-link-face ((t (:bold t :foreground "green")))) + '(font-lock-comment-face ((t (:foreground "orange1")))) + '(font-lock-doc-string-face ((t (:foreground "green4")))) + '(font-lock-function-name-face ((t (:foreground "blue3")))) + '(font-lock-keyword-face ((t (:foreground "red1")))) + '(font-lock-preprocessor-face ((t (:foreground "blue3")))) + '(font-lock-reference-face ((t (:foreground "red3")))) + '(font-lock-string-face ((t (:foreground "green4")))) + '(font-lock-type-face ((t (:foreground "#6920ac")))) + '(font-lock-variable-name-face ((t (:foreground "blue3")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(gnu-cite-face-3 ((t (nil)))) + '(gnu-cite-face-4 ((t (nil)))) + '(gnus-cite-attribution-face ((t (:underline t)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t)))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen")))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-header-content-face ((t (:italic t :foreground "indianred4")))) + '(gnus-header-from-face ((t (:bold t :foreground "red3")))) + '(gnus-header-name-face ((t (:foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "MidnightBlue")))) + '(gnus-header-subject-face ((t (:bold t :foreground "red4")))) + '(gnus-splash-face ((t (:foreground "red")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "DarkRed")))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "Red")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(gnus-x-face ((t (nil)))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "grey75")))) + '(gui-element ((t (:background "Gray80")))) + '(highlight ((t (nil)))) + '(holiday-face ((t (:background "pink")))) + '(hyper-apropos-documentation ((t (:foreground "darkred")))) + '(hyper-apropos-heading ((t (:bold t)))) + '(hyper-apropos-hyperlink ((t (:foreground "blue4")))) + '(hyper-apropos-major-heading ((t (:bold t)))) + '(hyper-apropos-section-heading ((t (:italic t :bold t)))) + '(hyper-apropos-warning ((t (:bold t :foreground "red")))) + '(info-node ((t (:italic t :bold t)))) + '(info-xref ((t (:bold t)))) + '(isearch ((t (:background "yellow" :foreground "red")))) + '(italic ((t (:italic t)))) + '(kai-gnus-cite-face-1 ((t (:foreground "LightCyan4")))) + '(kai-gnus-cite-face-2 ((t (:foreground "LightSkyBlue2")))) + '(kai-gnus-cite-face-3 ((t (:foreground "DodgerBlue3")))) + '(kai-gnus-group-mail-face ((t (:foreground "darkslategrey")))) + '(kai-gnus-group-nonempty-mail-face ((t (:foreground "DarkRed")))) + '(kai-gnus-group-starred-face ((t (:foreground "grey50")))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:background "gray68")))) + '(message-cited-text ((t (:italic t)))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-contents ((t (:italic t)))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4")))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-headers ((t (:bold t)))) + '(message-highlighted-header-contents ((t (:italic t :bold t)))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "Gray75" :foreground "Black")))) + '(mode-line-buffer-id ((t (:background "Gray75" :foreground "blue4")))) + '(mode-line-mousable ((t (:background "Gray75" :foreground "firebrick")))) + '(mode-line-mousable-minor-mode ((t (:background "Gray75" :foreground "green4")))) + '(paren-blink-off ((t (:foreground "gray80")))) + '(paren-match ((t (:background "red" :foreground "white")))) + '(paren-mismatch ((t (:background "DeepPink")))) + '(pointer ((t (:foreground "blue")))) + '(primary-selection ((t (:background "gray65")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "gray75")))) + '(right-margin ((t (nil)))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(text-cursor ((t (:background "red" :foreground "LightYellow1")))) + '(toolbar ((t (:background "Gray80")))) + '(underline ((t (:underline t)))) + '(vertical-divider ((t (:background "Gray80")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(x-face ((t (:background "white")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "gray65" :foreground "yellow"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'andreas) + +;;; andreas-theme.el ends here diff --git a/replace-colorthemes/arjen-theme.el b/replace-colorthemes/arjen-theme.el new file mode 100644 index 0000000..aa46ce4 --- /dev/null +++ b/replace-colorthemes/arjen-theme.el @@ -0,0 +1,246 @@ +;;; arjen-theme.el --- arjen theme + +;; Copyright (C) 2001 -- 2008 Arjen Wiersma +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Arjen Wiersma +;; Maintainers: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of arjen theme from `color-themes' + +;;; Code: + +(deftheme arjen + "arjen theme") + +(custom-theme-set-faces + 'arjen + + '(default ((t (:background "black" :foreground "White")))) + '(mouse ((t (:foreground "sienna1")))) + '(cursor ((t (:background "yellow")))) + '(border ((t (:foreground "black")))) + + '(default ((t (:background "black" :foreground "white")))) + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:bold t)))) + '(border-glyph ((t (nil)))) + '(buffers-tab ((t (:background "black" :foreground "white")))) + '(buffers-tab-face ((t (:background "black" :foreground "white")))) + '(calendar-today-face ((t (:underline t)))) + '(cperl-array-face ((t (:foreground "darkseagreen")))) + '(cperl-hash-face ((t (:foreground "darkseagreen")))) + '(cperl-nonoverridable-face ((t (:foreground "SkyBlue")))) + '(cperl-here-face ((t (:foreground "Orange")))) + '(cperl-invalid-face ((nil (:underline nil)))) + '(cperl-pod-face ((t (:foreground "IndianRed")))) + '(cperl-pod-head-face ((t (:foreground "darkseagreen")))) + '(custom-button-face ((t (nil)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :foreground "light blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "pink")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "lime green")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :foreground "light blue")))) + '(diary-face ((t (:foreground "IndianRed")))) + '(erc-action-face ((t (:bold t)))) + '(erc-bold-face ((t (:bold t)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "sandybrown")))) + '(erc-error-face ((t (:bold t :foreground "IndianRed")))) + '(erc-input-face ((t (:foreground "Beige")))) + '(erc-inverse-face ((t (:background "wheat" :foreground "darkslategrey")))) + '(erc-notice-face ((t (:foreground "MediumAquamarine")))) + '(erc-pal-face ((t (:foreground "pale green")))) + '(erc-prompt-face ((t (:foreground "MediumAquamarine")))) + '(erc-underline-face ((t (:underline t)))) + '(eshell-ls-archive-face ((t (:bold t :foreground "IndianRed")))) + '(eshell-ls-backup-face ((t (:foreground "Grey")))) + '(eshell-ls-clutter-face ((t (:foreground "DimGray")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "MediumSlateBlue")))) + '(eshell-ls-executable-face ((t (:foreground "Coral")))) + '(eshell-ls-missing-face ((t (:foreground "black")))) + '(eshell-ls-picture-face ((t (:foreground "Violet")))) + '(eshell-ls-product-face ((t (:foreground "sandybrown")))) + '(eshell-ls-readonly-face ((t (:foreground "Aquamarine")))) + '(eshell-ls-special-face ((t (:foreground "Gold")))) + '(eshell-ls-symlink-face ((t (:foreground "White")))) + '(eshell-ls-unreadable-face ((t (:foreground "DimGray")))) + '(eshell-prompt-face ((t (:foreground "MediumAquamarine")))) + '(fl-comment-face ((t (:foreground "pink")))) + '(fl-doc-string-face ((t (:foreground "purple")))) + '(fl-function-name-face ((t (:foreground "red")))) + '(fl-keyword-face ((t (:foreground "cadetblue")))) + '(fl-string-face ((t (:foreground "green")))) + '(fl-type-face ((t (:foreground "yellow")))) + '(font-lock-builtin-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-comment-face ((t (:foreground "IndianRed")))) + '(font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(font-lock-doc-string-face ((t (:foreground "DarkOrange")))) + '(font-lock-function-name-face ((t (:foreground "YellowGreen")))) + '(font-lock-keyword-face ((t (:foreground "PaleYellow")))) + '(font-lock-preprocessor-face ((t (:foreground "Aquamarine")))) + '(font-lock-reference-face ((t (:foreground "SlateBlue")))) + '(font-lock-string-face ((t (:foreground "Orange")))) + '(font-lock-type-face ((t (:foreground "Green")))) + '(font-lock-variable-name-face ((t (:foreground "darkseagreen")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink")))) + '(qt-classes-face ((t (:foreground "Red")))) + '(gnus-cite-attribution-face ((t (nil)))) + '(gnus-cite-face-1 ((t (:bold nil :foreground "deep sky blue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:bold nil :foreground "cadetblue")))) + '(gnus-cite-face-3 ((t (:bold nil :foreground "gold")))) + '(gnus-cite-face-4 ((t (:foreground "light pink")))) + '(gnus-cite-face-5 ((t (:foreground "pale green")))) + '(gnus-cite-face-6 ((t (:bold nil :foreground "chocolate")))) + '(gnus-cite-face-7 ((t (:foreground "orange")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold nil)))) + '(gnus-emphasis-bold-italic ((t (:bold nil)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (nil)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold nil)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :bold nil)))) + '(gnus-emphasis-underline-italic ((t (:underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1")))) + '(gnus-group-mail-1-face ((t (:bold nil :foreground "aquamarine1")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2")))) + '(gnus-group-mail-2-face ((t (:bold nil :foreground "aquamarine2")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3")))) + '(gnus-group-mail-3-face ((t (:bold nil :foreground "aquamarine3")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4")))) + '(gnus-group-mail-low-face ((t (:bold nil :foreground "aquamarine4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise")))) + '(gnus-group-news-1-face ((t (:bold nil :foreground "PaleTurquoise")))) + '(gnus-group-news-2-empty-face ((t (:foreground "turquoise")))) + '(gnus-group-news-2-face ((t (:bold nil :foreground "turquoise")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold nil)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold nil)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold nil)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold nil)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise")))) + '(gnus-group-news-low-face ((t (:bold nil :foreground "DarkTurquoise")))) + '(gnus-header-content-face ((t (:foreground "forest green")))) + '(gnus-header-from-face ((t (:bold nil :foreground "spring green")))) + '(gnus-header-name-face ((t (:foreground "deep sky blue")))) + '(gnus-header-newsgroups-face ((t (:bold nil :foreground "purple")))) + '(gnus-header-subject-face ((t (:bold nil :foreground "orange")))) + '(gnus-signature-face ((t (:bold nil :foreground "khaki")))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold nil :foreground "SkyBlue")))) + '(gnus-summary-high-read-face ((t (:bold nil :foreground "PaleGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold nil :foreground "pink")))) + '(gnus-summary-high-unread-face ((t (:bold nil)))) + '(gnus-summary-low-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-low-read-face ((t (:foreground "PaleGreen")))) + '(gnus-summary-low-ticked-face ((t (:foreground "pink")))) + '(gnus-summary-low-unread-face ((t (nil)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "PaleGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "pink")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "grey75" :foreground "black")))) + '(gui-element ((t (:background "#D4D0C8" :foreground "black")))) + '(highlight ((t (:background "darkolivegreen")))) + '(highline-face ((t (:background "SeaGreen")))) + '(holiday-face ((t (:background "DimGray")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:underline t :bold t :foreground "DodgerBlue1")))) + '(info-xref ((t (:underline t :foreground "DodgerBlue1")))) + '(isearch ((t (:background "blue")))) + '(isearch-secondary ((t (:foreground "red3")))) + '(italic ((t (nil)))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:background "gray68" :foreground "white")))) + '(message-cited-text-face ((t (:bold t :foreground "green")))) + '(message-header-cc-face ((t (:bold t :foreground "green4")))) + '(message-header-name-face ((t (:bold t :foreground "orange")))) + '(message-header-newsgroups-face ((t (:bold t :foreground "violet")))) + '(message-header-other-face ((t (:bold t :foreground "chocolate")))) + '(message-header-subject-face ((t (:bold t :foreground "yellow")))) + '(message-header-to-face ((t (:bold t :foreground "cadetblue")))) + '(message-header-xheader-face ((t (:bold t :foreground "light blue")))) + '(message-mml-face ((t (:bold t :foreground "Green3")))) + '(message-separator-face ((t (:foreground "blue3")))) + '(mode-line ((t (:background "DarkRed" :foreground "white" :box (:line-width 1 :style released-button))))) + '(mode-line-buffer-id ((t (:background "DarkRed" :foreground "white")))) + '(mode-line-mousable ((t (:background "DarkRed" :foreground "white")))) + '(mode-line-mousable-minor-mode ((t (:background "DarkRed" :foreground "white")))) + '(p4-depot-added-face ((t (:foreground "blue")))) + '(p4-depot-deleted-face ((t (:foreground "red")))) + '(p4-depot-unmapped-face ((t (:foreground "grey30")))) + '(p4-diff-change-face ((t (:foreground "dark green")))) + '(p4-diff-del-face ((t (:foreground "red")))) + '(p4-diff-file-face ((t (:background "gray90")))) + '(p4-diff-head-face ((t (:background "gray95")))) + '(p4-diff-ins-face ((t (:foreground "blue")))) + '(pointer ((t (nil)))) + '(primary-selection ((t (:background "blue")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "blue")))) + '(right-margin ((t (nil)))) + '(secondary-selection ((t (:background "darkslateblue")))) + '(show-paren-match-face ((t (:background "Aquamarine" :foreground "SlateBlue")))) + '(show-paren-mismatch-face ((t (:background "Red" :foreground "White")))) + '(text-cursor ((t (:background "yellow" :foreground "black")))) + '(toolbar ((t (nil)))) + '(underline ((nil (:underline nil)))) + '(vc-mode-face ((t (:background "darkolivegreen")))) + '(vertical-divider ((t (nil)))) + '(widget ((t (nil)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:background "dim gray")))) + '(widget-inactive-face ((t (:foreground "light gray")))) + '(widget-single-line-field-face ((t (:background "dim gray")))) + '(woman-bold-face ((t (:bold t)))) + '(woman-italic-face ((t (:foreground "beige")))) + '(woman-unknown-face ((t (:foreground "LightSalmon")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "snow" :foreground "blue"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'arjen) + +;;; arjen-theme.el ends here diff --git a/replace-colorthemes/beige-diff-theme.el b/replace-colorthemes/beige-diff-theme.el new file mode 100644 index 0000000..a3efcdd --- /dev/null +++ b/replace-colorthemes/beige-diff-theme.el @@ -0,0 +1,63 @@ +;;; beige-diff-theme.el --- beige-diff theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of beige-diff theme from `color-themes' + +;;; Code: + +(deftheme beige-diff + "beige-diff theme") + +(custom-theme-set-faces + 'beige-diff + + '(change-log-acknowledgement-face ((t (:foreground "firebrick")))) + '(change-log-conditionals-face ((t (:foreground "khaki" :background "sienna")))) + '(change-log-date-face ((t (:foreground "gold")))) + '(change-log-email-face ((t (:foreground "khaki" :underline t)))) + '(change-log-file-face ((t (:bold t :foreground "lemon chiffon")))) + '(change-log-function-face ((t (:foreground "khaki" :background "sienna")))) + '(change-log-list-face ((t (:foreground "wheat")))) + '(change-log-name-face ((t (:bold t :foreground "light goldenrod")))) + '(diff-added-face ((t (nil)))) + '(diff-changed-face ((t (nil)))) + '(diff-context-face ((t (:foreground "grey50")))) + '(diff-file-header-face ((t (:bold t :foreground "lemon chiffon")))) + '(diff-function-face ((t (:foreground "grey50")))) + '(diff-header-face ((t (:foreground "lemon chiffon")))) + '(diff-hunk-header-face ((t (:foreground "light goldenrod")))) + '(diff-index-face ((t (:bold t :underline t)))) + '(diff-nonexistent-face ((t (:bold t :background "grey70" :weight bold)))) + '(diff-removed-face ((t (nil)))) + '(log-view-message-face ((t (:foreground "lemon chiffon"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'beige-diff) + +;;; beige-diff-theme.el ends here diff --git a/replace-colorthemes/beige-eshell-theme.el b/replace-colorthemes/beige-eshell-theme.el new file mode 100644 index 0000000..70646c6 --- /dev/null +++ b/replace-colorthemes/beige-eshell-theme.el @@ -0,0 +1,59 @@ +;;; beige-eshell-theme.el --- beige-eshell theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of beige-eshell theme from `color-themes' + +;;; Code: + +(deftheme beige-eshell + "beige-eshell theme") + +(custom-theme-set-faces + 'beige-eshell + + '(eshell-ls-archive-face ((t (:bold t :foreground "IndianRed")))) + '(eshell-ls-backup-face ((t (:foreground "Grey")))) + '(eshell-ls-clutter-face ((t (:foreground "DimGray")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "dark khaki")))) + '(eshell-ls-executable-face ((t (:foreground "Coral")))) + '(eshell-ls-missing-face ((t (:foreground "black")))) + '(eshell-ls-picture-face ((t (:foreground "gold")))) ; non-standard face + '(eshell-ls-product-face ((t (:foreground "dark sea green")))) + '(eshell-ls-readonly-face ((t (:foreground "light steel blue")))) + '(eshell-ls-special-face ((t (:foreground "gold")))) + '(eshell-ls-symlink-face ((t (:foreground "peach puff")))) + '(eshell-ls-text-face ((t (:foreground "moccasin")))) ; non-standard face + '(eshell-ls-todo-face ((t (:bold t :foreground "yellow green")))) ; non-standard face + '(eshell-ls-unreadable-face ((t (:foreground "DimGray")))) + '(eshell-prompt-face ((t (:foreground "lemon chiffon"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'beige-eshell) + +;;; beige-eshell-theme.el ends here diff --git a/replace-colorthemes/bharadwaj-slate-theme.el b/replace-colorthemes/bharadwaj-slate-theme.el new file mode 100644 index 0000000..9120dd1 --- /dev/null +++ b/replace-colorthemes/bharadwaj-slate-theme.el @@ -0,0 +1,317 @@ +;;; bharadwaj-slate-theme.el --- bharadwaj-slate theme + +;; Copyright (C) 2002 by Girish Bharadwaj +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of bharadwaj-slate theme from `color-themes' + +;;; Code: + +(deftheme bharadwaj-slate + "bharadwaj-slate theme") + +(custom-theme-set-faces + 'bharadwaj-slate + + '(default ((t (:background "DarkSlateGray" :foreground "palegreen")))) + '(mouse ((t (:background "black")))) + '(cursor ((t (:background "khaki")))) + '(border ((t (:background "black")))) + + '(display-time-mail-face ((t (:background "Darkslategray" :foreground "white" :overline "blueviolet" :underline "blueviolet")))) + '(gnus-article-button-face ((t (:bold t :weight bold)))) + '(gnus-article-mouse-face ((t (:background "darkolivegreen")))) + '(gnus-mouse-face ((t (:background "darkolivegreen")))) + '(help-highlight-face ((t (:underline t)))) + '(ibuffer-deletion-face ((t (:foreground "lightblue3")))) + '(ibuffer-filter-group-name-face ((t (:bold t :weight bold)))) + '(ibuffer-marked-face ((t (:bold t :foreground "Pink" :weight bold)))) + '(ibuffer-title-face ((t (:foreground "lightblue3")))) + '(list-matching-lines-buffer-name-face ((t (:underline t)))) + '(list-matching-lines-face ((t (:bold t :weight bold)))) + '(view-highlight-face ((t (:background "darkolivegreen")))) + '(widget-mouse-face ((t (:background "darkolivegreen")))) + + '(bg:erc-color-face0 ((t (:background "White")))) + '(bg:erc-color-face1 ((t (:background "black")))) + '(bg:erc-color-face10 ((t (:background "lightblue1")))) + '(bg:erc-color-face11 ((t (:background "cyan")))) + '(bg:erc-color-face12 ((t (:background "blue")))) + '(bg:erc-color-face13 ((t (:background "deeppink")))) + '(bg:erc-color-face14 ((t (:background "gray50")))) + '(bg:erc-color-face15 ((t (:background "gray90")))) + '(bg:erc-color-face2 ((t (:background "blue4")))) + '(bg:erc-color-face3 ((t (:background "green4")))) + '(bg:erc-color-face4 ((t (:background "red")))) + '(bg:erc-color-face5 ((t (:background "brown")))) + '(bg:erc-color-face6 ((t (:background "purple")))) + '(bg:erc-color-face7 ((t (:background "orange")))) + '(bg:erc-color-face8 ((t (:background "yellow")))) + '(bg:erc-color-face9 ((t (:background "green")))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :weight bold)))) + '(button ((t (:underline t)))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(custom-button-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button))))) + '(custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button))))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "dim gray")))) + '(custom-comment-tag-face ((t (:foreground "gray80")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:bold t :family "helv" :weight bold :height 1.2)))) + '(custom-group-tag-face ((t (:bold t :foreground "light blue" :weight bold :height 1.2)))) + '(custom-group-tag-face-1 ((t (:bold t :family "helv" :foreground "pink" :weight bold :height 1.2)))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "lime green")))) + '(custom-variable-button-face ((t (:bold t :underline t :weight bold)))) + '(custom-variable-tag-face ((t (:bold t :family "helv" :foreground "light blue" :weight bold :height 1.2)))) + '(erc-action-face ((t (:bold t :box (:line-width 2 :color "grey75") :weight bold)))) + '(erc-bold-face ((t (:bold t :weight bold)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "IndianRed")))) + '(erc-error-face ((t (:background "Red" :foreground "White")))) + '(erc-input-face ((t (:foreground "lightblue")))) + '(erc-inverse-face ((t (:background "Black" :foreground "White")))) + '(erc-notice-face ((t (:bold t :foreground "dodgerblue" :weight bold)))) + '(erc-prompt-face ((t (:bold t :background "black" :foreground "white" :weight bold)))) + '(erc-timestamp-face ((t (:bold t :foreground "green" :weight bold)))) + '(erc-underline-face ((t (:underline t)))) + '(eshell-ls-archive-face ((t (:bold t :foreground "Orchid" :weight bold)))) + '(eshell-ls-backup-face ((t (:foreground "LightSalmon")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed" :weight bold)))) + '(eshell-ls-directory-face ((t (:bold t :foreground "SkyBlue" :weight bold)))) + '(eshell-ls-executable-face ((t (:bold t :foreground "Green" :weight bold)))) + '(eshell-ls-missing-face ((t (:bold t :foreground "Red" :weight bold)))) + '(eshell-ls-product-face ((t (:foreground "LightSalmon")))) + '(eshell-ls-readonly-face ((t (:foreground "Pink")))) + '(eshell-ls-special-face ((t (:bold t :foreground "Magenta" :weight bold)))) + '(eshell-ls-symlink-face ((t (:bold t :foreground "Cyan" :weight bold)))) + '(eshell-ls-unreadable-face ((t (:foreground "DarkGrey")))) + '(eshell-prompt-face ((t (:bold t :foreground "Pink" :weight bold)))) + '(fg:erc-color-face0 ((t (:foreground "White")))) + '(fg:erc-color-face1 ((t (:foreground "black")))) + '(fg:erc-color-face10 ((t (:foreground "lightblue1")))) + '(fg:erc-color-face11 ((t (:foreground "cyan")))) + '(fg:erc-color-face12 ((t (:foreground "blue")))) + '(fg:erc-color-face13 ((t (:foreground "deeppink")))) + '(fg:erc-color-face14 ((t (:foreground "gray50")))) + '(fg:erc-color-face15 ((t (:foreground "gray90")))) + '(fg:erc-color-face2 ((t (:foreground "blue4")))) + '(fg:erc-color-face3 ((t (:foreground "green4")))) + '(fg:erc-color-face4 ((t (:foreground "red")))) + '(fg:erc-color-face5 ((t (:foreground "brown")))) + '(fg:erc-color-face6 ((t (:foreground "purple")))) + '(fg:erc-color-face7 ((t (:foreground "orange")))) + '(fg:erc-color-face8 ((t (:foreground "yellow")))) + '(fg:erc-color-face9 ((t (:foreground "green")))) + '(fixed-pitch ((t (:family "courier")))) + '(font-lock-builtin-face ((t (:bold t :foreground "pink" :weight bold :height 1.1)))) + '(font-lock-comment-face ((t (:foreground "violet" :height 1.0)))) + '(font-lock-constant-face ((t (:bold t :foreground "tomato" :weight bold :height 1.0)))) + '(font-lock-function-name-face ((t (:bold t :foreground "DodgerBlue" :weight bold)))) + '(font-lock-keyword-face ((t (:bold t :foreground "turquoise" :weight bold)))) + '(font-lock-preprocessor-face ((t (:bold t :foreground "tomato" :weight bold :height 1.0)))) + '(font-lock-reference-face ((t (:bold t :foreground "pink" :weight bold :height 1.1)))) + '(font-lock-string-face ((t (:foreground "red" :height 1.0)))) + '(font-lock-type-face ((t (:foreground "lightblue3")))) + '(font-lock-variable-name-face ((t (:bold t :foreground "gray" :weight bold :height 1.0)))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink" :weight bold)))) + '(fringe ((t (:background "DarkSlateGray")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "light blue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "light cyan")))) + '(gnus-cite-face-3 ((t (:foreground "light yellow")))) + '(gnus-cite-face-4 ((t (:foreground "light pink")))) + '(gnus-cite-face-5 ((t (:foreground "pale green")))) + '(gnus-cite-face-6 ((t (:foreground "beige")))) + '(gnus-cite-face-7 ((t (:foreground "orange")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t :weight bold)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t :weight bold)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :weight bold)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1" :weight bold)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2" :weight bold)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3" :weight bold)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4" :weight bold)))) + '(gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise" :weight bold)))) + '(gnus-group-news-2-empty-face ((t (:foreground "turquoise")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "turquoise" :weight bold)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t :weight bold)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t :weight bold)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t :weight bold)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t :weight bold)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise" :weight bold)))) + '(gnus-header-content-face ((t (:italic t :foreground "forest green")))) + '(gnus-header-from-face ((t (:foreground "spring green")))) + '(gnus-header-name-face ((t (:foreground "SeaGreen")))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "yellow")))) + '(gnus-header-subject-face ((t (:foreground "SeaGreen3")))) + '(gnus-signature-face ((t (:italic t)))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue" :weight bold)))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen" :weight bold)))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "pink" :weight bold)))) + '(gnus-summary-high-unread-face ((t (:bold t :weight bold)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "pink")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "PaleGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "pink")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(header-line ((t (:underline "blueviolet" :overline "blueviolet" :background "grey20" :foreground "grey90")))) + '(highlight ((t (:background "darkolivegreen")))) + '(html-helper-bold-face ((t (:bold t :foreground "wheat" :weight bold)))) + '(html-helper-italic-face ((t (:italic t :foreground "spring green")))) + '(html-helper-underline-face ((t (:foreground "cornsilk" :underline t)))) + '(html-tag-face ((t (:bold t :foreground "deep sky blue" :weight bold)))) + '(info-menu-6 ((t (nil)))) + '(isearch ((t (:background "palevioletred2" :foreground "brown4")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise4")))) + '(italic ((t (:italic t)))) + '(jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan")))) + '(jde-db-active-breakpoint-face ((t (:background "red" :foreground "black")))) + '(jde-db-requested-breakpoint-face ((t (:background "yellow" :foreground "black")))) + '(jde-db-spec-breakpoint-face ((t (:background "green" :foreground "black")))) + '(jde-java-font-lock-api-face ((t (:foreground "light goldenrod")))) + '(jde-java-font-lock-bold-face ((t (:bold t :weight bold)))) + '(jde-java-font-lock-code-face ((t (nil)))) + '(jde-java-font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(jde-java-font-lock-doc-tag-face ((t (:foreground "light coral")))) + '(jde-java-font-lock-italic-face ((t (:italic t)))) + '(jde-java-font-lock-link-face ((t (:foreground "blue" :underline t :slant normal)))) + '(jde-java-font-lock-modifier-face ((t (:foreground "LightSteelBlue")))) + '(jde-java-font-lock-number-face ((t (:foreground "LightSalmon")))) + '(jde-java-font-lock-operator-face ((t (:foreground "medium blue")))) + '(jde-java-font-lock-package-face ((t (:foreground "steelblue1")))) + '(jde-java-font-lock-pre-face ((t (nil)))) + '(jde-java-font-lock-underline-face ((t (:underline t)))) + '(menu ((t (nil)))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:bold t :foreground "green4" :weight bold)))) + '(message-header-name-face ((t (:foreground "DarkGreen")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow" :weight bold)))) + '(message-header-other-face ((t (:foreground "#b00000")))) + '(message-header-subject-face ((t (:foreground "green3")))) + '(message-header-to-face ((t (:bold t :foreground "green2" :weight bold)))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "blue3")))) + '(minibuffer-prompt ((t (:foreground "cyan")))) + '(mode-line ((t (:background "Darkslategray" :foreground "white" :overline "blueviolet" :underline "blueviolet")))) + '(mode-line-inactive ((t (:italic t :underline "blueviolet" :overline "blueviolet" :background "white" :foreground "cadetblue" :weight light)))) + '(mode-line ((t (:background "Darkslategray" :foreground "white" :overline "blueviolet" :underline "blueviolet")))) + '(mode-line-buffer-id ((t (:background "Darkslategray" :foreground "white" :overline "blueviolet" :underline "blueviolet")))) + '(mode-line-mousable ((t (:background "Darkslategray" :foreground "white" :overline "blueviolet" :underline "blueviolet")))) + '(mode-line-mousable-minor-mode ((t (:background "Darkslategray" :foreground "white" :overline "blueviolet" :underline "blueviolet")))) + '(primary-selection ((t (:background "dimgray")))) + '(region ((t (:background "dimgray")))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "SkyBlue4")))) + '(semantic-dirty-token-face ((t (:background "lightyellow")))) + '(semantic-unmatched-syntax-face ((t (:underline "red")))) + '(senator-intangible-face ((t (:foreground "gray75")))) + '(senator-momentary-highlight-face ((t (:background "gray30")))) + '(senator-read-only-face ((t (:background "#664444")))) + '(show-paren-match-face ((t (:bold t :foreground "lightblue" :weight bold :height 1.1)))) + '(show-paren-mismatch-face ((t (:bold t :foreground "red" :weight bold :height 1.1)))) + '(show-tabs-space-face ((t (:foreground "yellow")))) + '(show-tabs-tab-face ((t (:foreground "red")))) + '(speedbar-button-face ((t (:foreground "green3")))) + '(speedbar-directory-face ((t (:foreground "light blue")))) + '(speedbar-file-face ((t (:foreground "cyan")))) + '(speedbar-highlight-face ((t (:background "sea green")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-tag-face ((t (:foreground "yellow")))) + '(template-message-face ((t (:bold t :weight bold)))) + '(term-black ((t (:foreground "black")))) + '(term-blackbg ((t (:background "black")))) + '(term-blue ((t (:foreground "blue")))) + '(term-bluebg ((t (:background "blue")))) + '(term-bold ((t (:bold t :weight bold)))) + '(term-cyan ((t (:foreground "cyan")))) + '(term-cyanbg ((t (:background "cyan")))) + '(term-default ((t (:background "DarkSlateGray" :foreground "palegreen")))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-green ((t (:foreground "green")))) + '(term-greenbg ((t (:background "green")))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (:foreground "magenta")))) + '(term-magentabg ((t (:background "magenta")))) + '(term-red ((t (:foreground "red")))) + '(term-redbg ((t (:background "red")))) + '(term-underline ((t (:underline t)))) + '(term-white ((t (:foreground "white")))) + '(term-whitebg ((t (:background "white")))) + '(term-yellow ((t (:foreground "yellow")))) + '(term-yellowbg ((t (:background "yellow")))) + '(tool-bar ((t (:background "DarkSlateGray" :foreground "White")))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(variable-pitch ((t (:family "helv")))) + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:background "dim gray")))) + '(widget-inactive-face ((t (:foreground "light gray")))) + '(widget-single-line-field-face ((t (:background "dim gray")))) + '(zmacs-region ((t (:background "dimgray"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'bharadwaj-slate) + +;;; bharadwaj-slate-theme.el ends here diff --git a/replace-colorthemes/bharadwaj-theme.el b/replace-colorthemes/bharadwaj-theme.el new file mode 100644 index 0000000..202ee46 --- /dev/null +++ b/replace-colorthemes/bharadwaj-theme.el @@ -0,0 +1,377 @@ +;;; bharadwaj-theme.el --- bharadwaj theme + +;; Copyright (C) 2001 by Girish Bharadwaj +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of bharadwaj theme from `color-themes' + +;;; Code: + +(deftheme bharadwaj + "bharadwaj theme") + +(custom-theme-set-faces + 'bharadwaj + + '(default ((t (:background "gainsboro" :foreground "black")))) + '(mouse ((t (:foreground "grey15")))) + '(cursor ((t (:background "grey15")))) + '(border ((t (:foreground "black")))) + + '(gnus-mouse-face ((t (:background "LightSkyBlue")))) + '(smiley-mouse-face ((t (:background "LightSkyBlue")))) + + '(bbdb-company ((t (nil)))) + '(bbdb-field-name ((t (:bold t)))) + '(bbdb-field-value ((t (nil)))) + '(bbdb-name ((t (:underline t)))) + '(blank-space-face ((t (nil)))) + '(blank-tab-face ((t (nil)))) + '(blue ((t (nil)))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:bold t)))) + '(border-glyph ((t (nil)))) + '(calendar-today-face ((t (:underline t)))) + '(comint-input-face ((t (:foreground "deepskyblue")))) + '(cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue")))) + '(cperl-hash-face ((t (:bold t :background "lightyellow2" :foreground "Red")))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(custom-button-face ((t (:bold t)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :bold t :foreground "blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "red")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :bold t :foreground "blue")))) + '(cvs-filename-face ((t (:foreground "blue4")))) + '(cvs-handled-face ((t (:foreground "pink")))) + '(cvs-header-face ((t (:bold t :foreground "blue4")))) + '(cvs-marked-face ((t (:bold t :foreground "green3")))) + '(cvs-msg-face ((t (nil)))) + '(cvs-need-action-face ((t (:foreground "orange")))) + '(cvs-unknown-face ((t (:foreground "red")))) + '(diary-face ((t (:bold t :foreground "red")))) + '(dired-face-boring ((t (:foreground "Gray65")))) + '(dired-face-directory ((t (:bold t :foreground "forestgreen")))) + '(dired-face-executable ((t (:foreground "indianred")))) + '(dired-face-flagged ((t (:background "SlateGray")))) + '(dired-face-marked ((t (:background "darkblue" :foreground "deepskyblue")))) + '(dired-face-permissions ((t (nil)))) + '(dired-face-setuid ((t (:foreground "Red")))) + '(dired-face-socket ((t (:foreground "magenta")))) + '(dired-face-symlink ((t (:foreground "grey95")))) + '(display-time-mail-balloon-enhance-face ((t (:background "orange")))) + '(display-time-mail-balloon-gnus-group-face ((t (:foreground "blue")))) + '(display-time-time-balloon-face ((t (:foreground "red")))) + '(ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick")))) + '(ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black")))) + '(ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid")))) + '(ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy")))) + '(ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black")))) + '(ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-B ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black")))) + '(ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy")))) + '(ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black")))) + '(ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black")))) + '(ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black")))) + '(ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White")))) + '(ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White")))) + '(erc-action-face ((t (:bold t)))) + '(erc-bold-face ((t (:bold t)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (nil)))) + '(erc-error-face ((t (:bold t)))) + '(erc-input-face ((t (nil)))) + '(erc-inverse-face ((t (nil)))) + '(erc-notice-face ((t (nil)))) + '(erc-pal-face ((t (nil)))) + '(erc-prompt-face ((t (nil)))) + '(erc-underline-face ((t (nil)))) + '(eshell-ls-archive-face ((t (:bold t :foreground "Orchid")))) + '(eshell-ls-backup-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "Blue")))) + '(eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen")))) + '(eshell-ls-missing-face ((t (:bold t :foreground "Red")))) + '(eshell-ls-picture-face ((t (nil)))) + '(eshell-ls-product-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-readonly-face ((t (:foreground "Brown")))) + '(eshell-ls-special-face ((t (:bold t :foreground "Magenta")))) + '(eshell-ls-symlink-face ((t (:bold t :foreground "DarkCyan")))) + '(eshell-ls-unreadable-face ((t (:foreground "Grey30")))) + '(eshell-prompt-face ((t (:bold t :foreground "Red")))) + '(eshell-test-failed-face ((t (:bold t :foreground "OrangeRed")))) + '(eshell-test-ok-face ((t (:bold t :foreground "Green")))) + '(excerpt ((t (nil)))) + '(ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue")))) + '(fg:black ((t (:foreground "black")))) + '(fixed ((t (:bold t)))) + '(flyspell-duplicate-face ((t (:underline t :bold t :foreground "Gold3")))) + '(flyspell-incorrect-face ((t (:underline t :bold t :foreground "OrangeRed")))) + '(font-latex-bold-face ((t (nil)))) + '(font-latex-italic-face ((t (nil)))) + '(font-latex-math-face ((t (nil)))) + '(font-latex-sedate-face ((t (nil)))) + '(font-latex-string-face ((t (nil)))) + '(font-latex-warning-face ((t (nil)))) + '(font-lock-builtin-face ((t (:foreground "ForestGreen")))) + '(font-lock-comment-face ((t (:foreground "grey55")))) + '(font-lock-constant-face ((t (:foreground "OliveDrab")))) + '(font-lock-doc-string-face ((t (:bold t :foreground "blue4")))) + '(font-lock-exit-face ((t (nil)))) + '(font-lock-function-name-face ((t (:italic t :bold t :foreground "SlateBlue")))) + '(font-lock-keyword-face ((t (:foreground "DarkBlue")))) + '(font-lock-preprocessor-face ((t (:foreground "blue3")))) + '(font-lock-reference-face ((t (:foreground "red3")))) + '(font-lock-string-face ((t (:foreground "DarkRed")))) + '(font-lock-type-face ((t (:foreground "SteelBlue4")))) + '(font-lock-variable-name-face ((t (:foreground "DarkGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "VioletRed")))) + '(fringe ((t (:background "grey95")))) + '(gnus-cite-attribution-face ((t (:bold t)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:bold t)))) + '(gnus-emphasis-highlight-words ((t (nil)))) + '(gnus-emphasis-italic ((t (nil)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-italic ((t (:underline t)))) + '(gnus-filterhist-face-1 ((t (nil)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen")))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-header-content-face ((t (:foreground "indianred4")))) + '(gnus-header-from-face ((t (:bold t :foreground "red3")))) + '(gnus-header-name-face ((t (:bold t :foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:bold t :foreground "MidnightBlue")))) + '(gnus-header-subject-face ((t (:bold t :foreground "red4")))) + '(gnus-picons-face ((t (:background "white" :foreground "black")))) + '(gnus-picons-xbm-face ((t (:background "white" :foreground "black")))) + '(gnus-signature-face ((t (nil)))) + '(gnus-splash ((t (nil)))) + '(gnus-splash-face ((t (:foreground "ForestGreen")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-low-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-low-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-low-unread-face ((t (nil)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (:bold t)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(gnus-x-face ((t (:background "white" :foreground "black")))) + '(green ((t (nil)))) + '(gui-button-face ((t (:background "grey75")))) + '(gui-element ((t (:background "Gray80")))) + '(highlight ((t (:background "LightSkyBlue")))) + '(highlight-changes-delete-face ((t (:underline t :foreground "red")))) + '(highlight-changes-face ((t (:foreground "red")))) + '(highline-face ((t (:background "grey95")))) + '(holiday-face ((t (:background "pink")))) + '(html-helper-italic-face ((t (nil)))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:bold t)))) + '(info-xref ((t (:bold t)))) + '(isearch ((t (:background "yellow")))) + '(isearch-secondary ((t (:foreground "red3")))) + '(italic ((t (nil)))) + '(lazy-highlight-face ((t (:bold t :foreground "dark magenta")))) + '(left-margin ((t (nil)))) + '(linemenu-face ((t (nil)))) + '(list-mode-item-selected ((t (nil)))) + '(makefile-space-face ((t (:background "hotpink")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:bold t :foreground "blue4")))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:bold t)))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "white" :foreground "black")))) + '(mode-line-buffer-id ((t (:background "white" :foreground "black")))) + '(mode-line-mousable ((t (:background "white" :foreground "black")))) + '(mode-line-mousable-minor-mode ((t (:background "white" :foreground "black")))) + '(paren-blink-off ((t (:foreground "gray80")))) + '(paren-face-match ((t (:background "turquoise")))) + '(paren-face-mismatch ((t (:background "purple" :foreground "white")))) + '(paren-face-no-match ((t (:background "yellow" :foreground "black")))) + '(paren-match ((t (:background "darkseagreen2")))) + '(paren-mismatch ((t (:background "DeepPink" :foreground "black")))) + '(paren-mismatch-face ((t (:bold t)))) + '(paren-no-match-face ((t (:bold t)))) + '(pointer ((t (nil)))) + '(primary-selection ((t (nil)))) + '(red ((t (nil)))) + '(region ((t (:background "grey80")))) + '(right-margin ((t (nil)))) + '(secondary-selection ((t (:background "grey55")))) + '(sgml-comment-face ((t (:foreground "dark turquoise")))) + '(sgml-doctype-face ((t (nil)))) + '(sgml-end-tag-face ((t (nil)))) + '(sgml-entity-face ((t (nil)))) + '(sgml-ignored-face ((t (nil)))) + '(sgml-ms-end-face ((t (:foreground "green")))) + '(sgml-ms-start-face ((t (:foreground "green")))) + '(sgml-pi-face ((t (:foreground "lime green")))) + '(sgml-sgml-face ((t (nil)))) + '(sgml-short-ref-face ((t (:foreground "deep sky blue")))) + '(sgml-start-tag-face ((t (nil)))) + '(shell-option-face ((t (:foreground "blue")))) + '(shell-output-2-face ((t (:foreground "darkseagreen")))) + '(shell-output-3-face ((t (:foreground "slategrey")))) + '(shell-output-face ((t (:foreground "palegreen")))) + '(shell-prompt-face ((t (:foreground "red")))) + '(show-paren-match-face ((t (:background "grey80")))) + '(show-paren-mismatch-face ((t (:bold t :background "purple" :foreground "white")))) + '(speedbar-button-face ((t (:bold t :foreground "green4")))) + '(speedbar-directory-face ((t (:bold t :foreground "blue4")))) + '(speedbar-file-face ((t (:bold t :foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:underline t :foreground "red")))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(swbuff-current-buffer-face ((t (:bold t)))) + '(template-message-face ((t (:bold t)))) + '(term-black ((t (:foreground "black")))) + '(term-blackbg ((t (:background "black")))) + '(term-blue ((t (:foreground "blue")))) + '(term-bluebg ((t (:background "blue")))) + '(term-bold ((t (:bold t)))) + '(term-cyan ((t (:foreground "cyan")))) + '(term-cyanbg ((t (:background "cyan")))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-green ((t (:foreground "green")))) + '(term-greenbg ((t (:background "green")))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (:foreground "magenta")))) + '(term-magentabg ((t (:background "magenta")))) + '(term-red ((t (:foreground "red")))) + '(term-redbg ((t (:background "red")))) + '(term-underline ((t (:underline t)))) + '(term-white ((t (:foreground "white")))) + '(term-whitebg ((t (:background "white")))) + '(term-yellow ((t (:foreground "yellow")))) + '(term-yellowbg ((t (:background "yellow")))) + '(text-cursor ((t (:background "grey15" :foreground "gainsboro")))) + '(toolbar ((t (nil)))) + '(underline ((t (:underline t)))) + '(vc-annotate-face-0046FF ((t (nil)))) + '(vcursor ((t (:underline t :background "cyan" :foreground "blue")))) + '(vertical-divider ((t (nil)))) + '(vhdl-font-lock-attribute-face ((t (:foreground "Orchid")))) + '(vhdl-font-lock-directive-face ((t (:foreground "CadetBlue")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4")))) + '(vhdl-font-lock-function-face ((t (:foreground "Orchid4")))) + '(vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red")))) + '(vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange")))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-speedbar-architecture-face ((t (:foreground "Blue")))) + '(vhdl-speedbar-architecture-selected-face ((t (:underline t :foreground "Blue")))) + '(vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod")))) + '(vhdl-speedbar-configuration-selected-face ((t (:underline t :foreground "DarkGoldenrod")))) + '(vhdl-speedbar-entity-face ((t (:foreground "ForestGreen")))) + '(vhdl-speedbar-entity-selected-face ((t (:underline t :foreground "ForestGreen")))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "Brown")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:underline t :foreground "Brown")))) + '(vhdl-speedbar-package-face ((t (:foreground "Grey50")))) + '(vhdl-speedbar-package-selected-face ((t (:underline t :foreground "Grey50")))) + '(viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black")))) + '(viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen")))) + '(viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-search-face ((t (:background "khaki" :foreground "Black")))) + '(vvb-face ((t (:background "pink" :foreground "black")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "navy" :foreground "white")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "royalblue" :foreground "white")))) + '(woman-bold-face ((t (:bold t)))) + '(woman-italic-face ((t (nil)))) + '(woman-unknown-face ((t (nil)))) + '(xref-keyword-face ((t (:foreground "blue")))) + '(xref-list-pilot-face ((t (:foreground "navy")))) + '(xref-list-symbol-face ((t (:foreground "navy")))) + '(yellow ((t (nil)))) + '(zmacs-region ((t (:background "royalblue"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'bharadwaj) + +;;; bharadwaj-theme.el ends here diff --git a/replace-colorthemes/billw-theme.el b/replace-colorthemes/billw-theme.el new file mode 100644 index 0000000..d5fca96 --- /dev/null +++ b/replace-colorthemes/billw-theme.el @@ -0,0 +1,217 @@ +;;; billw-theme.el --- billw theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of billw theme from `color-themes' + +;;; Code: + +(deftheme billw + "billw theme") + +(custom-theme-set-faces + 'billw + + '(default ((t (:background "black" :foreground "cornsilk")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "white")))) + '(border ((t (:foreground "black")))) + + '(mode-line ((t (:foreground "black" :background "wheat")))) + '(mode-line-buffer-id ((t (:foreground "black" :background "wheat")))) + '(mode-line-mousable ((t (:foreground "black" :background "wheat")))) + '(mode-line-mousable-minor-mode ((t (:foreground "black" :background "wheat")))) + '(highlight ((t (:foreground "wheat" :background "darkslategray")))) + '(bold ((t (:bold t)))) + '(italic ((t (:italic t)))) + '(bold-italic ((t (:bold t :italic t)))) + '(region ((t (:background "dimgray")))) + '(secondary-selection ((t (:background "deepskyblue4")))) + '(underline ((t (:underline t)))) + '(info-node ((t (:foreground "yellow" :bold t :italic t)))) + '(info-menu-5 ((t (:underline t)))) + '(info-xref ((t (:foreground "yellow" :bold t)))) + '(diary-face ((t (:foreground "orange")))) + '(calendar-today-face ((t (:underline t)))) + '(holiday-face ((t (:background "red")))) + '(show-paren-match-face ((t (:background "deepskyblue4")))) + '(show-paren-mismatch-face ((t (:foreground "white" :background "red")))) + '(font-lock-comment-face ((t (:foreground "gold")))) + '(font-lock-string-face ((t (:foreground "orange")))) + '(font-lock-keyword-face ((t (:foreground "cyan1")))) + '(font-lock-builtin-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-function-name-face ((t (:foreground "mediumspringgreen")))) + '(font-lock-variable-name-face ((t (:foreground "light salmon")))) + '(font-lock-type-face ((t (:foreground "yellow1")))) + '(font-lock-constant-face ((t (:foreground "salmon")))) + '(font-lock-warning-face ((t (:foreground "gold" :bold t)))) + '(blank-space-face ((t (:background "LightGray")))) + '(blank-tab-face ((t (:foreground "black" :background "cornsilk")))) + '(highline-face ((t (:background "gray35")))) + '(eshell-ls-directory-face ((t (:foreground "green" :bold t)))) + '(eshell-ls-symlink-face ((t (:foreground "Cyan" :bold t)))) + '(eshell-ls-executable-face ((t (:foreground "orange" :bold t)))) + '(eshell-ls-readonly-face ((t (:foreground "gray")))) + '(eshell-ls-unreadable-face ((t (:foreground "DarkGrey")))) + '(eshell-ls-special-face ((t (:foreground "Magenta" :bold t)))) + '(eshell-ls-missing-face ((t (:foreground "Red" :bold t)))) + '(eshell-ls-archive-face ((t (:foreground "Orchid" :bold t)))) + '(eshell-ls-backup-face ((t (:foreground "LightSalmon")))) + '(eshell-ls-product-face ((t (:foreground "LightSalmon")))) + '(eshell-ls-clutter-face ((t (:foreground "blue" :bold t)))) + '(sgml-start-tag-face ((t (:foreground "mediumspringgreen")))) + '(custom-button-face ((t (:foreground "white")))) + '(sgml-ignored-face ((t (:foreground "gray20" :background "gray60")))) + '(sgml-doctype-face ((t (:foreground "orange")))) + '(sgml-sgml-face ((t (:foreground "yellow")))) + '(vc-annotate-face-0046FF ((t (:foreground "wheat" :background "black")))) + '(custom-documentation-face ((t (:foreground "white")))) + '(sgml-end-tag-face ((t (:foreground "greenyellow")))) + '(linemenu-face ((t (:background "gray30")))) + '(sgml-entity-face ((t (:foreground "gold")))) + '(message-header-to-face ((t (:foreground "floral white" :bold t)))) + '(message-header-cc-face ((t (:foreground "ivory")))) + '(message-header-subject-face ((t (:foreground "papaya whip" :bold t)))) + '(message-header-newsgroups-face ((t (:foreground "lavender blush" :bold t :italic t)))) + '(message-header-other-face ((t (:foreground "pale turquoise")))) + '(message-header-name-face ((t (:foreground "light sky blue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-separator-face ((t (:foreground "sandy brown")))) + '(message-cited-text-face ((t (:foreground "plum1")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:foreground "white" :bold t)))) + '(gnus-group-news-1-empty-face ((t (:foreground "white")))) + '(gnus-group-news-2-face ((t (:foreground "lightcyan" :bold t)))) + '(gnus-group-news-2-empty-face ((t (:foreground "lightcyan")))) + '(gnus-group-news-3-face ((t (:foreground "tan" :bold t)))) + '(gnus-group-news-3-empty-face ((t (:foreground "tan")))) + '(gnus-group-news-4-face ((t (:foreground "white" :bold t)))) + '(gnus-group-news-4-empty-face ((t (:foreground "white")))) + '(gnus-group-news-5-face ((t (:foreground "wheat" :bold t)))) + '(gnus-group-news-5-empty-face ((t (:foreground "wheat")))) + '(gnus-group-news-6-face ((t (:foreground "tan" :bold t)))) + '(gnus-group-news-6-empty-face ((t (:foreground "tan")))) + '(gnus-group-news-low-face ((t (:foreground "DarkTurquoise" :bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise")))) + '(gnus-group-mail-1-face ((t (:foreground "white" :bold t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "gray80")))) + '(gnus-group-mail-2-face ((t (:foreground "lightcyan" :bold t)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "lightcyan")))) + '(gnus-group-mail-3-face ((t (:foreground "tan" :bold t)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "tan")))) + '(gnus-group-mail-low-face ((t (:foreground "aquamarine4" :bold t)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4")))) + '(gnus-summary-selected-face ((t (:background "deepskyblue4" :underline t)))) + '(gnus-summary-cancelled-face ((t (:foreground "black" :background "gray")))) + '(gnus-summary-high-ticked-face ((t (:foreground "gray70" :bold t)))) + '(gnus-summary-low-ticked-face ((t (:foreground "gray70" :bold t)))) + '(gnus-summary-normal-ticked-face ((t (:foreground "gray70" :bold t)))) + '(gnus-summary-high-ancient-face ((t (:foreground "SkyBlue" :bold t)))) + '(gnus-summary-low-ancient-face ((t (:foreground "SkyBlue" :italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-high-read-face ((t (:foreground "PaleGreen" :bold t)))) + '(gnus-summary-low-read-face ((t (:foreground "PaleGreen" :italic t)))) + '(gnus-summary-normal-read-face ((t (:foreground "PaleGreen")))) + '(gnus-splash-face ((t (:foreground "gold")))) + '(font-latex-bold-face ((t (nil)))) + '(font-latex-italic-face ((t (nil)))) + '(font-latex-math-face ((t (nil)))) + '(font-latex-sedate-face ((t (:foreground "Gray85")))) + '(font-latex-string-face ((t (:foreground "orange")))) + '(font-latex-warning-face ((t (:foreground "gold")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-button-face ((t (:bold t)))) + '(widget-field-face ((t (:background "gray20")))) + '(widget-single-line-field-face ((t (:background "gray20")))) + '(widget-inactive-face ((t (:foreground "wheat")))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(custom-invalid-face ((t (:foreground "yellow" :background "red")))) + '(custom-rogue-face ((t (:foreground "pink" :background "black")))) + '(custom-modified-face ((t (:foreground "white" :background "blue")))) + '(custom-set-face ((t (:foreground "blue")))) + '(custom-changed-face ((t (:foreground "wheat" :background "skyblue")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-state-face ((t (:foreground "light green")))) + '(custom-variable-tag-face ((t (:foreground "skyblue" :underline t)))) + '(custom-variable-button-face ((t (:bold t :underline t)))) + '(custom-face-tag-face ((t (:foreground "white" :underline t)))) + '(custom-group-tag-face-1 ((t (:foreground "pink" :underline t)))) + '(custom-group-tag-face ((t (:foreground "skyblue" :underline t)))) + '(swbuff-current-buffer-face ((t (:foreground "red" :bold t)))) + '(ediff-current-diff-face-A ((t (:foreground "firebrick" :background "pale green")))) + '(ediff-current-diff-face-B ((t (:foreground "DarkOrchid" :background "Yellow")))) + '(ediff-current-diff-face-C ((t (:foreground "white" :background "indianred")))) + '(ediff-current-diff-face-Ancestor ((t (:foreground "Black" :background "VioletRed")))) + '(ediff-fine-diff-face-A ((t (:foreground "Navy" :background "sky blue")))) + '(ediff-fine-diff-face-B ((t (:foreground "Black" :background "cyan")))) + '(ediff-fine-diff-face-C ((t (:foreground "Black" :background "Turquoise")))) + '(ediff-fine-diff-face-Ancestor ((t (:foreground "Black" :background "Green")))) + '(ediff-even-diff-face-A ((t (:foreground "Black" :background "light grey")))) + '(ediff-even-diff-face-B ((t (:foreground "White" :background "Grey")))) + '(ediff-even-diff-face-C ((t (:foreground "Black" :background "light grey")))) + '(ediff-even-diff-face-Ancestor ((t (:foreground "White" :background "Grey")))) + '(ediff-odd-diff-face-A ((t (:foreground "White" :background "Grey")))) + '(ediff-odd-diff-face-B ((t (:foreground "Black" :background "light grey")))) + '(ediff-odd-diff-face-C ((t (:foreground "White" :background "Grey")))) + '(ediff-odd-diff-face-Ancestor ((t (:foreground "Black" :background "light grey")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:foreground "white" :background "goldenrod4")))) + '(gnus-emphasis-underline-bold ((t (:foreground "black" :background "yellow" :bold t :underline t)))) + '(gnus-emphasis-underline-italic ((t (:foreground "black" :background "yellow" :italic t :underline t)))) + '(gnus-emphasis-bold-italic ((t (:bold t :italic t)))) + '(gnus-emphasis-underline-bold-italic ((t (:foreground "black" :background "yellow" :bold t :italic t :underline t)))) + '(gnus-emphasis-highlight-words ((t (:foreground "yellow" :background "black")))) + '(gnus-signature-face ((t (:italic t)))) + '(gnus-header-from-face ((t (:foreground "wheat")))) + '(gnus-header-subject-face ((t (:foreground "wheat" :bold t)))) + '(gnus-header-newsgroups-face ((t (:foreground "wheat" :italic t)))) + '(gnus-header-name-face ((t (:foreground "white")))) + '(gnus-header-content-face ((t (:foreground "tan" :italic t)))) + '(gnus-filterhist-face-1 ((t (nil)))) + '(gnus-splash ((t (:foreground "Brown")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "light blue")))) + '(gnus-cite-face-2 ((t (:foreground "light cyan")))) + '(gnus-cite-face-3 ((t (:foreground "light yellow")))) + '(gnus-cite-face-4 ((t (:foreground "light pink")))) + '(gnus-cite-face-5 ((t (:foreground "pale green")))) + '(gnus-cite-face-6 ((t (:foreground "beige")))) + '(gnus-cite-face-7 ((t (:foreground "orange")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'billw) + +;;; billw-theme.el ends here diff --git a/replace-colorthemes/black-on-gray-theme.el b/replace-colorthemes/black-on-gray-theme.el new file mode 100644 index 0000000..5a0345d --- /dev/null +++ b/replace-colorthemes/black-on-gray-theme.el @@ -0,0 +1,123 @@ +;;; black-on-gray-theme.el --- black-on-gray theme + +;; Copyright (C) 2002 by sbhojwani +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of black-on-gray theme from `color-themes' + +;;; Code: + +(deftheme black-on-gray + "black-on-gray theme") + +(custom-theme-set-faces + 'black-on-gray + + '(default ((t (:background "white" :foreground "black")))) + '(border ((t (:foreground "blue")))) + + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t :size "10pt")))) + '(bold-italic ((t (:italic t :bold t :size "10pt")))) + '(border-glyph ((t (:size "11pt")))) + '(buffers-tab ((t (:background "gray75")))) + '(buffers-tab-face ((t (:background "gray75")))) + '(display-time-mail-balloon-enhance-face ((t (:background "orange")))) + '(display-time-mail-balloon-gnus-group-face ((t (:foreground "blue")))) + '(display-time-time-balloon-face ((t (:foreground "red")))) + '(ecb-bucket-token-face ((t (:bold t :size "10pt")))) + '(ecb-default-general-face ((t (nil)))) + '(ecb-default-highlight-face ((t (:background "cornflower blue" :foreground "yellow")))) + '(ecb-directories-general-face ((t (nil)))) + '(ecb-directory-face ((t (:background "cornflower blue" :foreground "yellow")))) + '(ecb-history-face ((t (:background "cornflower blue" :foreground "yellow")))) + '(ecb-history-general-face ((t (nil)))) + '(ecb-method-face ((t (:background "cornflower blue" :foreground "yellow")))) + '(ecb-methods-general-face ((t (nil)))) + '(ecb-source-face ((t (:background "cornflower blue" :foreground "yellow")))) + '(ecb-source-in-directories-buffer-face ((t (:foreground "medium blue")))) + '(ecb-sources-general-face ((t (nil)))) + '(ecb-token-header-face ((t (:background "SeaGreen1")))) + '(ecb-type-token-class-face ((t (:bold t :size "10pt")))) + '(ecb-type-token-enum-face ((t (:bold t :size "10pt")))) + '(ecb-type-token-group-face ((t (:bold t :size "10pt" :foreground "dimgray")))) + '(ecb-type-token-interface-face ((t (:bold t :size "10pt")))) + '(ecb-type-token-struct-face ((t (:bold t :size "10pt")))) + '(ecb-type-token-typedef-face ((t (:bold t :size "10pt")))) + '(font-lock-builtin-face ((t (:foreground "red3")))) + '(font-lock-constant-face ((t (:foreground "blue3")))) + '(font-lock-comment-face ((t (:foreground "blue")))) + '(font-lock-doc-face ((t (:foreground "green4")))) + '(font-lock-doc-string-face ((t (:foreground "green4")))) + '(font-lock-function-name-face ((t (nil)))) + '(font-lock-keyword-face ((t (nil)))) + '(font-lock-preprocessor-face ((t (:foreground "blue3")))) + '(font-lock-reference-face ((t (:foreground "red3")))) + '(font-lock-string-face ((t (nil)))) + '(font-lock-type-face ((t (nil)))) + '(font-lock-variable-name-face ((t (nil)))) + '(font-lock-warning-face ((t (nil)))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "grey75")))) + '(gui-element ((t (:size "8pt" :background "gray75")))) + '(highlight ((t (:background "darkseagreen2")))) + '(isearch ((t (:background "paleturquoise")))) + '(isearch-secondary ((t (:foreground "red3")))) + '(italic ((t (:size "10pt")))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:background "gray68")))) + '(mode-line ((t (:background "gray75")))) + '(mode-line-buffer-id ((t (:background "gray75" :foreground "blue4")))) + '(mode-line-mousable ((t (:background "gray75" :foreground "firebrick")))) + '(mode-line-mousable-minor-mode ((t (:background "gray75" :foreground "green4")))) + '(paren-blink-off ((t (:foreground "gray")))) + '(paren-match ((t (:background "darkseagreen2")))) + '(paren-mismatch ((t (nil)))) + '(pointer ((t (nil)))) + '(primary-selection ((t (:background "gray65")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "gray65")))) + '(right-margin ((t (nil)))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(semantic-dirty-token-face ((t (nil)))) + '(semantic-unmatched-syntax-face ((t (nil)))) + '(text-cursor ((t (:background "red" :foreground "gray")))) + '(toolbar ((t (:background "gray75")))) + '(underline ((t (:underline t)))) + '(vertical-divider ((t (:background "gray75")))) + '(widget ((t (:size "8pt" :background "gray75")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (nil)))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "gray65"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'black-on-gray) + +;;; black-on-gray-theme.el ends here diff --git a/replace-colorthemes/blippblopp-theme.el b/replace-colorthemes/blippblopp-theme.el new file mode 100644 index 0000000..7a5f988 --- /dev/null +++ b/replace-colorthemes/blippblopp-theme.el @@ -0,0 +1,99 @@ +;;; blippblopp-theme.el --- blippblopp theme + +;; Copyright (C) 2001 by Thomas Sicheritz-Ponten +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of blippblopp theme from `color-themes' + +;;; Code: + +(deftheme blippblopp + "blippblopp theme") + +(custom-theme-set-faces + 'blippblopp + + '(default ((t (:background "white" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "Red3")))) + '(border ((t (:foreground "black")))) + + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(excerpt ((t (:italic t)))) + '(ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue")))) + '(fg:black ((t (:foreground "black")))) + '(fixed ((t (:bold t)))) + '(font-lock-builtin-face ((t (:foreground "red3")))) + '(font-lock-comment-face ((t (:foreground "orange")))) + '(font-lock-constant-face ((t (:foreground "red3")))) + '(font-lock-doc-string-face ((t (:foreground "darkgreen")))) + '(font-lock-exit-face ((t (:foreground "green")))) + '(font-lock-function-name-face ((t (:bold t :foreground "red")))) + '(font-lock-keyword-face ((t (:bold t :foreground "steelblue")))) + '(font-lock-preprocessor-face ((t (:foreground "blue3")))) + '(font-lock-reference-face ((t (:foreground "red3")))) + '(font-lock-string-face ((t (:foreground "green4")))) + '(font-lock-type-face ((t (:bold t :foreground "blue")))) + '(font-lock-variable-name-face ((t (:foreground "black")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(green ((t (:foreground "green")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4")))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "dimgray" :foreground "lemonchiffon")))) + '(mode-line-buffer-id ((t (:background "dimgray" :foreground "green3")))) + '(mode-line-mousable ((t (:background "dimgray" :foreground "orange")))) + '(mode-line-mousable-minor-mode ((t (:background "dimgray" :foreground "blue4")))) + '(primary-selection ((t (:background "gray65")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "gray65")))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(text-cursor ((t (:background "Red3" :foreground "white")))) + '(toolbar ((t (:background "Gray80")))) + '(underline ((t (:underline t)))) + '(vcursor ((t (:underline t :background "cyan" :foreground "blue")))) + '(vertical-divider ((t (:background "Gray80")))) + '(xref-keyword-face ((t (:foreground "blue")))) + '(xref-list-pilot-face ((t (:foreground "navy")))) + '(xref-list-symbol-face ((t (:foreground "navy")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "gray65"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'blippblopp) + +;;; blippblopp-theme.el ends here diff --git a/replace-colorthemes/blue-erc-theme.el b/replace-colorthemes/blue-erc-theme.el new file mode 100644 index 0000000..02eedf1 --- /dev/null +++ b/replace-colorthemes/blue-erc-theme.el @@ -0,0 +1,90 @@ +;;; blue-erc-theme.el --- blue-erc theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of blue-erc theme from `color-themes' + +;;; Code: + +(deftheme blue-erc + "blue-erc theme") + +(custom-theme-set-faces + 'blue-erc + + '(erc-action-face ((t (nil)))) + '(erc-bold-face ((t (:bold t)))) + '(erc-current-nick-face ((t (:bold t :foreground "yellow")))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "pale green")))) + '(erc-error-face ((t (:bold t :foreground "IndianRed")))) + '(erc-highlight-face ((t (:bold t :foreground "pale green")))) + '(erc-input-face ((t (:foreground "light blue")))) + '(erc-inverse-face ((t (:background "steel blue")))) + '(erc-keyword-face ((t (:foreground "orange" :bold t)))) + '(erc-notice-face ((t (:foreground "light salmon")))) + '(erc-notice-face ((t (:foreground "MediumAquamarine")))) + '(erc-pal-face ((t (:foreground "pale green")))) + '(erc-prompt-face ((t (:foreground "light blue" :bold t)))) + '(fg:erc-color-face0 ((t (:foreground "white")))) + '(fg:erc-color-face1 ((t (:foreground "beige")))) + '(fg:erc-color-face2 ((t (:foreground "lemon chiffon")))) + '(fg:erc-color-face3 ((t (:foreground "light cyan")))) + '(fg:erc-color-face4 ((t (:foreground "powder blue")))) + '(fg:erc-color-face5 ((t (:foreground "sky blue")))) + '(fg:erc-color-face6 ((t (:foreground "dark sea green")))) + '(fg:erc-color-face7 ((t (:foreground "pale green")))) + '(fg:erc-color-face8 ((t (:foreground "medium spring green")))) + '(fg:erc-color-face9 ((t (:foreground "khaki")))) + '(fg:erc-color-face10 ((t (:foreground "pale goldenrod")))) + '(fg:erc-color-face11 ((t (:foreground "light goldenrod yellow")))) + '(fg:erc-color-face12 ((t (:foreground "light yellow")))) + '(fg:erc-color-face13 ((t (:foreground "yellow")))) + '(fg:erc-color-face14 ((t (:foreground "light goldenrod")))) + '(fg:erc-color-face15 ((t (:foreground "lime green")))) + '(bg:erc-color-face0 ((t (nil)))) + '(bg:erc-color-face1 ((t (nil)))) + '(bg:erc-color-face2 ((t (nil)))) + '(bg:erc-color-face3 ((t (nil)))) + '(bg:erc-color-face4 ((t (nil)))) + '(bg:erc-color-face5 ((t (nil)))) + '(bg:erc-color-face6 ((t (nil)))) + '(bg:erc-color-face7 ((t (nil)))) + '(bg:erc-color-face8 ((t (nil)))) + '(bg:erc-color-face9 ((t (nil)))) + '(bg:erc-color-face10 ((t (nil)))) + '(bg:erc-color-face11 ((t (nil)))) + '(bg:erc-color-face12 ((t (nil)))) + '(bg:erc-color-face13 ((t (nil)))) + '(bg:erc-color-face14 ((t (nil)))) + '(bg:erc-color-face15 ((t (nil))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'blue-erc) + +;;; blue-erc-theme.el ends here diff --git a/replace-colorthemes/blue-eshell-theme.el b/replace-colorthemes/blue-eshell-theme.el new file mode 100644 index 0000000..ec79855 --- /dev/null +++ b/replace-colorthemes/blue-eshell-theme.el @@ -0,0 +1,64 @@ +;;; blue-eshell-theme.el --- blue-eshell theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of blue-eshell theme from `color-themes' + +;;; Code: + +(deftheme blue-eshell + "blue-eshell theme") + +(custom-theme-set-faces + 'blue-eshell + + '(default ((t (:background "Blue-Eshell" :foreground "DarkSlateGray4")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:foreground "black")))) + + '(eshell-ls-archive-face ((t (:bold t :foreground "IndianRed")))) + '(eshell-ls-backup-face ((t (:foreground "Grey")))) + '(eshell-ls-clutter-face ((t (:foreground "DimGray")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "MediumSlateBlue")))) + '(eshell-ls-executable-face ((t (:foreground "Coral")))) + '(eshell-ls-missing-face ((t (:foreground "black")))) + '(eshell-ls-picture-face ((t (:foreground "Violet")))) ; non-standard face + '(eshell-ls-product-face ((t (:foreground "LightSalmon")))) + '(eshell-ls-readonly-face ((t (:foreground "Aquamarine")))) + '(eshell-ls-special-face ((t (:foreground "Gold")))) + '(eshell-ls-symlink-face ((t (:foreground "White")))) + '(eshell-ls-text-face ((t (:foreground "medium aquamarine")))) ; non-standard face + '(eshell-ls-todo-face ((t (:bold t :foreground "aquamarine")))) ; non-standard face + '(eshell-ls-unreadable-face ((t (:foreground "DimGray")))) + '(eshell-prompt-face ((t (:foreground "powder blue"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'blue-eshell) + +;;; blue-eshell-theme.el ends here diff --git a/replace-colorthemes/blue-gnus-theme.el b/replace-colorthemes/blue-gnus-theme.el new file mode 100644 index 0000000..d674fb1 --- /dev/null +++ b/replace-colorthemes/blue-gnus-theme.el @@ -0,0 +1,114 @@ +;;; blue-gnus-theme.el --- blue-gnus theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of blue-gnus theme from `color-themes' + +;;; Code: + +(deftheme blue-gnus + "blue-gnus theme") + +(custom-theme-set-faces + 'blue-gnus + + '(gnus-cite-attribution-face ((t (:foreground "lemon chiffon" :bold t)))) + '(gnus-cite-face-1 ((t (:foreground "LightSalmon")))) + '(gnus-cite-face-2 ((t (:foreground "Khaki")))) + '(gnus-cite-face-3 ((t (:foreground "Coral")))) + '(gnus-cite-face-4 ((t (:foreground "yellow green")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "bisque")))) + '(gnus-cite-face-7 ((t (:foreground "peru")))) + '(gnus-cite-face-8 ((t (:foreground "light coral")))) + '(gnus-cite-face-9 ((t (:foreground "plum")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "White")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "White")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "light cyan")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "light cyan")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "LightBlue")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "Aquamarine")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "Aquamarine")))) + '(gnus-group-news-1-empty-face ((t (:foreground "White")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "White")))) + '(gnus-group-news-2-empty-face ((t (:foreground "light cyan")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "light cyan")))) + '(gnus-group-news-3-empty-face ((t (:foreground "LightBlue")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-group-news-4-empty-face ((t (:foreground "Aquamarine")))) + '(gnus-group-news-4-face ((t (:bold t :foreground "Aquamarine")))) + '(gnus-group-news-5-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-5-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-group-news-6-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-6-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-group-news-low-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-header-content-face ((t (:foreground "LightSkyBlue3")))) + '(gnus-header-from-face ((t (:bold t :foreground "light cyan")))) + '(gnus-header-name-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-header-newsgroups-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-header-subject-face ((t (:bold t :foreground "light cyan")))) + '(gnus-signature-face ((t (:foreground "Grey")))) + '(gnus-splash-face ((t (:foreground "ForestGreen")))) + '(gnus-summary-cancelled-face ((t (:background "Black" :foreground "Yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "Aquamarine")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "LightSalmon")))) + '(gnus-summary-high-unread-face ((t (:bold t :foreground "beige")))) + '(gnus-summary-low-ancient-face ((t (:foreground "DimGray")))) + '(gnus-summary-low-read-face ((t (:foreground "slate gray")))) + '(gnus-summary-low-ticked-face ((t (:foreground "Pink")))) + '(gnus-summary-low-unread-face ((t (:foreground "LightGray")))) + '(gnus-summary-normal-ancient-face ((t (:foreground "MediumAquamarine")))) + '(gnus-summary-normal-read-face ((t (:foreground "Aquamarine")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "LightSalmon")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:background "DarkSlateBlue")))) + '(message-cited-text-face ((t (:foreground "LightSalmon")))) + '(message-header-cc-face ((t (:foreground "light cyan")))) + '(message-header-name-face ((t (:foreground "LightBlue")))) + '(message-header-newsgroups-face ((t (:bold t :foreground "MediumAquamarine")))) + '(message-header-other-face ((t (:foreground "MediumAquamarine")))) + '(message-header-subject-face ((t (:bold t :foreground "light cyan")))) + '(message-header-to-face ((t (:bold t :foreground "light cyan")))) + '(message-header-xheader-face ((t (:foreground "MediumAquamarine")))) + '(message-separator-face ((t (:foreground "chocolate"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'blue-gnus) + +;;; blue-gnus-theme.el ends here diff --git a/replace-colorthemes/blue-mood-theme.el b/replace-colorthemes/blue-mood-theme.el new file mode 100644 index 0000000..2f1faf6 --- /dev/null +++ b/replace-colorthemes/blue-mood-theme.el @@ -0,0 +1,136 @@ +;;; blue-mood-theme.el --- blue-mood theme + +;; Copyright (C) 2002 by Nelson Loyola +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of blue-mood theme from `color-themes' + +;;; Code: + +(deftheme blue-mood + "blue-mood theme") + +(custom-theme-set-faces + 'blue-mood + + '(default ((t (:background "DodgerBlue4" :foreground "white smoke")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "DarkGoldenrod1")))) + '(border ((t (:foreground "Blue")))) + + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (nil)))) + '(border-glyph ((t (nil)))) + '(cmode-bracket-face ((t (:bold t)))) + '(cperl-array-face ((t (:bold t :foreground "wheat")))) + '(cperl-hash-face ((t (:bold t :foreground "chartreuse")))) + '(custom-button-face ((t (nil)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :foreground "blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "red")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:bold t :foreground "cyan")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :foreground "blue")))) + '(ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue")))) + '(font-lock-builtin-face ((t (:bold t :foreground "wheat")))) + '(font-lock-comment-face ((t (:bold t :foreground "gray72")))) + '(font-lock-constant-face ((t (:bold t :foreground "cyan3")))) + '(font-lock-doc-string-face ((t (:foreground "#00C000")))) + '(font-lock-function-name-face ((t (:bold t :foreground "chartreuse")))) + '(font-lock-keyword-face ((t (:bold t :foreground "gold1")))) + '(font-lock-other-emphasized-face ((t (:bold t :foreground "gold1")))) + '(font-lock-other-type-face ((t (:bold t :foreground "gold1")))) + '(font-lock-preprocessor-face ((t (:foreground "plum")))) + '(font-lock-reference-face ((t (:bold t :foreground "orangered")))) + '(font-lock-string-face ((t (:foreground "tomato")))) + '(font-lock-type-face ((t (:bold t :foreground "gold1")))) + '(font-lock-variable-name-face ((t (:foreground "light yellow")))) + '(font-lock-warning-face ((t (:foreground "tomato")))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "grey75" :foreground "black")))) + '(gui-element ((t (:size "nil" :background "#e7e3d6" :foreground" #000000")))) + '(highlight ((t (:background "red" :foreground "yellow")))) + '(isearch ((t (:bold t :background "pale turquoise" :foreground "blue")))) + '(italic ((t (nil)))) + '(lazy-highlight-face ((t (:bold t :foreground "dark magenta")))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:bold t :background "gray68" :foreground "yellow")))) + '(mode-line ((t (:background "goldenrod" :foreground "darkblue")))) + '(mode-line-buffer-id ((t (:background "goldenrod" :foreground "darkblue")))) + '(mode-line-mousable ((t (:background "goldenrod" :foreground "darkblue")))) + '(mode-line-mousable-minor-mode ((t (:background "goldenrod" :foreground "darkblue")))) + '(my-tab-face ((t (:background "SlateBlue1")))) + '(p4-depot-added-face ((t (:foreground "steelblue1")))) + '(p4-depot-deleted-face ((t (:foreground "red")))) + '(p4-depot-unmapped-face ((t (:foreground "grey90")))) + '(p4-diff-change-face ((t (:foreground "dark green")))) + '(p4-diff-del-face ((t (:bold t :foreground "salmon")))) + '(p4-diff-file-face ((t (:background "blue")))) + '(p4-diff-head-face ((t (:background "blue")))) + '(p4-diff-ins-face ((t (:foreground "steelblue1")))) + '(paren-blink-off ((t (:foreground "DodgerBlue4")))) + '(paren-match ((t (:background "red" :foreground "yellow")))) + '(paren-mismatch ((t (:background "DeepPink")))) + '(pointer ((t (:background "white")))) + '(primary-selection ((t (:bold t :background "medium sea green")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "red" :foreground "yellow")))) + '(right-margin ((t (nil)))) + '(secondary-selection ((t (:background "gray91" :foreground "sienna3")))) + '(show-paren-match-face ((t (:background "cyan3" :foreground "blue")))) + '(show-paren-mismatch-face ((t (:background "red" :foreground "blue")))) + '(show-trailing-whitespace ((t (:background "red" :foreground "blue")))) + '(speedbar-button-face ((t (:foreground "white")))) + '(speedbar-directory-face ((t (:foreground "gray")))) + '(speedbar-file-face ((t (:foreground "gold1")))) + '(speedbar-highlight-face ((t (:background "lightslateblue" :foreground "gold1")))) + '(speedbar-selected-face ((t (:underline t :foreground "red")))) + '(speedbar-tag-face ((t (:foreground "chartreuse")))) + '(text-cursor ((t (:background "DarkGoldenrod1" :foreground "DodgerBlue4")))) + '(toolbar ((t (:background "#e7e3d6" :foreground "#000000")))) + '(underline ((t (:underline t)))) + '(vertical-divider ((t (:background "#e7e3d6" :foreground "#000000")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "white" :foreground "midnightblue"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'blue-mood) + +;;; blue-mood-theme.el ends here diff --git a/replace-colorthemes/blue-sea-theme.el b/replace-colorthemes/blue-sea-theme.el new file mode 100644 index 0000000..1e8ff51 --- /dev/null +++ b/replace-colorthemes/blue-sea-theme.el @@ -0,0 +1,263 @@ +;;; blue-sea-theme.el --- blue-sea theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of blue-sea theme from `color-themes' + +;;; Code: + +(deftheme blue-sea + "blue-sea theme") + +(custom-theme-set-faces + 'blue-sea + + '(default ((t (:background "MidnightBlue" :foreground "Grey")))) + '(mouse ((t (:foreground "Grey")))) + '(cursor ((t (:background "Grey")))) + '(border ((t (:foreground "Grey")))) + + '(gnus-cite-attribution-face ((t (:lforeground "lemon chiffon" :bold t)))) + '(gnus-cite-face-1 ((t (:foreground "LightSalmon")))) + '(gnus-cite-face-2 ((t (:foreground "Khaki")))) + '(gnus-cite-face-3 ((t (:foreground "Coral")))) + '(gnus-cite-face-4 ((t (:foreground "yellow green")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "bisque")))) + '(gnus-cite-face-7 ((t (:foreground "peru")))) + '(gnus-cite-face-8 ((t (:foreground "light coral")))) + '(gnus-cite-face-9 ((t (:foreground "plum")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "White")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "White")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "light cyan")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "light cyan")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "LightBlue")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "Aquamarine")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "Aquamarine")))) + '(gnus-group-news-1-empty-face ((t (:foreground "White")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "White")))) + '(gnus-group-news-2-empty-face ((t (:foreground "light cyan")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "light cyan")))) + '(gnus-group-news-3-empty-face ((t (:foreground "LightBlue")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-group-news-4-empty-face ((t (:foreground "Aquamarine")))) + '(gnus-group-news-4-face ((t (:bold t :foreground "Aquamarine")))) + '(gnus-group-news-5-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-5-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-group-news-6-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-6-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-group-news-low-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-header-content-face ((t (:foreground "LightSkyBlue3")))) + '(gnus-header-from-face ((t (:bold t :foreground "light cyan")))) + '(gnus-header-name-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-header-newsgroups-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-header-subject-face ((t (:bold t :foreground "light cyan")))) + '(gnus-signature-face ((t (:foreground "Grey")))) + '(gnus-splash-face ((t (:foreground "ForestGreen")))) + '(gnus-summary-cancelled-face ((t (:background "Black" :foreground "Yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "Aquamarine")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "LightSalmon")))) + '(gnus-summary-high-unread-face ((t (:bold t :foreground "beige")))) + '(gnus-summary-low-ancient-face ((t (:foreground "DimGray")))) + '(gnus-summary-low-read-face ((t (:foreground "slate gray")))) + '(gnus-summary-low-ticked-face ((t (:foreground "Pink")))) + '(gnus-summary-low-unread-face ((t (:foreground "LightGray")))) + '(gnus-summary-normal-ancient-face ((t (:foreground "MediumAquamarine")))) + '(gnus-summary-normal-read-face ((t (:foreground "Aquamarine")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "LightSalmon")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:background "DarkSlateBlue")))) + '(message-cited-text-face ((t (:foreground "LightSalmon")))) + '(message-header-cc-face ((t (:foreground "light cyan")))) + '(message-header-name-face ((t (:foreground "LightBlue")))) + '(message-header-newsgroups-face ((t (:bold t :foreground "MediumAquamarine")))) + '(message-header-other-face ((t (:foreground "MediumAquamarine")))) + '(message-header-subject-face ((t (:bold t :foreground "light cyan")))) + '(message-header-to-face ((t (:bold t :foreground "light cyan")))) + '(message-header-xheader-face ((t (:foreground "MediumAquamarine")))) + '(message-separator-face ((t (:foreground "chocolate")))) + + '(erc-action-face ((t (nil)))) + '(erc-bold-face ((t (:bold t)))) + '(erc-current-nick-face ((t (:bold t :foreground "yellow")))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "pale green")))) + '(erc-error-face ((t (:bold t :foreground "IndianRed")))) + '(erc-highlight-face ((t (:bold t :foreground "pale green")))) + '(erc-input-face ((t (:foreground "light blue")))) + '(erc-inverse-face ((t (:background "steel blue")))) + '(erc-keyword-face ((t (:foreground "orange" :bold t)))) + '(erc-notice-face ((t (:foreground "light salmon")))) + '(erc-notice-face ((t (:foreground "MediumAquamarine")))) + '(erc-pal-face ((t (:foreground "pale green")))) + '(erc-prompt-face ((t (:foreground "light blue" :bold t)))) + '(fg:erc-color-face0 ((t (:foreground "white")))) + '(fg:erc-color-face1 ((t (:foreground "beige")))) + '(fg:erc-color-face2 ((t (:foreground "lemon chiffon")))) + '(fg:erc-color-face3 ((t (:foreground "light cyan")))) + '(fg:erc-color-face4 ((t (:foreground "powder blue")))) + '(fg:erc-color-face5 ((t (:foreground "sky blue")))) + '(fg:erc-color-face6 ((t (:foreground "dark sea green")))) + '(fg:erc-color-face7 ((t (:foreground "pale green")))) + '(fg:erc-color-face8 ((t (:foreground "medium spring green")))) + '(fg:erc-color-face9 ((t (:foreground "khaki")))) + '(fg:erc-color-face10 ((t (:foreground "pale goldenrod")))) + '(fg:erc-color-face11 ((t (:foreground "light goldenrod yellow")))) + '(fg:erc-color-face12 ((t (:foreground "light yellow")))) + '(fg:erc-color-face13 ((t (:foreground "yellow")))) + '(fg:erc-color-face14 ((t (:foreground "light goldenrod")))) + '(fg:erc-color-face15 ((t (:foreground "lime green")))) + '(bg:erc-color-face0 ((t (nil)))) + '(bg:erc-color-face1 ((t (nil)))) + '(bg:erc-color-face2 ((t (nil)))) + '(bg:erc-color-face3 ((t (nil)))) + '(bg:erc-color-face4 ((t (nil)))) + '(bg:erc-color-face5 ((t (nil)))) + '(bg:erc-color-face6 ((t (nil)))) + '(bg:erc-color-face7 ((t (nil)))) + '(bg:erc-color-face8 ((t (nil)))) + '(bg:erc-color-face9 ((t (nil)))) + '(bg:erc-color-face10 ((t (nil)))) + '(bg:erc-color-face11 ((t (nil)))) + '(bg:erc-color-face12 ((t (nil)))) + '(bg:erc-color-face13 ((t (nil)))) + '(bg:erc-color-face14 ((t (nil)))) + '(bg:erc-color-face15 ((t (nil)))) + + + '(bold ((t (:bold t)))) + '(bold-italic ((t (:bold t :foreground "beige")))) + '(calendar-today-face ((t (:underline t)))) + '(cperl-array-face ((t (:foreground "light salmon" :bold t)))) + '(cperl-hash-face ((t (:foreground "beige" :bold t :italic t)))) + '(cperl-nonoverridable-face ((t (:foreground "aquamarine")))) + '(custom-button-face ((t (:foreground "gainsboro")))) + '(custom-changed-face ((t (:foreground "white" :background "blue")))) + '(custom-documentation-face ((t (:foreground "light blue")))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:foreground "pale turquoise" :bold t)))) + '(custom-group-tag-face-1 ((t (:foreground "pale turquoise" :underline t)))) + '(custom-invalid-face ((t (:foreground "yellow" :background "red")))) + '(custom-modified-face ((t (:foreground "white" :background "blue")))) + '(custom-rogue-face ((t (:foreground "pink" :background "black")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:foreground "blue" :background "white")))) + '(custom-state-face ((t (:foreground "light salmon")))) + '(custom-variable-button-face ((t (:bold t :underline t)))) + '(custom-variable-tag-face ((t (:foreground "turquoise" :bold t)))) + '(diary-face ((t (:foreground "red")))) + '(dired-face-directory ((t (:bold t :foreground "sky blue")))) + '(dired-face-permissions ((t (:foreground "aquamarine")))) + '(dired-face-flagged ((t (:foreground "tomato")))) + '(dired-face-marked ((t (:foreground "light salmon")))) + '(dired-face-executable ((t (:foreground "green yellow")))) + '(eshell-ls-archive-face ((t (:bold t :foreground "medium purple")))) + '(eshell-ls-backup-face ((t (:foreground "dim gray")))) + '(eshell-ls-clutter-face ((t (:foreground "dim gray")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "medium slate blue")))) + '(eshell-ls-executable-face ((t (:bold t :foreground "aquamarine")))) + '(eshell-ls-missing-face ((t (:foreground "black")))) + '(eshell-ls-picture-face ((t (:foreground "violet")))) + '(eshell-ls-product-face ((t (:foreground "light steel blue")))) + '(eshell-ls-readonly-face ((t (:foreground "aquamarine")))) + '(eshell-ls-special-face ((t (:foreground "gold")))) + '(eshell-ls-symlink-face ((t (:foreground "white")))) + '(eshell-ls-unreadable-face ((t (:foreground "dim gray")))) + '(eshell-prompt-face ((t (:foreground "light sky blue" :bold t)))) + '(excerpt ((t (:italic t)))) + '(fixed ((t (:bold t)))) + '(flyspell-duplicate-face ((t (:foreground "Gold3" :bold t :underline t)))) + '(flyspell-incorrect-face ((t (:foreground "OrangeRed" :bold t :underline t)))) + '(font-lock-builtin-face ((t (:foreground "aquamarine")))) + '(font-lock-comment-face ((t (:foreground "light blue")))) + '(font-lock-constant-face ((t (:foreground "pale green")))) + '(font-lock-doc-string-face ((t (:foreground "sky blue")))) + '(font-lock-function-name-face ((t (:bold t :foreground "aquamarine")))) + '(font-lock-keyword-face ((t (:foreground "pale turquoise" :bold t)))) + '(font-lock-reference-face ((t (:foreground "pale green")))) + '(font-lock-string-face ((t (:foreground "light sky blue")))) + '(font-lock-type-face ((t (:foreground "sky blue" :bold t)))) + '(font-lock-variable-name-face ((t (:foreground "turquoise" :bold t)))) + '(font-lock-warning-face ((t (:foreground "Red" :bold t)))) + '(fringe ((t (:background "MidnightBlue")))) + '(header-line ((t (:background "#002" :foreground "cornflower blue")))) + '(highlight ((t (:background "dark slate blue" :foreground "light blue")))) + '(highline-face ((t (:background "DeepSkyBlue4")))) + '(holiday-face ((t (:background "pink")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:bold t)))) + '(info-xref ((t (:bold t :foreground "sky blue")))) + '(isearch ((t (:background "slate blue")))) + '(italic ((t (:foreground "sky blue")))) + '(makefile-space-face ((t (:background "hotpink")))) + '(menu ((t (:background "MidnightBlue" :foreground "Grey")))) + '(mode-line ((t (:foreground "wheat" :background "slate blue")))) + '(mode-line-inactive ((t (:background "dark slate blue" :foreground "wheat")))) + '(mode-line-buffer-id ((t (:foreground "beige" :background "slate blue")))) + '(mode-line-mousable ((t (:foreground "light cyan" :background "slate blue")))) + '(mode-line-mousable-minor-mode ((t (:foreground "wheat" :background "slate blue")))) + '(region ((t (:background "DarkSlateBlue")))) + '(secondary-selection ((t (:background "steel blue")))) + '(show-paren-match-face ((t (:foreground "white" :background "light slate blue")))) + '(show-paren-mismatch-face ((t (:foreground "white" :background "red")))) + '(speedbar-button-face ((t (:foreground "seashell2")))) + '(speedbar-directory-face ((t (:foreground "seashell3")))) + '(speedbar-file-face ((t (:foreground "seashell4")))) + '(speedbar-highlight-face ((t (:background "dark slate blue" :foreground "wheat")))) + '(speedbar-selected-face ((t (:foreground "seashell1" :underline t)))) + '(speedbar-tag-face ((t (:foreground "antique white")))) + '(tool-bar ((t (:background "MidnightBlue" :foreground "Grey" :box (:line-width 1 :style released-button))))) + '(underline ((t (:underline t)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "light blue")))) + '(widget-field-face ((t (:background "RoyalBlue4" :foreground "wheat")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "slate blue" :foreground "wheat")))) + '(woman-bold-face ((t (:foreground "sky blue" :bold t)))) + '(woman-italic-face ((t (:foreground "deep sky blue")))) + '(woman-unknown-face ((t (:foreground "LightSalmon")))) + '(Man-overstrike-face ((t (:foreground "sky blue" :bold t)))) + '(Man-underline-face ((t (:foreground "deep sky blue")))) + '(zmacs-region ((t (:background "DarkSlateBlue"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'blue-sea) + +;;; blue-sea-theme.el ends here diff --git a/replace-colorthemes/calm-forest-theme.el b/replace-colorthemes/calm-forest-theme.el new file mode 100644 index 0000000..55d60b4 --- /dev/null +++ b/replace-colorthemes/calm-forest-theme.el @@ -0,0 +1,174 @@ +;;; calm-forest-theme.el --- calm-forest theme + +;; Copyright (C) 2003 by Artur Hefczyc +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of calm-forest theme from `color-themes' + +;;; Code: + +(deftheme calm-forest + "calm-forest theme") + +(custom-theme-set-faces + 'calm-forest + + '(default ((t (:background "gray12" :foreground "green")))) + '(mouse ((t (:background "yellow")))) + '(cursor ((t (:background "orange")))) + '(border ((t (:background "black")))) + + '(help-highlight-face ((t (:underline t)))) + '(list-matching-lines-face ((t (:bold t :weight bold)))) + '(view-highlight-face ((t (:background "darkolivegreen")))) + '(widget-mouse-face ((t (:background "darkolivegreen")))) + + '(Info-title-1-face ((t (:bold t :weight bold :family "helv" :height 1.728)))) + '(Info-title-2-face ((t (:bold t :family "helv" :weight bold :height 1.44)))) + '(Info-title-3-face ((t (:bold t :weight bold :family "helv" :height 1.2)))) + '(Info-title-4-face ((t (:bold t :family "helv" :weight bold)))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :weight bold)))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(cparen-around-andor-face ((t (:bold t :foreground "maroon" :weight bold)))) + '(cparen-around-begin-face ((t (:foreground "maroon")))) + '(cparen-around-conditional-face ((t (:bold t :foreground "RoyalBlue" :weight bold)))) + '(cparen-around-define-face ((t (:bold t :foreground "Blue" :weight bold)))) + '(cparen-around-lambda-face ((t (:foreground "LightSeaGreen")))) + '(cparen-around-letdo-face ((t (:bold t :foreground "LightSeaGreen" :weight bold)))) + '(cparen-around-quote-face ((t (:foreground "SaddleBrown")))) + '(cparen-around-set!-face ((t (:foreground "OrangeRed")))) + '(cparen-around-syntax-rules-face ((t (:foreground "Magenta")))) + '(cparen-around-vector-face ((t (:foreground "chocolate")))) + '(cparen-binding-face ((t (:foreground "ForestGreen")))) + '(cparen-binding-list-face ((t (:bold t :foreground "ForestGreen" :weight bold)))) + '(cparen-conditional-clause-face ((t (:foreground "RoyalBlue")))) + '(cparen-normal-paren-face ((t (:foreground "grey50")))) + '(custom-button-face ((t (:background "lightgrey" :foreground "black" + :box (:line-width 2 :style released-button))))) + '(custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" + :box (:line-width 2 :style pressed-button))))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "dim gray")))) + '(custom-comment-tag-face ((t (:foreground "gray80")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:bold t :family "helv" :weight bold :height 1.2)))) + '(custom-group-tag-face ((t (:bold t :foreground "light blue" :weight bold :height 1.2)))) + '(custom-group-tag-face-1 ((t (:bold t :family "helv" :foreground "pink" :weight bold :height 1.2)))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "lime green")))) + '(custom-variable-button-face ((t (:bold t :underline t :weight bold)))) + '(custom-variable-tag-face ((t (:bold t :foreground "light blue" :weight bold :height 1.2)))) + '(eieio-custom-slot-tag-face ((t (:foreground "light blue")))) + '(extra-whitespace-face ((t (:background "pale green")))) + '(fixed-pitch ((t (:family "courier")))) + '(font-latex-bold-face ((t (:bold t :foreground "OliveDrab" :weight bold)))) + '(font-latex-italic-face ((t (:italic t :foreground "OliveDrab")))) + '(font-latex-math-face ((t (:foreground "burlywood")))) + '(font-latex-sedate-face ((t (:foreground "LightGray")))) + '(font-latex-string-face ((t (:foreground "RosyBrown")))) + '(font-latex-warning-face ((t (:bold t :foreground "Red" :weight bold)))) + '(font-lock-builtin-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-comment-face ((t (:foreground "chocolate1")))) + '(font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(font-lock-doc-face ((t (:foreground "LightSalmon")))) + '(font-lock-function-name-face ((t (:foreground "LightSkyBlue")))) + '(font-lock-keyword-face ((t (:foreground "Cyan")))) + '(font-lock-string-face ((t (:foreground "LightSalmon")))) + '(font-lock-type-face ((t (:foreground "PaleGreen")))) + '(font-lock-variable-name-face ((t (:foreground "LightGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink" :weight bold)))) + '(fringe ((t (:background "grey10")))) + '(header-line ((t (:background "grey20" :foreground"grey90" + :box (:line-width -1 :style released-button))))) + '(highlight ((t (:background "darkolivegreen")))) + '(info-header-node ((t (:italic t :bold t :weight bold :foreground "white")))) + '(info-header-xref ((t (:bold t :weight bold :foreground "cyan")))) + '(info-menu-5 ((t (:foreground "red1")))) + '(info-menu-header ((t (:bold t :family "helv" :weight bold)))) + '(info-node ((t (:italic t :bold t :foreground "white" :weight bold)))) + '(info-xref ((t (:bold t :foreground "cyan" :weight bold)))) + '(isearch ((t (:background "palevioletred2" :foreground "brown4")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise4")))) + '(italic ((t (:italic t)))) + '(jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan")))) + '(jde-db-active-breakpoint-face ((t (:background "red" :foreground "black")))) + '(jde-db-requested-breakpoint-face ((t (:background "yellow" :foreground "black")))) + '(jde-db-spec-breakpoint-face ((t (:background "green" :foreground "black")))) + '(jde-java-font-lock-api-face ((t (:foreground "light goldenrod")))) + '(jde-java-font-lock-bold-face ((t (:bold t :weight bold)))) + '(jde-java-font-lock-code-face ((t (nil)))) + '(jde-java-font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(jde-java-font-lock-doc-tag-face ((t (:foreground "light coral")))) + '(jde-java-font-lock-italic-face ((t (:italic t)))) + '(jde-java-font-lock-link-face ((t (:foreground "blue" :underline t :slant normal)))) + '(jde-java-font-lock-modifier-face ((t (:foreground "LightSteelBlue")))) + '(jde-java-font-lock-number-face ((t (:foreground "LightSalmon")))) + '(jde-java-font-lock-operator-face ((t (:foreground "medium blue")))) + '(jde-java-font-lock-package-face ((t (:foreground "steelblue1")))) + '(jde-java-font-lock-pre-face ((t (nil)))) + '(jde-java-font-lock-underline-face ((t (:underline t)))) + '(menu ((t (nil)))) + '(mode-line ((t (:background "grey75" :foreground "black" + :box (:line-width -1 :style released-button))))) + '(region ((t (:background "blue3")))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "SkyBlue4")))) + '(semantic-dirty-token-face ((t (:background "gray10")))) + '(semantic-unmatched-syntax-face ((t (:underline "red")))) + '(senator-intangible-face ((t (:foreground "gray75")))) + '(senator-momentary-highlight-face ((t (:background "gray30")))) + '(senator-read-only-face ((t (:background "#664444")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(speedbar-button-face ((t (:foreground "green3")))) + '(speedbar-directory-face ((t (:foreground "light blue")))) + '(speedbar-file-face ((t (:foreground "cyan")))) + '(speedbar-highlight-face ((t (:background "sea green")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-separator-face ((t (:background "blue" :foreground "white" :overline "gray")))) + '(speedbar-tag-face ((t (:foreground "yellow")))) + '(tool-bar ((t (:background "grey75" :foreground "black" + :box (:line-width 1 :style released-button))))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(variable-pitch ((t (:family "helv")))) + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:background "dim gray")))) + '(widget-inactive-face ((t (:foreground "light gray")))) + '(widget-single-line-field-face ((t (:background "dim gray"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'calm-forest) + +;;; calm-forest-theme.el ends here diff --git a/replace-colorthemes/charcoal-black-theme.el b/replace-colorthemes/charcoal-black-theme.el new file mode 100644 index 0000000..00fed93 --- /dev/null +++ b/replace-colorthemes/charcoal-black-theme.el @@ -0,0 +1,306 @@ +;;; charcoal-black-theme.el --- charcoal-black theme + +;; Copyright (C) 2003 by Lars Chr. Hausmann +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of charcoal-black theme from `color-themes' + +;;; Code: + +(deftheme charcoal-black + "charcoal-black theme") + +(custom-theme-set-faces + 'charcoal-black + + '(default ((t (:background "Grey15" :foreground "Grey")))) + '(mouse ((t (:background "Grey")))) + '(cursor ((t (:background "Grey")))) + '(border ((t (:background "Grey")))) + + '(display-time-mail-face ((t (:underline t)))) + '(gnus-article-button-face ((t (:bold t :weight bold)))) + '(gnus-article-mouse-face ((t (:background "dark slate blue" :foreground "light blue")))) + '(gnus-mouse-face ((t (:background "dark slate blue" :foreground "light blue")))) + '(help-highlight-face ((t (:underline t)))) + '(list-matching-lines-face ((t (:bold t :weight bold)))) + '(mime-button-face ((t (:bold t :weight bold)))) + '(mime-button-mouse-face ((t (:background "dark slate blue" :foreground "light blue")))) + '(view-highlight-face ((t (:background "dark slate blue" :foreground "light blue")))) + '(widget-mouse-face ((t (:background "dark slate blue" :foreground "light blue")))) + + '(Info-title-1-face ((t (:bold t :weight bold :family "helv" :height 1.728)))) + '(Info-title-2-face ((t (:bold t :family "helv" :weight bold :height 1.44)))) + '(Info-title-3-face ((t (:bold t :weight bold :family "helv" :height 1.2)))) + '(Info-title-4-face ((t (:bold t :family "helv" :weight bold)))) + '(ac-candidate-face ((t (:inherit default :background "light blue" :foreground "dark slate grey")))) + '(ac-selection-face ((t (:inherit default :background "dark slate blue" :foreground "light blue")))) + '(ac-completion-face ((t (:inherit ac-selection-face)))) + '(bg:erc-color-face0 ((t (nil)))) + '(bg:erc-color-face1 ((t (nil)))) + '(bg:erc-color-face10 ((t (nil)))) + '(bg:erc-color-face11 ((t (nil)))) + '(bg:erc-color-face12 ((t (nil)))) + '(bg:erc-color-face13 ((t (nil)))) + '(bg:erc-color-face14 ((t (nil)))) + '(bg:erc-color-face15 ((t (nil)))) + '(bg:erc-color-face2 ((t (nil)))) + '(bg:erc-color-face3 ((t (nil)))) + '(bg:erc-color-face4 ((t (nil)))) + '(bg:erc-color-face5 ((t (nil)))) + '(bg:erc-color-face6 ((t (nil)))) + '(bg:erc-color-face7 ((t (nil)))) + '(bg:erc-color-face8 ((t (nil)))) + '(bg:erc-color-face9 ((t (nil)))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:bold t :foreground "beige" :weight bold)))) + '(calendar-today-face ((t (:underline t)))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(cperl-array-face ((t (:bold t :foreground "light salmon" :weight bold)))) + '(cperl-hash-face ((t (:italic t :bold t :foreground "beige" :slant italic :weight bold)))) + '(cperl-nonoverridable-face ((t (:foreground "aquamarine")))) + '(custom-button-face ((t (:foreground "gainsboro")))) + '(custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button))))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "dim gray")))) + '(custom-comment-tag-face ((t (:foreground "gray80")))) + '(custom-documentation-face ((t (:foreground "light blue")))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:bold t :foreground "pale turquoise" :weight bold)))) + '(custom-group-tag-face-1 ((t (:foreground "pale turquoise" :underline t)))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "light salmon")))) + '(custom-variable-button-face ((t (:bold t :underline t :weight bold)))) + '(custom-variable-tag-face ((t (:bold t :foreground "turquoise" :weight bold)))) + '(diary-face ((t (:foreground "red")))) + '(dired-face-directory ((t (:bold t :foreground "sky blue" :weight bold)))) + '(dired-face-executable ((t (:foreground "green yellow")))) + '(dired-face-flagged ((t (:foreground "tomato")))) + '(dired-face-marked ((t (:foreground "light salmon")))) + '(dired-face-permissions ((t (:foreground "aquamarine")))) + '(erc-action-face ((t (nil)))) + '(erc-bold-face ((t (:bold t :weight bold)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "pale green")))) + '(erc-error-face ((t (:bold t :foreground "IndianRed" :weight bold)))) + '(erc-highlight-face ((t (:bold t :foreground "pale green" :weight bold)))) + '(erc-input-face ((t (:foreground "light blue")))) + '(erc-inverse-face ((t (:background "steel blue")))) + '(erc-notice-face ((t (:foreground "light salmon")))) + '(erc-pal-face ((t (:foreground "pale green")))) + '(erc-prompt-face ((t (:bold t :foreground "light blue" :weight bold)))) + '(eshell-ls-archive-face ((t (:bold t :foreground "medium purple" :weight bold)))) + '(eshell-ls-backup-face ((t (:foreground "dim gray")))) + '(eshell-ls-clutter-face ((t (:foreground "dim gray")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "medium slate blue" :weight bold)))) + '(eshell-ls-executable-face ((t (:bold t :foreground "aquamarine" :weight bold)))) + '(eshell-ls-missing-face ((t (:foreground "black")))) + '(eshell-ls-picture-face ((t (:foreground "violet")))) + '(eshell-ls-product-face ((t (:foreground "light steel blue")))) + '(eshell-ls-readonly-face ((t (:foreground "aquamarine")))) + '(eshell-ls-special-face ((t (:foreground "gold")))) + '(eshell-ls-symlink-face ((t (:foreground "white")))) + '(eshell-ls-unreadable-face ((t (:foreground "dim gray")))) + '(eshell-prompt-face ((t (:bold t :foreground "light sky blue" :weight bold)))) + '(excerpt ((t (:italic t :slant italic)))) + '(fg:erc-color-face0 ((t (:foreground "white")))) + '(fg:erc-color-face1 ((t (:foreground "beige")))) + '(fg:erc-color-face10 ((t (:foreground "pale goldenrod")))) + '(fg:erc-color-face11 ((t (:foreground "light goldenrod yellow")))) + '(fg:erc-color-face12 ((t (:foreground "light yellow")))) + '(fg:erc-color-face13 ((t (:foreground "yellow")))) + '(fg:erc-color-face14 ((t (:foreground "light goldenrod")))) + '(fg:erc-color-face15 ((t (:foreground "lime green")))) + '(fg:erc-color-face2 ((t (:foreground "lemon chiffon")))) + '(fg:erc-color-face3 ((t (:foreground "light cyan")))) + '(fg:erc-color-face4 ((t (:foreground "powder blue")))) + '(fg:erc-color-face5 ((t (:foreground "sky blue")))) + '(fg:erc-color-face6 ((t (:foreground "dark sea green")))) + '(fg:erc-color-face7 ((t (:foreground "pale green")))) + '(fg:erc-color-face8 ((t (:foreground "medium spring green")))) + '(fg:erc-color-face9 ((t (:foreground "khaki")))) + '(fixed ((t (:bold t :weight bold)))) + '(fixed-pitch ((t (:family "courier")))) + '(flyspell-duplicate-face ((t (:bold t :foreground "Gold3" :underline t :weight bold)))) + '(flyspell-incorrect-face ((t (:bold t :foreground "OrangeRed" :underline t :weight bold)))) + '(font-lock-builtin-face ((t (:foreground "aquamarine")))) + '(font-lock-comment-face ((t (:foreground "light blue")))) + '(font-lock-constant-face ((t (:foreground "pale green")))) + '(font-lock-doc-face ((t (:foreground "light sky blue")))) + '(font-lock-doc-string-face ((t (:foreground "sky blue")))) + '(font-lock-function-name-face ((t (:bold t :foreground "aquamarine" :weight bold)))) + '(font-lock-keyword-face ((t (:bold t :foreground "pale turquoise" :weight bold)))) + '(font-lock-reference-face ((t (:foreground "pale green")))) + '(font-lock-string-face ((t (:foreground "light sky blue")))) + '(font-lock-type-face ((t (:bold t :foreground "sky blue" :weight bold)))) + '(font-lock-variable-name-face ((t (:bold t :foreground "turquoise" :weight bold)))) + '(font-lock-warning-face ((t (:bold t :foreground "Red" :weight bold)))) + '(fringe ((t (:background "Grey15")))) + '(gnus-cite-face-1 ((t (:foreground "LightSalmon")))) + '(gnus-cite-face-2 ((t (:foreground "Khaki")))) + '(gnus-cite-face-3 ((t (:foreground "Coral")))) + '(gnus-cite-face-4 ((t (:foreground "yellow green")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "bisque")))) + '(gnus-cite-face-7 ((t (:foreground "peru")))) + '(gnus-cite-face-8 ((t (:foreground "light coral")))) + '(gnus-cite-face-9 ((t (:foreground "plum")))) + '(gnus-emphasis-bold ((t (:bold t :weight bold)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t :slant italic)))) + '(gnus-emphasis-strikethru ((t (nil)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "White")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "White" :weight bold)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "light cyan")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "light cyan" :weight bold)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "LightBlue")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "LightBlue" :weight bold)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "Aquamarine")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "Aquamarine" :weight bold)))) + '(gnus-group-news-1-empty-face ((t (:foreground "White")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "White" :weight bold)))) + '(gnus-group-news-2-empty-face ((t (:foreground "light cyan")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "light cyan" :weight bold)))) + '(gnus-group-news-3-empty-face ((t (:foreground "LightBlue")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "LightBlue" :weight bold)))) + '(gnus-group-news-4-empty-face ((t (:foreground "Aquamarine")))) + '(gnus-group-news-4-face ((t (:bold t :foreground "Aquamarine" :weight bold)))) + '(gnus-group-news-5-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-5-face ((t (:bold t :foreground "MediumAquamarine" :weight bold)))) + '(gnus-group-news-6-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-6-face ((t (:bold t :foreground "MediumAquamarine" :weight bold)))) + '(gnus-group-news-low-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "MediumAquamarine" :weight bold)))) + '(gnus-header-content-face ((t (:foreground "LightSkyBlue3")))) + '(gnus-header-from-face ((t (:bold t :foreground "light cyan" :weight bold)))) + '(gnus-header-name-face ((t (:bold t :foreground "LightBlue" :weight bold)))) + '(gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "MediumAquamarine" :slant italic :weight bold)))) + '(gnus-header-subject-face ((t (:bold t :foreground "light cyan" :weight bold)))) + '(gnus-server-agent-face ((t (:bold t :foreground "PaleTurquoise" :weight bold)))) + '(gnus-server-closed-face ((t (:italic t :foreground "Light Steel Blue" :slant italic)))) + '(gnus-server-denied-face ((t (:bold t :foreground "Pink" :weight bold)))) + '(gnus-server-offline-face ((t (:bold t :foreground "Yellow" :weight bold)))) + '(gnus-server-opened-face ((t (:bold t :foreground "Green1" :weight bold)))) + '(gnus-signature-face ((t (:foreground "Grey")))) + '(gnus-splash-face ((t (:foreground "ForestGreen")))) + '(gnus-summary-cancelled-face ((t (:background "Black" :foreground "Yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "MediumAquamarine" :weight bold)))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "Aquamarine" :weight bold)))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "LightSalmon" :weight bold)))) + '(gnus-summary-high-unread-face ((t (:italic t :bold t :foreground "beige" :slant italic :weight bold)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "DimGray" :slant italic)))) + '(gnus-summary-low-read-face ((t (:foreground "slate gray")))) + '(gnus-summary-low-ticked-face ((t (:foreground "Pink")))) + '(gnus-summary-low-unread-face ((t (:foreground "LightGray")))) + '(gnus-summary-normal-ancient-face ((t (:foreground "MediumAquamarine")))) + '(gnus-summary-normal-read-face ((t (:foreground "Aquamarine")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "LightSalmon")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(header-line ((t (:box (:line-width -1 :style released-button) :background "grey20" :foreground "grey90" :box nil)))) + '(highlight ((t (:background "dark slate blue" :foreground "light blue")))) + '(highline-face ((t (:background "DeepSkyBlue4")))) + '(holiday-face ((t (:background "pink")))) + '(info-header-node ((t (:bold t :weight bold)))) + '(info-header-xref ((t (:bold t :weight bold :foreground "sky blue")))) + '(info-menu-5 ((t (:underline t)))) + '(info-menu-header ((t (:bold t :family "helv" :weight bold)))) + '(info-node ((t (:bold t :weight bold)))) + '(info-xref ((t (:bold t :foreground "sky blue" :weight bold)))) + '(isearch ((t (:background "slate blue")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise4")))) + '(italic ((t (:foreground "sky blue")))) + '(jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan")))) + '(jde-bug-breakpoint-marker ((t (:background "yellow" :foreground "red")))) + '(jde-java-font-lock-api-face ((t (:foreground "light goldenrod")))) + '(jde-java-font-lock-bold-face ((t (:bold t :weight bold)))) + '(jde-java-font-lock-code-face ((t (nil)))) + '(jde-java-font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(jde-java-font-lock-doc-tag-face ((t (:foreground "light coral")))) + '(jde-java-font-lock-italic-face ((t (:italic t :slant italic)))) + '(jde-java-font-lock-link-face ((t (:foreground "blue" :underline t :slant normal)))) + '(jde-java-font-lock-modifier-face ((t (:foreground "LightSteelBlue")))) + '(jde-java-font-lock-number-face ((t (:foreground "LightSalmon")))) + '(jde-java-font-lock-package-face ((t (:foreground "steelblue1")))) + '(jde-java-font-lock-pre-face ((t (nil)))) + '(jde-java-font-lock-underline-face ((t (:underline t)))) + '(makefile-space-face ((t (:background "hotpink")))) + '(menu ((t (:background "MidnightBlue" :foreground "Grey")))) + '(message-cited-text-face ((t (:foreground "LightSalmon")))) + '(message-header-cc-face ((t (:foreground "light cyan")))) + '(message-header-name-face ((t (:foreground "LightBlue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "MediumAquamarine" :slant italic :weight bold)))) + '(message-header-other-face ((t (:foreground "MediumAquamarine")))) + '(message-header-subject-face ((t (:bold t :foreground "light cyan" :weight bold)))) + '(message-header-to-face ((t (:bold t :foreground "light cyan" :weight bold)))) + '(message-header-xheader-face ((t (:foreground "MediumAquamarine")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "chocolate")))) + '(mode-line ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button))))) + '(region ((t (:background "DarkSlateBlue")))) + '(scroll-bar ((t (:background "grey75")))) + '(secondary-selection ((t (:background "steel blue")))) + '(semantic-dirty-token-face ((t (:background "gray10")))) + '(semantic-unmatched-syntax-face ((t (:underline "red")))) + '(show-paren-match-face ((t (:background "light slate blue" :foreground "white")))) + '(show-paren-mismatch-face ((t (:background "red" :foreground "white")))) + '(speedbar-button-face ((t (:foreground "seashell2")))) + '(speedbar-directory-face ((t (:foreground "seashell3")))) + '(speedbar-file-face ((t (:foreground "seashell4")))) + '(speedbar-highlight-face ((t (:background "dark slate blue" :foreground "wheat")))) + '(speedbar-selected-face ((t (:foreground "seashell1" :underline t)))) + '(speedbar-separator-face ((t (:background "blue" :foreground "white" :overline "gray")))) + '(speedbar-tag-face ((t (:foreground "antique white")))) + '(tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button))))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(variable-pitch ((t (:family "helv")))) + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "light blue")))) + '(widget-field-face ((t (:background "RoyalBlue4" :foreground "wheat")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "slate blue" :foreground "wheat")))) + '(woman-bold-face ((t (:bold t :foreground "sky blue" :weight bold)))) + '(woman-italic-face ((t (:foreground "deep sky blue")))) + '(woman-unknown-face ((t (:foreground "LightSalmon")))) + '(zmacs-region ((t (:background "DarkSlateBlue"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'charcoal-black) + +;;; charcoal-black-theme.el ends here diff --git a/replace-colorthemes/clarity-theme.el b/replace-colorthemes/clarity-theme.el new file mode 100644 index 0000000..2aa9086 --- /dev/null +++ b/replace-colorthemes/clarity-theme.el @@ -0,0 +1,119 @@ +;;; clarity-theme.el --- clarity theme + +;; Copyright (C) 2003 by Richard Wellum +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of clarity theme from `color-themes' + +;;; Code: + +(deftheme clarity + "clarity theme") + +(custom-theme-set-faces + 'clarity + + '(default ((t (:background "black" :foreground "white")))) + '(mouse ((t (:background "white")))) + '(cursor ((t (:background "yellow")))) + '(border ((t (:background "white")))) + + '(help-highlight-face ((t (:underline t)))) + '(list-matching-lines-face ((t (:bold t :weight bold)))) + '(view-highlight-face ((t (:background "darkolivegreen")))) + '(widget-mouse-face ((t (:background "darkolivegreen")))) + + '(CUA-global-mark-face ((t (:background "cyan" :foreground "black")))) + '(CUA-rectangle-face ((t (:background "maroon" :foreground "white")))) + '(CUA-rectangle-noselect-face ((t (:background "dimgray" :foreground "white")))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(clearcase-dired-checkedout-face ((t (:foreground "red")))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(fixed-pitch ((t (:family "courier")))) + '(flash-paren-face-off ((t (nil)))) + '(flash-paren-face-on ((t (nil)))) + '(flash-paren-face-region ((t (nil)))) + '(font-lock-builtin-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-comment-face ((t (:foreground "OrangeRed")))) + '(font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(font-lock-doc-face ((t (:foreground "LightSalmon")))) + '(font-lock-function-name-face ((t (:foreground "LightSkyBlue")))) + '(font-lock-keyword-face ((t (:foreground "Cyan")))) + '(font-lock-string-face ((t (:foreground "LightSalmon")))) + '(font-lock-type-face ((t (:foreground "PaleGreen")))) + '(font-lock-variable-name-face ((t (:foreground "LightGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink" :weight bold)))) + '(ibuffer-dired-buffer-face ((t (:foreground "LightSkyBlue")))) + '(ibuffer-help-buffer-face ((t (:foreground "OrangeRed")))) + '(ibuffer-hidden-buffer-face ((t (:bold t :foreground "Pink" :weight bold)))) + '(ibuffer-occur-match-face ((t (:bold t :foreground "Pink" :weight bold)))) + '(ibuffer-read-only-buffer-face ((t (:foreground "PaleGreen")))) + '(ibuffer-special-buffer-face ((t (:foreground "Cyan")))) + '(ibuffer-title-face ((t (:foreground "PaleGreen")))) + '(fringe ((t (:background "grey10")))) + '(header-line ((t (:box (:line-width -1 :style released-button) :foreground "grey20" :background "grey90" :box nil)))) + '(highlight ((t (:background "darkolivegreen")))) + '(ibuffer-deletion-face ((t (:foreground "red")))) + '(ibuffer-marked-face ((t (:foreground "green")))) + '(isearch ((t (:background "palevioletred2" :foreground "brown4")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise4")))) + '(italic ((t (:italic t :slant italic)))) + '(menu ((t (nil)))) + '(mode-line ((t (:foreground "yellow" :background "darkslateblue" + :box (:line-width -1 :style released-button))))) + '(region ((t (:background "blue")))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "darkslateblue")))) + '(show-block-face1 ((t (:background "gray10")))) + '(show-block-face2 ((t (:background "gray15")))) + '(show-block-face3 ((t (:background "gray20")))) + '(show-block-face4 ((t (:background "gray25")))) + '(show-block-face5 ((t (:background "gray30")))) + '(show-block-face6 ((t (:background "gray35")))) + '(show-block-face7 ((t (:background "gray40")))) + '(show-block-face8 ((t (:background "gray45")))) + '(show-block-face9 ((t (:background "gray50")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(tool-bar ((t (:background "grey75" :foreground "black" + :box (:line-width 1 :style released-button))))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(variable-pitch ((t (:family "helv")))) + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:background "dim gray")))) + '(widget-inactive-face ((t (:foreground "light gray")))) + '(widget-single-line-field-face ((t (:background "dim gray"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'clarity) + +;;; clarity-theme.el ends here diff --git a/replace-colorthemes/classic-theme.el b/replace-colorthemes/classic-theme.el new file mode 100644 index 0000000..9b4bc4e --- /dev/null +++ b/replace-colorthemes/classic-theme.el @@ -0,0 +1,208 @@ +;;; classic-theme.el --- classic theme + +;; Copyright (C) 2000 by Frederic Giroud +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of classic theme from `color-themes' + +;;; Code: + +(deftheme classic + "classic theme") + +(custom-theme-set-faces + 'classic + + '(default ((t (:background "darkslategrey" :foreground "AntiqueWhite")))) + ;; avoid ugly random fringe color + '(fringe ((t (:background "darkslategrey")))) + + '(mouse ((t (:foreground "Grey")))) + '(cursor ((t (:background "Red")))) + '(border ((t (:foreground "black")))) + + '(gnus-cite-attribution-face ((t (:lforeground "lemon chiffon" :bold t)))) + '(gnus-cite-face-1 ((t (:foreground "LightSalmon")))) + '(gnus-cite-face-2 ((t (:foreground "Khaki")))) + '(gnus-cite-face-3 ((t (:foreground "Coral")))) + '(gnus-cite-face-4 ((t (:foreground "yellow green")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "bisque")))) + '(gnus-cite-face-7 ((t (:foreground "peru")))) + '(gnus-cite-face-8 ((t (:foreground "light coral")))) + '(gnus-cite-face-9 ((t (:foreground "plum")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "White")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "White")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "light cyan")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "light cyan")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "LightBlue")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "Aquamarine")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "Aquamarine")))) + '(gnus-group-news-1-empty-face ((t (:foreground "White")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "White")))) + '(gnus-group-news-2-empty-face ((t (:foreground "light cyan")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "light cyan")))) + '(gnus-group-news-3-empty-face ((t (:foreground "LightBlue")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-group-news-4-empty-face ((t (:foreground "Aquamarine")))) + '(gnus-group-news-4-face ((t (:bold t :foreground "Aquamarine")))) + '(gnus-group-news-5-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-5-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-group-news-6-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-6-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-group-news-low-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-header-content-face ((t (:foreground "LightSkyBlue3")))) + '(gnus-header-from-face ((t (:bold t :foreground "light cyan")))) + '(gnus-header-name-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-header-newsgroups-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-header-subject-face ((t (:bold t :foreground "light cyan")))) + '(gnus-signature-face ((t (:foreground "Grey")))) + '(gnus-splash-face ((t (:foreground "ForestGreen")))) + '(gnus-summary-cancelled-face ((t (:background "Black" :foreground "Yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "Aquamarine")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "LightSalmon")))) + '(gnus-summary-high-unread-face ((t (:bold t :foreground "beige")))) + '(gnus-summary-low-ancient-face ((t (:foreground "DimGray")))) + '(gnus-summary-low-read-face ((t (:foreground "slate gray")))) + '(gnus-summary-low-ticked-face ((t (:foreground "Pink")))) + '(gnus-summary-low-unread-face ((t (:foreground "LightGray")))) + '(gnus-summary-normal-ancient-face ((t (:foreground "MediumAquamarine")))) + '(gnus-summary-normal-read-face ((t (:foreground "Aquamarine")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "LightSalmon")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:background "DarkSlateBlue")))) + '(message-cited-text-face ((t (:foreground "LightSalmon")))) + '(message-header-cc-face ((t (:foreground "light cyan")))) + '(message-header-name-face ((t (:foreground "LightBlue")))) + '(message-header-newsgroups-face ((t (:bold t :foreground "MediumAquamarine")))) + '(message-header-other-face ((t (:foreground "MediumAquamarine")))) + '(message-header-subject-face ((t (:bold t :foreground "light cyan")))) + '(message-header-to-face ((t (:bold t :foreground "light cyan")))) + '(message-header-xheader-face ((t (:foreground "MediumAquamarine")))) + '(message-separator-face ((t (:foreground "chocolate")))) + + '(apropos-keybinding-face ((t (:underline t)))) + '(apropos-label-face ((t (:italic t)))) + '(apropos-match-face ((t (:background "Aquamarine" :foreground "SlateBlue")))) + '(apropos-property-face ((t (:italic t :bold t :foreground "beige")))) + '(apropos-symbol-face ((t (:underline t :foreground "DodgerBlue1")))) + '(goto-address-mail-face ((t (:bold t :foreground "light cyan")))) + '(goto-address-mail-mouse-face ((t (:background "Aquamarine" :foreground "SlateBlue")))) + '(goto-address-url-face ((t (:underline t :foreground "DodgerBlue1")))) + '(goto-address-url-mouse-face ((t (:background "PaleGreen" :foreground "DarkGreen")))) + '(list-matching-lines-face ((t (:bold t)))) + '(view-highlight-face ((t (:background "PaleGreen" :foreground "DarkGreen")))) + + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t :foreground "beige")))) + '(calendar-today-face ((t (:underline t)))) + '(cperl-array-face ((t (:foreground "Yellow")))) + '(cperl-hash-face ((t (:foreground "White")))) + '(cperl-nonoverridable-face ((t (:foreground "SkyBlue")))) + '(custom-button-face ((t (:underline t :foreground "MediumSlateBlue")))) + '(custom-documentation-face ((t (:foreground "Grey")))) + '(custom-group-tag-face ((t (:foreground "MediumAquamarine")))) + '(custom-state-face ((t (:foreground "LightSalmon")))) + '(custom-variable-tag-face ((t (:foreground "Aquamarine")))) + '(diary-face ((t (:foreground "IndianRed")))) + '(erc-action-face ((t (:bold t)))) + '(erc-bold-face ((t (:bold t)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "LightSalmon")))) + '(erc-error-face ((t (:bold t :foreground "IndianRed")))) + '(erc-input-face ((t (:foreground "Beige")))) + '(erc-inverse-face ((t (:background "wheat" :foreground "darkslategrey")))) + '(erc-notice-face ((t (:foreground "MediumAquamarine")))) + '(erc-pal-face ((t (:foreground "pale green")))) + '(erc-prompt-face ((t (:foreground "MediumAquamarine")))) + '(erc-underline-face ((t (:underline t)))) + '(eshell-ls-archive-face ((t (:bold t :foreground "IndianRed")))) + '(eshell-ls-backup-face ((t (:foreground "Grey")))) + '(eshell-ls-clutter-face ((t (:foreground "DimGray")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "MediumSlateBlue")))) + '(eshell-ls-executable-face ((t (:foreground "Coral")))) + '(eshell-ls-missing-face ((t (:foreground "black")))) + '(eshell-ls-picture-face ((t (:foreground "Violet")))) + '(eshell-ls-product-face ((t (:foreground "LightSalmon")))) + '(eshell-ls-readonly-face ((t (:foreground "Aquamarine")))) + '(eshell-ls-special-face ((t (:foreground "Gold")))) + '(eshell-ls-symlink-face ((t (:foreground "White")))) + '(eshell-ls-unreadable-face ((t (:foreground "DimGray")))) + '(eshell-prompt-face ((t (:foreground "MediumAquamarine")))) + '(font-lock-builtin-face ((t (:bold t :foreground "PaleGreen")))) + '(font-lock-comment-face ((t (:foreground "tomato3")))) + '(font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(font-lock-doc-string-face ((t (:foreground "LightSalmon3")))) + '(font-lock-function-name-face ((t (:foreground "SteelBlue1")))) + '(font-lock-keyword-face ((t (:foreground "cyan1")))) + '(font-lock-reference-face ((t (:foreground "LightSalmon2")))) + '(font-lock-string-face ((t (:foreground "LightSalmon3")))) + '(font-lock-type-face ((t (:foreground "PaleGreen3")))) + '(font-lock-variable-name-face ((t (:foreground "khaki1")))) + '(font-lock-warning-face ((t (:bold t :foreground "IndianRed")))) + '(font-lock-preprocessor-face ((t (:foreground "SkyBlue3")))) + '(widget-field-face ((t (:background "DarkCyan")))) + '(custom-group-tag-face ((t(:foreground "brown" :underline t)))) + '(custom-state-face ((t (:foreground "khaki")))) + '(highlight ((t (:background "PaleGreen" :foreground "DarkGreen")))) + '(highline-face ((t (:background "SeaGreen")))) + '(holiday-face ((t (:background "DimGray")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:underline t :bold t :foreground "DodgerBlue1")))) + '(info-xref ((t (:underline t :foreground "DodgerBlue1")))) + '(isearch ((t (:foreground "red" :background "CornflowerBlue")))) + '(italic ((t (:italic t)))) + '(mode-line ((t (:background "LightSlateGray" :foreground "AntiqueWhite")))) + '(mode-line-buffer-id ((t (:background "LightSlateGray" :foreground "DarkBlue")))) + '(mode-line-mousable ((t (:background "LightSlateGray" :foreground "firebrick")))) + '(mode-line-mousable-minor-mode ((t (:background "LightSlateGray" :foreground "wheat")))) + '(region ((t (:background "dark cyan" :foreground "cyan")))) + '(secondary-selection ((t (:background "Aquamarine" :foreground "SlateBlue")))) + '(show-paren-match-face ((t (:background "Aquamarine" :foreground "SlateBlue")))) + '(show-paren-mismatch-face ((t (:background "Red" :foreground "White")))) + '(underline ((t (:underline t)))) + '(widget-field-face ((t (:foreground "LightBlue")))) + '(widget-inactive-face ((t (:foreground "DimGray")))) + '(widget-single-line-field-face ((t (:foreground "LightBlue")))) + '(woman-bold-face ((t (:bold t)))) + '(woman-italic-face ((t (:foreground "beige")))) + '(woman-unknown-face ((t (:foreground "LightSalmon"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'classic) + +;;; classic-theme.el ends here diff --git a/replace-colorthemes/cobalt-theme.el b/replace-colorthemes/cobalt-theme.el new file mode 100644 index 0000000..bd243c8 --- /dev/null +++ b/replace-colorthemes/cobalt-theme.el @@ -0,0 +1,82 @@ +;;; cobalt-theme.el --- cobalt theme + +;; Copyright (C) 2012 by Nick Ewing +;; Copyright (C) 2014 by Syohei YOSHIDA + +;; Author: Nick Ewing +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of cobalt theme from `color-themes' + +;;; Code: + +(deftheme cobalt + "cobalt theme") + +(custom-theme-set-faces + 'cobalt + + '(default ((t (:background "#09223F" :foreground "#F8F8F8")))) + '(cursor ((t (:background "#A7A7A7")))) + '(border ((t (:foreground "black")))) + + '(buffers-tab ((t (:background "#09223F" :foreground "white")))) + '(font-lock-builtin-face ((t (:foreground "#40FFB9")))) + '(font-lock-comment-face ((t (:foreground "#008AFF")))) + '(font-lock-constant-face ((t (:foreground "#FF518C")))) + '(font-lock-doc-face ((t (:foreground "#008AFF")))) + '(font-lock-function-name-face ((t (:foreground "#FFDD00")))) + '(font-lock-keyword-face ((t (:foreground "#FA9E18")))) + '(font-lock-preprocessor-face ((t (:foreground "#8090A2")))) + '(font-lock-reference-face ((t (:foreground "#CCCCCC")))) + '(font-lock-regexp-grouping-backslash ((t (:foreground "#E9C062")))) + '(font-lock-regexp-grouping-construct ((t (:foreground "red")))) + '(font-lock-string-face ((t (:foreground "#42D915")))) + '(font-lock-type-face ((t (:foreground "#FFEF79")))) + '(font-lock-variable-name-face ((t (:foreground "#CCCCCC")))) + '(font-lock-warning-face ((t (:foreground "Pink")))) + '(hl-line ((t (:background "#00162A")))) + '(linum ((t (:background "#111111" :foreground "#888888" + :underline nil)))) + '(gui-element ((t (:background "#303030" :foreground "black")))) + '(region ((t (:background "#444444")))) + '(highlight ((t (:background "#26425D")))) + '(show-paren-match ((t (:background "#26425D")))) + '(show-paren-mismatch ((t (:background "#FF0000")))) + '(ecb-default-highlight-face ((t (:background "#26425D")))) + '(minibuffer-prompt ((t (:foreground "#008AFF")))) + '(mode-line ((t (:background "#111111" :foreground "#888888")))) + '(modeline-inactive ((t (:background "#222222" :foreground "#888888")))) + '(italic ((t (nil)))) + '(left-margin ((t (nil)))) + '(toolbar ((t (nil)))) + '(ido-subdir ((t (:foreground "#008AFF")))) + '(ido-only-match ((t (:foreground "#42D915")))) + '(mumamo-background-chunk-major ((t (:background nil)))) + '(mumamo-background-chunk-submode1 ((t (:background nil)))) + '(underline ((nil (:underline nil))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'cobalt) + +;;; cobalt-theme.el ends here diff --git a/replace-colorthemes/color-theme-modern-pkg.el b/replace-colorthemes/color-theme-modern-pkg.el new file mode 100644 index 0000000..cdf317a --- /dev/null +++ b/replace-colorthemes/color-theme-modern-pkg.el @@ -0,0 +1,4 @@ +(define-package "color-theme-modern" "0.0.2" + "Reimplement colortheme with Emacs 24 theme framework." + '((emacs "24")) + :url "https://github.com/emacs-jp/replace-colorthemes/") diff --git a/replace-colorthemes/color-theme-modern.el b/replace-colorthemes/color-theme-modern.el new file mode 100644 index 0000000..65b2f06 --- /dev/null +++ b/replace-colorthemes/color-theme-modern.el @@ -0,0 +1,30 @@ +;;; color-theme-modern.el --- ports of color-theme themes to deftheme + +;; Copyright (C) 2013-2016 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; This package ports many `color-theme' themes to `deftheme' themes. + +;;; Code: + +(provide 'color-theme-modern) + +;;; color-theme-modern.el ends here diff --git a/replace-colorthemes/comidia-theme.el b/replace-colorthemes/comidia-theme.el new file mode 100644 index 0000000..6ca6154 --- /dev/null +++ b/replace-colorthemes/comidia-theme.el @@ -0,0 +1,193 @@ +;;; comidia-theme.el --- comidia theme + +;; Copyright (C) 2001 by Marcelo Dias +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of comidia theme from `color-themes' + +;;; Code: + +(deftheme comidia + "comidia theme") + +(custom-theme-set-faces + 'comidia + + '(default ((t (:background "black" :foreground "SteelBlue")))) + '(mouse ((t (:background "SteelBlue")))) + '(cursor ((t (:background "SteelBlue")))) + '(border ((t (:background "black")))) + + '(bg:erc-color-face0 ((t (:background "White")))) + '(bg:erc-color-face1 ((t (:background "black")))) + '(bg:erc-color-face10 ((t (:background "lightblue1")))) + '(bg:erc-color-face11 ((t (:background "cyan")))) + '(bg:erc-color-face12 ((t (:background "blue")))) + '(bg:erc-color-face13 ((t (:background "deeppink")))) + '(bg:erc-color-face14 ((t (:background "gray50")))) + '(bg:erc-color-face15 ((t (:background "gray90")))) + '(bg:erc-color-face2 ((t (:background "blue4")))) + '(bg:erc-color-face3 ((t (:background "green4")))) + '(bg:erc-color-face4 ((t (:background "red")))) + '(bg:erc-color-face5 ((t (:background "brown")))) + '(bg:erc-color-face6 ((t (:background "purple")))) + '(bg:erc-color-face7 ((t (:background "orange")))) + '(bg:erc-color-face8 ((t (:background "yellow")))) + '(bg:erc-color-face9 ((t (:background "green")))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(erc-action-face ((t (:bold t :weight bold)))) + '(erc-bold-face ((t (:bold t :weight bold)))) + '(erc-dangerous-host-face ((t (:foreground "red")))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "IndianRed")))) + '(erc-error-face ((t (:background "Red" :foreground "White")))) + '(erc-fool-face ((t (:foreground "dim gray")))) + '(erc-input-face ((t (:foreground "brown")))) + '(erc-inverse-face ((t (:background "Black" :foreground "White")))) + '(erc-keyword-face ((t (:bold t :foreground "pale green" :weight bold)))) + '(erc-notice-face ((t (:bold t :foreground "SlateBlue" :weight bold)))) + '(erc-pal-face ((t (:bold t :foreground "Magenta" :weight bold)))) + '(erc-prompt-face ((t (:bold t :background "lightBlue2" :foreground "Black" :weight bold)))) + '(erc-timestamp-face ((t (:bold t :foreground "green" :weight bold)))) + '(erc-underline-face ((t (:underline t)))) + '(fg:erc-color-face0 ((t (:foreground "White")))) + '(fg:erc-color-face1 ((t (:foreground "black")))) + '(fg:erc-color-face10 ((t (:foreground "lightblue1")))) + '(fg:erc-color-face11 ((t (:foreground "cyan")))) + '(fg:erc-color-face12 ((t (:foreground "blue")))) + '(fg:erc-color-face13 ((t (:foreground "deeppink")))) + '(fg:erc-color-face14 ((t (:foreground "gray50")))) + '(fg:erc-color-face15 ((t (:foreground "gray90")))) + '(fg:erc-color-face2 ((t (:foreground "blue4")))) + '(fg:erc-color-face3 ((t (:foreground "green4")))) + '(fg:erc-color-face4 ((t (:foreground "red")))) + '(fg:erc-color-face5 ((t (:foreground "brown")))) + '(fg:erc-color-face6 ((t (:foreground "purple")))) + '(fg:erc-color-face7 ((t (:foreground "orange")))) + '(fg:erc-color-face8 ((t (:foreground "yellow")))) + '(fg:erc-color-face9 ((t (:foreground "green")))) + + '(font-lock-builtin-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-comment-face ((t (:foreground "chocolate1")))) + '(font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(font-lock-doc-face ((t (:foreground "LightSalmon")))) + '(font-lock-doc-string-face ((t (:foreground "LightSalmon")))) + '(font-lock-function-name-face ((t (:foreground "LightSkyBlue")))) + '(font-lock-keyword-face ((t (:foreground "Cyan")))) + '(font-lock-preprocessor-face ((t (:foreground "Aquamarine")))) + '(font-lock-reference-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-string-face ((t (:foreground "LightSalmon")))) + '(font-lock-type-face ((t (:foreground "PaleGreen")))) + '(font-lock-variable-name-face ((t (:foreground "LightGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink" :weight bold)))) + '(fringe ((t (:background "grey10")))) + '(gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1" :weight bold)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2" :weight bold)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3" :weight bold)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4" :weight bold)))) + '(gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise" :weight bold)))) + '(gnus-group-news-2-empty-face ((t (:foreground "turquoise")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "turquoise" :weight bold)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t :weight bold)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t :weight bold)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t :weight bold)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t :weight bold)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise" :weight bold)))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue" :weight bold)))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen" :weight bold)))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "pink" :weight bold)))) + '(gnus-summary-high-unread-face ((t (:bold t :weight bold)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue" :slant italic)))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen" :slant italic)))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "pink" :slant italic)))) + '(gnus-summary-low-unread-face ((t (:italic t :slant italic)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "PaleGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "pink")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(header-line ((t (:width condensed :box (:line-width 1 :style none) :background "grey20" :foreground "grey90" :box nil)))) + '(highlight ((t (:background "darkolivegreen")))) + '(isearch ((t (:background "palevioletred2" :foreground "brown4")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise4")))) + '(italic ((t (:italic t :slant italic)))) + '(menu ((t (nil)))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:bold t :foreground "green4" :weight bold)))) + '(message-header-name-face ((t (:foreground "DarkGreen")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow" :slant italic :weight bold)))) + '(message-header-other-face ((t (:foreground "#b00000")))) + '(message-header-subject-face ((t (:foreground "green3")))) + '(message-header-to-face ((t (:bold t :foreground "green2" :weight bold)))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "blue3")))) + '(mode-line ((t (:background "Gray10" :foreground "SteelBlue" :box (:line-width 1 :style none) :width condensed)))) + '(mode-line-buffer-id ((t (:background "Gray10" :foreground "SteelBlue" :box (:line-width 1 :style none) :width condensed)))) + '(mode-line-mousable-minor-mode ((t (:background "Gray10" :foreground "SteelBlue" :box (:line-width 1 :style none) :width condensed)))) + '(mode-line-mousable ((t (:background "Gray10" :foreground "SteelBlue" :box (:line-width 1 :style none) :width condensed)))) + '(primary-selection ((t (:background "blue3")))) + '(region ((t (:background "blue3")))) + '(scroll-bar ((t (:background "grey75")))) + '(secondary-selection ((t (:background "SkyBlue4")))) + '(speedbar-button-face ((t (:foreground "green3")))) + '(speedbar-directory-face ((t (:foreground "light blue")))) + '(speedbar-file-face ((t (:foreground "cyan")))) + '(speedbar-highlight-face ((t (:background "sea green")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-tag-face ((t (:foreground "yellow")))) + '(tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button))))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:background "dim gray")))) + '(widget-inactive-face ((t (:foreground "light gray")))) + '(widget-single-line-field-face ((t (:background "dim gray")))) + '(zmacs-region ((t (:background "blue3"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'comidia) + +;;; comidia-theme.el ends here diff --git a/replace-colorthemes/dark-blue-theme.el b/replace-colorthemes/dark-blue-theme.el new file mode 100644 index 0000000..de86f66 --- /dev/null +++ b/replace-colorthemes/dark-blue-theme.el @@ -0,0 +1,439 @@ +;;; subtle-blue-theme.el --- dark-blue theme + +;; Copyright (C) 2001 by Chris McMahan +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of dark-blue theme from `color-themes' + +;;; Code: + +(deftheme dark-blue + "dark-blue theme") + +(custom-theme-set-faces + 'dark-blue + + '(default ((t (:background "#537182" :foreground "AntiqueWhite2")))) + '(mouse ((t (:background "Grey")))) + '(cursor ((t (:background "LightGray")))) + '(border ((t (:background "black")))) + + '(bbdb-company ((t (:italic t)))) + '(bbdb-field-name ((t (:bold t :foreground "MediumAquamarine")))) + '(bbdb-field-value ((t (nil)))) + '(bbdb-name ((t (:underline t)))) + '(blank-space-face ((t (:background "LightGray")))) + '(blank-tab-face ((t (:background "Wheat" :foreground "DarkSlateGray")))) + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t :foreground "MediumAquamarine")))) + '(bold-italic ((t (:italic t :bold t :foreground "SkyBlue")))) + '(border-glyph ((t (nil)))) + '(calendar-today-face ((t (:underline t)))) + '(comint-highlight-input ((t (:bold t)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(comint-input-face ((t (:foreground "deepskyblue")))) + '(cperl-array-face ((t (:bold t :foreground "Yellow")))) + '(cperl-hash-face ((t (:italic t :bold t :foreground "White")))) + '(cperl-nonoverridable-face ((t (:foreground "SkyBlue")))) + '(custom-button-face ((t (:underline t :bold t :foreground "MediumAquaMarine")))) + '(custom-button-pressed-face ((t (:background "lightgrey" :foreground "black")))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "dim gray")))) + '(custom-comment-tag-face ((t (:foreground "gray80")))) + '(custom-documentation-face ((t (:foreground "Grey")))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:bold t :foreground "MediumAquamarine")))) + '(custom-group-tag-face-1 ((t (:foreground "MediumAquaMarine")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "yellow")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:bold t :foreground "Aquamarine")))) + '(cvs-filename-face ((t (:foreground "blue4")))) + '(cvs-handled-face ((t (:foreground "pink")))) + '(cvs-header-face ((t (:bold t :foreground "blue4")))) + '(cvs-marked-face ((t (:bold t :foreground "green3")))) + '(cvs-msg-face ((t (:italic t)))) + '(cvs-need-action-face ((t (:foreground "orange")))) + '(cvs-unknown-face ((t (:foreground "red")))) + '(diary-face ((t (:bold t :foreground "cyan")))) + '(dired-face-boring ((t (:foreground "Gray65")))) + '(dired-face-directory ((t (:bold t :foreground "sky blue")))) + '(dired-face-executable ((t (:foreground "green yellow")))) + '(dired-face-flagged ((t (:foreground "tomato")))) + '(dired-face-marked ((t (:foreground "light salmon")))) + '(dired-face-permissions ((t (:foreground "aquamarine")))) + '(dired-face-setuid ((t (:foreground "Red")))) + '(dired-face-socket ((t (:foreground "magenta")))) + '(dired-face-symlink ((t (:foreground "gray95")))) + '(display-time-mail-balloon-enhance-face ((t (:background "orange")))) + '(display-time-mail-balloon-gnus-group-face ((t (:foreground "blue")))) + '(display-time-time-balloon-face ((t (:foreground "red")))) + '(ecb-sources-face ((t (:foreground "LightBlue1")))) + '(ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick")))) + '(ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black")))) + '(ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid")))) + '(ediff-current-diff-face-C ((t (:background "indianred" :foreground "white")))) + '(ediff-even-diff-face-A ((t (:background "light gray" :foreground "Black")))) + '(ediff-even-diff-face-Ancestor ((t (:background "Gray" :foreground "White")))) + '(ediff-even-diff-face-B ((t (:background "Gray" :foreground "White")))) + '(ediff-even-diff-face-C ((t (:background "light gray" :foreground "Black")))) + '(ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy")))) + '(ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black")))) + '(ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black")))) + '(ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black")))) + '(ediff-odd-diff-face-A ((t (:background "Gray" :foreground "White")))) + '(ediff-odd-diff-face-Ancestor ((t (:background "light gray" :foreground "Black")))) + '(ediff-odd-diff-face-B ((t (:background "light gray" :foreground "Black")))) + '(ediff-odd-diff-face-C ((t (:background "Gray" :foreground "White")))) + '(erc-action-face ((t (:bold t)))) + '(erc-bold-face ((t (:bold t)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "LightSalmon")))) + '(erc-error-face ((t (:bold t :foreground "yellow")))) + '(erc-input-face ((t (:foreground "Beige")))) + '(erc-inverse-face ((t (:background "wheat" :foreground "darkslategrey")))) + '(erc-notice-face ((t (:foreground "MediumAquamarine")))) + '(erc-pal-face ((t (:foreground "PaleGreen")))) + '(erc-prompt-face ((t (:foreground "MediumAquamarine")))) + '(erc-underline-face ((t (:underline t)))) + '(eshell-ls-archive-face ((t (:bold t :foreground "wheat")))) + '(eshell-ls-backup-face ((t (:foreground "Grey")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "wheat")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "Yellow")))) + '(eshell-ls-executable-face ((t (:bold t :foreground "wheat")))) + '(eshell-ls-missing-face ((t (:bold t :foreground "wheat")))) + '(eshell-ls-picture-face ((t (:foreground "wheat")))) + '(eshell-ls-product-face ((t (:foreground "wheat")))) + '(eshell-ls-readonly-face ((t (:foreground "wheat")))) + '(eshell-ls-special-face ((t (:bold t :foreground "wheat")))) + '(eshell-ls-symlink-face ((t (:bold t :foreground "White")))) + '(eshell-ls-text-face ((t (:foreground "wheat")))) + '(eshell-ls-todo-face ((t (:foreground "wheat")))) + '(eshell-ls-unreadable-face ((t (:foreground "wheat3")))) + '(eshell-prompt-face ((t (:bold t :foreground "PaleGreen")))) + '(eshell-test-failed-face ((t (:bold t :foreground "OrangeRed")))) + '(eshell-test-ok-face ((t (:bold t :foreground "Green")))) + '(excerpt ((t (:italic t)))) + '(ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue")))) + '(fixed ((t (:bold t)))) + '(flyspell-duplicate-face ((t (:underline t :bold t :foreground "Gold3")))) + '(flyspell-incorrect-face ((t (:underline t :bold t :foreground "OrangeRed")))) + '(font-latex-italic-face ((t (nil)))) + '(font-latex-math-face ((t (nil)))) + '(font-latex-sedate-face ((t (:foreground "Gray85")))) + '(font-latex-string-face ((t (:foreground "orange")))) + '(font-latex-warning-face ((t (:foreground "gold")))) + '(font-lock-builtin-face ((t (:foreground "PaleGreen")))) + '(font-lock-comment-face ((t (:italic t :foreground "Gray80")))) + '(font-lock-constant-face ((t (:foreground "LightBlue")))) + '(font-lock-doc-face ((t (:bold t)))) + '(font-lock-doc-string-face ((t (:bold t :foreground "DarkSeaGreen")))) + '(font-lock-exit-face ((t (:foreground "green")))) + '(font-lock-function-name-face ((t (:italic t :bold t :foreground "Yellow")))) + '(font-lock-keyword-face ((t (:bold t :foreground "LightBlue")))) + '(font-lock-preprocessor-face ((t (:foreground "blue3")))) + '(font-lock-reference-face ((t (:foreground "PaleGreen")))) + '(font-lock-string-face ((t (:italic t :foreground "DarkSeaGreen")))) + '(font-lock-type-face ((t (:bold t :foreground "YellowGreen")))) + '(font-lock-variable-name-face ((t (:italic t :bold t :foreground "LightBlue")))) + '(font-lock-warning-face ((t (:bold t :foreground "LightSalmon")))) + '(fringe ((t (:background "darkslategrey")))) + '(gnus-cite-attribution-face ((t (:italic t :bold t)))) + '(gnus-cite-face-1 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-11 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-2 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-3 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-4 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-5 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-6 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-7 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-8 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-9 ((t (:foreground "LightBlue")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t)))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t)))) + '(gnus-filterhist-face-1 ((t (nil)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "gray80")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "light cyan")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "gray80")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "turquoise")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "gray80")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "gray80")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-group-news-1-empty-face ((t (:foreground "gray80")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "green yellow")))) + '(gnus-group-news-2-empty-face ((t (:foreground "gray80")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "Aquamarine")))) + '(gnus-group-news-3-empty-face ((t (:foreground "gray80")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-group-news-4-empty-face ((t (:foreground "gray80")))) + '(gnus-group-news-4-face ((t (:bold t :foreground "Wheat")))) + '(gnus-group-news-5-empty-face ((t (:foreground "gray80")))) + '(gnus-group-news-5-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-group-news-6-empty-face ((t (:foreground "gray80")))) + '(gnus-group-news-6-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-group-news-low-empty-face ((t (:foreground "gray80")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "yellow green")))) + '(gnus-header-content-face ((t (:italic t :foreground "LightSkyBlue3")))) + '(gnus-header-from-face ((t (:bold t :foreground "light cyan")))) + '(gnus-header-name-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3")))) + '(gnus-header-subject-face ((t (:bold t :foreground "light cyan")))) + '(gnus-picons-face ((t (:background "white" :foreground "black")))) + '(gnus-picons-xbm-face ((t (:background "white" :foreground "black")))) + '(gnus-signature-face ((t (:italic t :foreground "LightBlue")))) + '(gnus-splash ((t (:foreground "Brown")))) + '(gnus-splash-face ((t (:foreground "LightBlue")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "gray80")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "gray80")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "burlywood")))) + '(gnus-summary-high-unread-face ((t (:italic t :bold t :foreground "wheat")))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "LightBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "light sea green")))) + '(gnus-summary-low-ticked-face ((t (:italic t :bold t :foreground "LightBlue")))) + '(gnus-summary-low-unread-face ((t (:italic t :foreground "light sea green")))) + '(gnus-summary-normal-ancient-face ((t (:foreground "gray80")))) + '(gnus-summary-normal-read-face ((t (:foreground "gray80")))) + '(gnus-summary-normal-ticked-face ((t (:bold t :foreground "sandy brown")))) + '(gnus-summary-normal-unread-face ((t (:bold t :foreground "wheat")))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(gnus-x-face ((t (:background "white" :foreground "black")))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "DarkSalmon" :foreground "white")))) + '(gui-element ((t (:background "Gray")))) + '(header-line ((t (:background "grey20" :foreground "grey90")))) + '(highlight ((t (:background "PaleGreen" :foreground "DarkGreen")))) + '(highlight-changes-delete-face ((t (:underline t :foreground "red")))) + '(highlight-changes-face ((t (:foreground "red")))) + '(highline-face ((t (:background "SeaGreen")))) + '(holiday-face ((t (:background "DimGray")))) + '(html-helper-bold-face ((t (:foreground "DarkRed")))) + '(html-helper-italic-face ((t (:foreground "DarkBlue")))) + '(html-helper-underline-face ((t (:underline t :foreground "Black")))) + '(html-tag-face ((t (:foreground "Blue")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:underline t :italic t :bold t :foreground "light blue")))) + '(info-xref ((t (:bold t :foreground "light blue")))) + '(isearch ((t (:background "Aquamarine" :foreground "SteelBlue")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise4")))) + '(isearch-secondary ((t (:foreground "red3")))) + '(italic ((t (:italic t)))) + '(jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan")))) + '(jde-bug-breakpoint-marker ((t (:background "yellow" :foreground "red")))) + '(jde-java-font-lock-api-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-bold-face ((t (:bold t)))) + '(jde-java-font-lock-code-face ((t (nil)))) + '(jde-java-font-lock-constant-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-doc-tag-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-italic-face ((t (:italic t)))) + '(jde-java-font-lock-link-face ((t (:underline t :foreground "LightBlue")))) + '(jde-java-font-lock-modifier-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-number-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-package-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-pre-face ((t (nil)))) + '(jde-java-font-lock-underline-face ((t (:underline t)))) + '(lazy-highlight-face ((t (:bold t :foreground "dark magenta")))) + '(left-margin ((t (nil)))) + '(linemenu-face ((t (:background "gray30")))) + '(list-mode-item-selected ((t (nil)))) + '(makefile-space-face ((t (:background "hotpink")))) + '(menu ((t (:background "wheat" :foreground "gray30")))) + '(message-cited-text-face ((t (:foreground "White")))) + '(message-header-cc-face ((t (:bold t :foreground "light cyan")))) + '(message-header-name-face ((t (:foreground "LightBlue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3")))) + '(message-header-other-face ((t (:foreground "LightSkyBlue3")))) + '(message-header-subject-face ((t (:bold t :foreground "light cyan")))) + '(message-header-to-face ((t (:bold t :foreground "light cyan")))) + '(message-header-xheader-face ((t (:foreground "LightBlue")))) + '(message-mml-face ((t (:bold t :foreground "LightBlue")))) + '(message-separator-face ((t (:foreground "LightBlue")))) + '(mmm-default-submode-face ((t (:background "#c0c0c5")))) + '(mode-line ((t (:background "#c1ccd9" :foreground "#4f657d")))) + '(mode-line-buffer-id ((t (:background "#c1ccd9" :foreground "#4f657d")))) + '(mode-line-mousable ((t (:background "#c1ccd9" :foreground "#4f657d")))) + '(mode-line-mousable-minor-mode ((t (:background "#c1ccd9" :foreground "#4f657d")))) + + '(my-summary-highlight-face ((t (:foreground "White")))) + '(my-url-face ((t (:foreground "LightBlue")))) + '(nil ((t (nil)))) + '(paren-blink-off ((t (:foreground "gray")))) + '(paren-face-match ((t (:background "turquoise")))) + '(paren-face-mismatch ((t (:background "purple" :foreground "white")))) + '(paren-face-no-match ((t (:background "yellow" :foreground "black")))) + '(paren-match ((t (:background "darkseagreen2")))) + '(paren-mismatch ((t (:background "DeepPink" :foreground "black")))) + '(paren-mismatch-face ((t (:bold t)))) + '(paren-no-match-face ((t (:bold t)))) + '(pointer ((t (nil)))) + '(primary-selection ((t (:background "gray65")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "PaleTurquoise4" :foreground "gray80")))) + '(right-margin ((t (nil)))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "sea green" :foreground "yellow")))) + '(semantic-dirty-token-face ((t (:background "gray10")))) + '(semantic-intangible-face ((t (:foreground "gray25")))) + '(semantic-read-only-face ((t (:background "gray25")))) + '(senator-intangible-face ((t (:foreground "gray75")))) + '(senator-momentary-highlight-face ((t (:background "gray80")))) + '(senator-read-only-face ((t (:background "#664444")))) + '(sgml-comment-face ((t (:foreground "dark turquoise")))) + '(sgml-doctype-face ((t (:foreground "red")))) + '(sgml-end-tag-face ((t (:foreground "blue")))) + '(sgml-entity-face ((t (:foreground "magenta")))) + '(sgml-ignored-face ((t (:background "gray60" :foreground "gray40")))) + '(sgml-ms-end-face ((t (:foreground "green")))) + '(sgml-ms-start-face ((t (:foreground "yellow")))) + '(sgml-pi-face ((t (:foreground "lime green")))) + '(sgml-sgml-face ((t (:foreground "brown")))) + '(sgml-short-ref-face ((t (:foreground "deep sky blue")))) + '(sgml-start-tag-face ((t (:foreground "dark green")))) + '(shell-option-face ((t (:foreground "blue")))) + '(shell-output-2-face ((t (:foreground "darkseagreen")))) + '(shell-output-3-face ((t (:foreground "slategray")))) + '(shell-output-face ((t (:foreground "palegreen")))) + '(shell-prompt-face ((t (:foreground "red")))) + '(show-paren-match-face ((t (:background "Aquamarine" :foreground "steel blue")))) + '(show-paren-mismatch-face ((t (:bold t :background "IndianRed" :foreground "White")))) + '(speedbar-button-face ((t (:bold t :foreground "LightBlue")))) + '(speedbar-directory-face ((t (:bold t :foreground "yellow")))) + '(speedbar-file-face ((t (:bold t :foreground "wheat")))) + '(speedbar-highlight-face ((t (:background "sea green")))) + '(speedbar-selected-face ((t (:underline t)))) + '(speedbar-tag-face ((t (:foreground "LightBlue")))) + '(swbuff-current-buffer-face ((t (:bold t :foreground "red")))) + '(template-message-face ((t (:bold t)))) + '(term-black ((t (:foreground "black")))) + '(term-blackbg ((t (:background "black")))) + '(term-blue ((t (:foreground "blue")))) + '(term-bluebg ((t (:background "blue")))) + '(term-bold ((t (:bold t)))) + '(term-cyan ((t (:foreground "cyan")))) + '(term-cyanbg ((t (:background "cyan")))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-green ((t (:foreground "green")))) + '(term-greenbg ((t (:background "green")))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (:foreground "magenta")))) + '(term-magentabg ((t (:background "magenta")))) + '(term-red ((t (:foreground "red")))) + '(term-redbg ((t (:background "red")))) + '(term-underline ((t (:underline t)))) + '(term-white ((t (:foreground "white")))) + '(term-whitebg ((t (:background "white")))) + '(term-yellow ((t (:foreground "yellow")))) + '(term-yellowbg ((t (:background "yellow")))) + '(text-cursor ((t (:background "Red3" :foreground "white")))) + '(tool-bar ((t (:background "grey75" :foreground "black")))) + '(toolbar ((t (:background "Gray")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(variable-pitch ((t (nil)))) + '(vc-annotate-face-0046FF ((t (:background "black" :foreground "wheat")))) + '(vcursor ((t (:underline t :background "cyan" :foreground "blue")))) + '(vertical-divider ((t (:background "Gray")))) + '(vhdl-font-lock-attribute-face ((t (:foreground "Orchid")))) + '(vhdl-font-lock-directive-face ((t (:foreground "CadetBlue")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4")))) + '(vhdl-font-lock-function-face ((t (:foreground "Orchid4")))) + '(vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red")))) + '(vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange")))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-speedbar-architecture-face ((t (:foreground "Blue")))) + '(vhdl-speedbar-architecture-selected-face ((t (:underline t :foreground "Blue")))) + '(vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod")))) + '(vhdl-speedbar-configuration-selected-face ((t (:underline t :foreground "DarkGoldenrod")))) + '(vhdl-speedbar-entity-face ((t (:foreground "ForestGreen")))) + '(vhdl-speedbar-entity-selected-face ((t (:underline t :foreground "ForestGreen")))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "Brown")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:underline t :foreground "Brown")))) + '(vhdl-speedbar-package-face ((t (:foreground "Gray50")))) + '(vhdl-speedbar-package-selected-face ((t (:underline t :foreground "Gray50")))) + '(viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black")))) + '(viper-minibuffer-vi-face ((t (:background "gray" :foreground "DarkGreen")))) + '(viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-search-face ((t (:background "khaki" :foreground "Black")))) + '(vm-header-content-face ((t (:italic t :foreground "wheat")))) + '(vm-header-from-face ((t (:italic t :foreground "wheat")))) + '(vm-header-name-face ((t (:foreground "cyan")))) + '(vm-header-subject-face ((t (:foreground "cyan")))) + '(vm-header-to-face ((t (:italic t :foreground "cyan")))) + '(vm-message-cited-face ((t (:foreground "Gray80")))) + '(vm-summary-face-1 ((t (:foreground "MediumAquamarine")))) + '(vm-summary-face-2 ((t (:foreground "MediumAquamarine")))) + '(vm-summary-face-3 ((t (:foreground "MediumAquamarine")))) + '(vm-summary-face-4 ((t (:foreground "MediumAquamarine")))) + '(vm-summary-highlight-face ((t (:foreground "White")))) + '(vmpc-pre-sig-face ((t (:foreground "Aquamarine")))) + '(vmpc-sig-face ((t (:foreground "LightBlue")))) + '(vvb-face ((t (:background "pink" :foreground "black")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "LightBlue")))) + '(widget-field-face ((t (:foreground "LightBlue")))) + '(widget-inactive-face ((t (:foreground "Wheat3")))) + '(widget-single-line-field-face ((t (:foreground "LightBlue")))) + '(woman-bold-face ((t (:bold t)))) + '(woman-italic-face ((t (:foreground "beige")))) + '(woman-unknown-face ((t (:foreground "LightSalmon")))) + '(xref-keyword-face ((t (:foreground "blue")))) + '(xref-list-pilot-face ((t (:foreground "navy")))) + '(xref-list-symbol-face ((t (:foreground "navy")))) + '(xxml-emph-1-face ((t (:background "lightyellow")))) + '(xxml-emph-2-face ((t (:background "lightyellow")))) + '(xxml-header-1-face ((t (:background "seashell1" :foreground "MediumAquamarine")))) + '(xxml-header-2-face ((t (:background "seashell1" :foreground "SkyBlue")))) + '(xxml-header-3-face ((t (:background "seashell1")))) + '(xxml-header-4-face ((t (:background "seashell1")))) + '(xxml-interaction-face ((t (:background "lightcyan")))) + '(xxml-rug-face ((t (:background "cyan")))) + '(xxml-sparkle-face ((t (:background "yellow")))) + '(xxml-unbreakable-space-face ((t (:underline t :foreground "grey")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "SlateGray"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'dark-blue) + +;;; dark-blue-theme.el ends here diff --git a/replace-colorthemes/dark-blue2-theme.el b/replace-colorthemes/dark-blue2-theme.el new file mode 100644 index 0000000..90b8f1a --- /dev/null +++ b/replace-colorthemes/dark-blue2-theme.el @@ -0,0 +1,626 @@ +;;; dark-blue2-theme.el --- dark-blue2 theme + +;; Copyright (C) 2002 by Chris McMahan +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of dark-blue2 theme from `color-themes' + +;;; Code: + +(deftheme dark-blue2 + "dark-blue2 theme") + +(custom-theme-set-faces + 'dark-blue2 + + '(default ((t (:background "#233b5a" :foreground "#fff8dc")))) + '(mouse ((t (:background "Grey")))) + '(cursor ((t (:background "Yellow")))) + '(border ((t (:background "black")))) + + '(cperl-invalid-face ((t (:underline t)))) + '(gnus-article-button-face ((t (:bold t :foreground "cyan" :weight bold)))) + '(gnus-article-mouse-face ((t (:background "SkyBlue3")))) + '(help-highlight-face ((t (:underline t)))) + '(list-matching-lines-face ((t (:bold t :foreground "cyan" :weight bold)))) + '(view-highlight-face ((t (:background "SkyBlue3")))) + '(vm-highlight-url-face ((t (:bold t :foreground "cyan" :weight bold)))-italic) + '(vm-highlighted-header-face ((t (:bold t :foreground "cyan" :weight bold)))) + '(vm-mime-button-face ((t (:background "grey75" :foreground "gray30")))) + '(vm-summary-highlight-face ((t (:bold t :foreground "cyan" :weight bold)))) + '(widget-mouse-face ((t (:background "SkyBlue3")))) + + '(Info-title-1-face ((t (:bold t :weight bold :height 1.728 :family "helv")))) + '(Info-title-2-face ((t (:bold t :weight bold :height 1.44 :family "helv")))) + '(Info-title-3-face ((t (:bold t :weight bold :height 1.2 :family "helv")))) + '(Info-title-4-face ((t (:bold t :weight bold :family "helv")))) + '(antlr-font-lock-keyword-face ((t (:bold t :foreground "Gray85" :weight bold)))) + '(antlr-font-lock-literal-face ((t (:bold t :foreground "Gray85" :weight bold)))) + '(antlr-font-lock-ruledef-face ((t (:bold t :foreground "Gray85" :weight bold)))) + '(antlr-font-lock-ruleref-face ((t (:foreground "Gray85")))) + '(antlr-font-lock-tokendef-face ((t (:bold t :foreground "Gray85" :weight bold)))) + '(antlr-font-lock-tokenref-face ((t (:foreground "Gray85")))) + '(bbdb-company ((t (:italic t :slant italic)))) + '(bbdb-field-name ((t (:bold t :weight bold)))) + '(bbdb-field-value ((t (nil)))) + '(bbdb-name ((t (:underline t)))) + '(bg:erc-color-face0 ((t (:background "White")))) + '(bg:erc-color-face1 ((t (:background "black")))) + '(bg:erc-color-face10 ((t (:background "lightblue1")))) + '(bg:erc-color-face11 ((t (:background "cyan")))) + '(bg:erc-color-face12 ((t (:background "blue")))) + '(bg:erc-color-face13 ((t (:background "deeppink")))) + '(bg:erc-color-face14 ((t (:background "gray50")))) + '(bg:erc-color-face15 ((t (:background "gray90")))) + '(bg:erc-color-face2 ((t (:background "blue4")))) + '(bg:erc-color-face3 ((t (:background "green4")))) + '(bg:erc-color-face4 ((t (:background "red")))) + '(bg:erc-color-face5 ((t (:background "brown")))) + '(bg:erc-color-face6 ((t (:background "purple")))) + '(bg:erc-color-face7 ((t (:background "orange")))) + '(bg:erc-color-face8 ((t (:background "yellow")))) + '(bg:erc-color-face9 ((t (:background "green")))) + '(blank-space-face ((t (:background "LightGray")))) + '(blank-tab-face ((t (:background "Wheat")))) + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t :foreground "cyan" :weight bold)))) + '(bold-italic ((t (:italic t :bold t :foreground "cyan2" :slant italic :weight bold)))) + '(border-glyph ((t (nil)))) + '(buffers-tab ((t (:background "gray30" :foreground "LightSkyBlue")))) + '(calendar-today-face ((t (:underline t)))) + '(change-log-acknowledgement-face ((t (:foreground "firebrick")))) + '(change-log-conditionals-face ((t (:background "sienna" :foreground "khaki")))) + '(change-log-date-face ((t (:foreground "gold")))) + '(change-log-email-face ((t (:foreground "khaki" :underline t)))) + '(change-log-file-face ((t (:bold t :foreground "lemon chiffon" :weight bold)))) + '(change-log-function-face ((t (:background "sienna" :foreground "khaki")))) + '(change-log-list-face ((t (:foreground "wheat")))) + '(change-log-name-face ((t (:bold t :foreground "light goldenrod" :weight bold)))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(comint-input-face ((t (:foreground "deepskyblue")))) + '(cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue" :weight bold)))) + '(cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red" :slant italic :weight bold)))) + '(cperl-invalid-face ((t (:foreground "white")))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(custom-button-face ((t (:bold t :weight bold)))) + '(custom-button-pressed-face ((t (:background "lightgrey" :foreground "gray30")))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:foreground "white")))) + '(custom-comment-tag-face ((t (:foreground "white")))) + '(custom-documentation-face ((t (:foreground "light blue")))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:bold t :foreground "gray85" :underline t :weight bold)))) + '(custom-group-tag-face-1 ((t (:foreground "gray85" :underline t)))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "gray30" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "gray85")))) + '(custom-variable-button-face ((t (:bold t :underline t :weight bold)))) + '(custom-variable-tag-face ((t (:bold t :foreground "gray85" :underline t :weight bold)))) + '(cvs-filename-face ((t (:foreground "white")))) + '(cvs-handled-face ((t (:foreground "pink")))) + '(cvs-header-face ((t (:foreground "green")))) + '(cvs-marked-face ((t (:bold t :foreground "green3" :weight bold)))) + '(cvs-msg-face ((t (:foreground "gray85")))) + '(cvs-need-action-face ((t (:foreground "yellow")))) + '(cvs-unknown-face ((t (:foreground "grey")))) + '(cyan ((t (:foreground "cyan")))) + '(diary-face ((t (:bold t :foreground "gray85" :weight bold)))) + '(diff-added-face ((t (nil)))) + '(diff-changed-face ((t (nil)))) + '(diff-context-face ((t (:foreground "grey50")))) + '(diff-file-header-face ((t (:bold t :background "grey70" :weight bold)))) + '(diff-function-face ((t (:foreground "grey50")))) + '(diff-header-face ((t (:foreground "lemon chiffon")))) + '(diff-hunk-header-face ((t (:background "grey85")))) + '(diff-index-face ((t (:bold t :background "grey70" :weight bold)))) + '(diff-nonexistent-face ((t (:bold t :background "grey70" :weight bold)))) + '(diff-removed-face ((t (nil)))) + '(dired-face-boring ((t (:foreground "Gray65")))) + '(dired-face-directory ((t (:bold t :weight bold)))) + '(dired-face-executable ((t (:foreground "gray85")))) + '(dired-face-flagged ((t (:background "LightSlateGray")))) + '(dired-face-header ((t (:background "grey75" :foreground "gray30")))) + '(dired-face-marked ((t (:background "PaleVioletRed")))) + '(dired-face-permissions ((t (:background "grey75" :foreground "gray30")))) + '(dired-face-setuid ((t (:foreground "gray85")))) + '(dired-face-socket ((t (:foreground "gray85")))) + '(dired-face-symlink ((t (:foreground "cyan")))) + '(display-time-mail-balloon-enhance-face ((t (:background "orange")))) + '(display-time-mail-balloon-gnus-group-face ((t (:foreground "blue")))) + '(display-time-time-balloon-face ((t (:foreground "gray85")))) + '(ebrowse-default-face ((t (nil)))) + '(ebrowse-file-name-face ((t (:italic t :slant italic)))) + '(ebrowse-member-attribute-face ((t (:foreground "red")))) + '(ebrowse-member-class-face ((t (:foreground "Gray85")))) + '(ebrowse-progress-face ((t (:background "blue")))) + '(ebrowse-root-class-face ((t (:bold t :foreground "Gray85" :weight bold)))) + '(ebrowse-tree-mark-face ((t (:foreground "Gray85")))) + '(ecb-bucket-token-face ((t (:bold t :weight bold)))) + '(ecb-default-general-face ((t (:height 1.0)))) + '(ecb-default-highlight-face ((t (:background "magenta" :height 1.0)))) + '(ecb-directories-general-face ((t (:height 0.9)))) + '(ecb-directory-face ((t (:background "Cyan4")))) + '(ecb-history-face ((t (:background "Cyan4")))) + '(ecb-history-general-face ((t (:height 0.9)))) + '(ecb-method-face ((t (:background "Cyan4" :slant normal :weight normal)))) + '(ecb-methods-general-face ((t (:slant normal)))) + '(ecb-source-face ((t (:background "Cyan4")))) + '(ecb-source-in-directories-buffer-face ((t (:foreground "LightBlue1" :background "Cyan4")))) + '(ecb-sources-face ((t (:foreground "LightBlue1")))) + '(ecb-sources-general-face ((t (:height 0.9)))) + '(ecb-token-header-face ((t (:background "Steelblue4")))) + '(ecb-type-token-class-face ((t (:bold t :weight bold)))) + '(ecb-type-token-enum-face ((t (:bold t :weight bold)))) + '(ecb-type-token-group-face ((t (:bold t :foreground "dim gray" :weight bold)))) + '(ecb-type-token-interface-face ((t (:bold t :weight bold)))) + '(ecb-type-token-struct-face ((t (:bold t :weight bold)))) + '(ecb-type-token-typedef-face ((t (:bold t :weight bold)))) + '(ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick")))) + '(ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Gray30")))) + '(ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid")))) + '(ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy")))) + '(ediff-even-diff-face-A ((t (:background "light grey" :foreground "Gray30")))) + '(ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-B ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-C ((t (:background "light grey" :foreground "Gray30")))) + '(ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy")))) + '(ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Gray30")))) + '(ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Gray30")))) + '(ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Gray30")))) + '(ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White")))) + '(ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Gray30")))) + '(ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Gray30")))) + '(ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White")))) + '(erc-action-face ((t (:bold t :weight bold)))) + '(erc-bold-face ((t (:bold t :weight bold)))) + '(erc-dangerous-host-face ((t (:foreground "red")))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "pale green")))) + '(erc-error-face ((t (:bold t :foreground "gray85" :weight bold)))) + '(erc-fool-face ((t (:foreground "Gray85")))) + '(erc-highlight-face ((t (:bold t :foreground "pale green" :weight bold)))) + '(erc-input-face ((t (:foreground "light blue")))) + '(erc-inverse-face ((t (:background "Black" :foreground "White")))) + '(erc-keyword-face ((t (:bold t :foreground "pale green" :weight bold)))) + '(erc-notice-face ((t (:foreground "light salmon")))) + '(erc-pal-face ((t (:foreground "pale green")))) + '(erc-prompt-face ((t (:bold t :foreground "light blue" :weight bold)))) + '(erc-timestamp-face ((t (:bold t :foreground "green" :weight bold)))) + '(erc-underline-face ((t (:underline t)))) + '(eshell-ls-archive-face ((t (:bold t :weight bold)))) + '(eshell-ls-backup-face ((t (:foreground "gray85")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "gray85" :weight bold)))) + '(eshell-ls-directory-face ((t (:bold t :foreground "Cyan" :weight bold)))) + '(eshell-ls-executable-face ((t (:bold t :weight bold)))) + '(eshell-ls-missing-face ((t (:bold t :weight bold)))) + '(eshell-ls-picture-face ((t (:foreground "gray85")))) + '(eshell-ls-product-face ((t (:foreground "gray85")))) + '(eshell-ls-readonly-face ((t (:foreground "gray70")))) + '(eshell-ls-special-face ((t (:bold t :weight bold)))) + '(eshell-ls-symlink-face ((t (:bold t :weight bold)))) + '(eshell-ls-text-face ((t (:foreground "gray85")))) + '(eshell-ls-todo-face ((t (:bold t :weight bold)))) + '(eshell-ls-unreadable-face ((t (:foreground "gray85")))) + '(eshell-prompt-face ((t (:bold t :foreground "Yellow" :weight bold)))) + '(eshell-test-failed-face ((t (:bold t :weight bold)))) + '(eshell-test-ok-face ((t (:bold t :weight bold)))) + '(excerpt ((t (:italic t :slant italic)))) + '(ff-paths-non-existant-file-face ((t (:bold t :foreground "gray85" :weight bold)))) + '(fg:black ((t (:foreground "black")))) + '(fg:erc-color-face0 ((t (:foreground "White")))) + '(fg:erc-color-face1 ((t (:foreground "black")))) + '(fg:erc-color-face10 ((t (:foreground "lightblue1")))) + '(fg:erc-color-face11 ((t (:foreground "cyan")))) + '(fg:erc-color-face12 ((t (:foreground "blue")))) + '(fg:erc-color-face13 ((t (:foreground "deeppink")))) + '(fg:erc-color-face14 ((t (:foreground "gray50")))) + '(fg:erc-color-face15 ((t (:foreground "gray90")))) + '(fg:erc-color-face2 ((t (:foreground "blue4")))) + '(fg:erc-color-face3 ((t (:foreground "green4")))) + '(fg:erc-color-face4 ((t (:foreground "red")))) + '(fg:erc-color-face5 ((t (:foreground "brown")))) + '(fg:erc-color-face6 ((t (:foreground "purple")))) + '(fg:erc-color-face7 ((t (:foreground "orange")))) + '(fg:erc-color-face8 ((t (:foreground "yellow")))) + '(fg:erc-color-face9 ((t (:foreground "green")))) + '(fixed ((t (:bold t :weight bold)))) + '(fixed-pitch ((t (:family "outline-lucida console")))) + '(fl-comment-face ((t (:foreground "gray85")))) + '(fl-function-name-face ((t (:foreground "green")))) + '(fl-keyword-face ((t (:foreground "LightGreen")))) + '(fl-string-face ((t (:foreground "light coral")))) + '(fl-type-face ((t (:foreground "cyan")))) + '(flyspell-duplicate-face ((t (:bold t :foreground "Gold3" :underline t :weight bold)))) + '(flyspell-incorrect-face ((t (:bold t :foreground "OrangeRed" :underline t :weight bold)))) + '(font-latex-bold-face ((t (nil)))) + '(font-latex-italic-face ((t (nil)))) + '(font-latex-math-face ((t (nil)))) + '(font-latex-sedate-face ((t (:foreground "Gray85")))) + '(font-latex-string-face ((t (:foreground "orange")))) + '(font-latex-warning-face ((t (:foreground "gold")))) + '(font-lock-builtin-face ((t (:bold t :foreground "LightSteelBlue" :weight bold)))) + '(font-lock-comment-face ((t (:italic t :foreground "medium aquamarine" :slant italic)))) + '(font-lock-constant-face ((t (:bold t :foreground "Aquamarine" :weight bold)))) + '(font-lock-doc-face ((t (:bold t :weight bold)))) + '(font-lock-doc-string-face ((t (:bold t :foreground "aquamarine" :weight bold)))) + '(font-lock-exit-face ((t (:foreground "green")))) + '(font-lock-function-name-face ((t (:italic t :bold t :foreground "LightSkyBlue" :slant italic :weight bold)))) + '(font-lock-keyword-face ((t (:bold t :foreground "Cyan" :weight bold)))) + '(font-lock-preprocessor-face ((t (:foreground "Gray85")))) + '(font-lock-reference-face ((t (:foreground "cyan")))) + '(font-lock-string-face ((t (:italic t :foreground "aquamarine" :slant italic)))) + '(font-lock-type-face ((t (:bold t :foreground "PaleGreen" :weight bold)))) + '(font-lock-variable-name-face ((t (:italic t :bold t :foreground "LightGoldenrod" :slant italic :weight bold)))) + '(font-lock-warning-face ((t (:bold t :foreground "Salmon" :weight bold)))) + '(fringe ((t (:background "#3c5473")))) + '(gnus-cite-attribution-face ((t (:italic t :bold t :foreground "beige" :underline t :slant italic :weight bold)))) + '(gnus-cite-face-1 ((t (:foreground "gold")))) + '(gnus-cite-face-10 ((t (:foreground "coral")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "wheat")))) + '(gnus-cite-face-3 ((t (:foreground "light pink")))) + '(gnus-cite-face-4 ((t (:foreground "khaki")))) + '(gnus-cite-face-5 ((t (:foreground "pale green")))) + '(gnus-cite-face-6 ((t (:foreground "beige")))) + '(gnus-cite-face-7 ((t (:foreground "orange")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t :foreground "light gray" :weight bold)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t :foreground "cyan" :slant italic :weight bold)))) + '(gnus-emphasis-highlight-words ((t (:background "gray30" :foreground "gold")))) + '(gnus-emphasis-italic ((t (:italic t :foreground "cyan" :slant italic)))) + '(gnus-emphasis-underline ((t (:foreground "white" :underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :foreground "white" :underline t :weight bold)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :foreground "white" :underline t :slant italic :weight bold)))) + '(gnus-emphasis-underline-italic ((t (:italic t :foreground "white" :underline t :slant italic)))) + '(gnus-filterhist-face-1 ((t (nil)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "Magenta")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "Magenta" :weight bold)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2" :weight bold)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "Cyan")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "Cyan" :weight bold)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "Wheat")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "Gray85" :weight bold)))) + '(gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise" :weight bold)))) + '(gnus-group-news-2-empty-face ((t (:foreground "turquoise")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "turquoise" :weight bold)))) + '(gnus-group-news-3-empty-face ((t (:foreground "wheat")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "Wheat" :weight bold)))) + '(gnus-group-news-4-empty-face ((t (:foreground "Aquamarine")))) + '(gnus-group-news-4-face ((t (:bold t :weight bold)))) + '(gnus-group-news-5-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-5-face ((t (:bold t :weight bold)))) + '(gnus-group-news-6-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-6-face ((t (:bold t :weight bold)))) + '(gnus-group-news-low-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "MediumAquamarine" :weight bold)))) + '(gnus-header-content-face ((t (:italic t :foreground "Wheat" :slant italic)))) + '(gnus-header-from-face ((t (:bold t :foreground "light yellow" :weight bold)))) + '(gnus-header-name-face ((t (:bold t :foreground "Wheat" :weight bold)))) + '(gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "gold" :slant italic :weight bold)))) + '(gnus-header-subject-face ((t (:bold t :foreground "Gold" :weight bold)))) + '(gnus-picons-face ((t (:background "white" :foreground "gray30")))) + '(gnus-picons-xbm-face ((t (:background "white" :foreground "gray30")))) + '(gnus-signature-face ((t (:italic t :foreground "white" :slant italic)))) + '(gnus-splash ((t (:foreground "Brown")))) + '(gnus-splash-face ((t (:foreground "orange")))) + '(gnus-summary-cancelled-face ((t (:background "gray30" :foreground "orange")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue" :weight bold)))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "gray85" :weight bold)))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "coral" :weight bold)))) + '(gnus-summary-high-unread-face ((t (:italic t :bold t :foreground "gold" :slant italic :weight bold)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue" :slant italic)))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "gray85" :slant italic)))) + '(gnus-summary-low-ticked-face ((t (:italic t :bold t :foreground "coral" :slant italic :weight bold)))) + '(gnus-summary-low-unread-face ((t (:italic t :foreground "white" :slant italic)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "gray70")))) + '(gnus-summary-normal-ticked-face ((t (:bold t :foreground "pink" :weight bold)))) + '(gnus-summary-normal-unread-face ((t (:bold t :foreground "gray85" :weight bold)))) + '(gnus-summary-selected-face ((t (:foreground "white" :underline t)))) + '(gnus-x-face ((t (:background "white" :foreground "gray30")))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "grey75" :foreground "gray30")))) + '(gui-element ((t (:background "Gray80")))) + '(header-line ((t (:background "grey20" :foreground "grey90")))) + '(hi-black-b ((t (:bold t :weight bold)))) + '(hi-black-hb ((t (:bold t :weight bold :height 1.67 :family "helv")))) + '(hi-blue ((t (:background "light blue")))) + '(hi-blue-b ((t (:bold t :foreground "blue" :weight bold)))) + '(hi-green ((t (:background "green")))) + '(hi-green-b ((t (:bold t :foreground "green" :weight bold)))) + '(hi-pink ((t (:background "pink")))) + '(hi-red-b ((t (:bold t :foreground "red" :weight bold)))) + '(hi-yellow ((t (:background "yellow")))) + '(highlight ((t (:background "SkyBlue3")))) + '(highlight-changes-delete-face ((t (:foreground "gray85" :underline t)))) + '(highlight-changes-face ((t (:foreground "gray85")))) + '(highline-face ((t (:background "#3c5473")))) + '(highline-vertical-face ((t (:background "lightcyan")))) + '(holiday-face ((t (:background "pink" :foreground "gray30")))) + '(html-helper-bold-face ((t (:bold t :weight bold)))) + '(html-helper-bold-italic-face ((t (nil)))) + '(html-helper-builtin-face ((t (:foreground "gray85" :underline t)))) + '(html-helper-italic-face ((t (:bold t :foreground "yellow" :weight bold)))) + '(html-helper-underline-face ((t (:underline t)))) + '(html-tag-face ((t (:bold t :weight bold)))) + '(hyper-apropos-documentation ((t (:foreground "white")))) + '(hyper-apropos-heading ((t (:bold t :weight bold)))) + '(hyper-apropos-hyperlink ((t (:foreground "sky blue")))) + '(hyper-apropos-major-heading ((t (:bold t :weight bold)))) + '(hyper-apropos-section-heading ((t (:bold t :weight bold)))) + '(hyper-apropos-warning ((t (:bold t :foreground "gray85" :weight bold)))) + '(ibuffer-marked-face ((t (:foreground "gray85")))) + '(idlwave-help-link-face ((t (:foreground "Blue")))) + '(idlwave-shell-bp-face ((t (:background "Pink" :foreground "Black")))) + '(info-header-node ((t (:italic t :bold t :foreground "brown" :slant italic :weight bold)))) + '(info-header-xref ((t (:bold t :foreground "magenta4" :weight bold)))) + '(info-menu-5 ((t (:underline t)))) + '(info-menu-6 ((t (nil)))) + '(info-menu-header ((t (:bold t :weight bold :family "helv")))) + '(info-node ((t (:italic t :bold t :slant italic :weight bold)))) + '(info-xref ((t (:bold t :weight bold)))) + '(isearch ((t (:background "LightSeaGreen")))) + '(isearch-lazy-highlight-face ((t (:background "cyan4")))) + '(isearch-secondary ((t (:foreground "red3")))) + '(italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan")))) + '(jde-bug-breakpoint-marker ((t (:background "yellow" :foreground "red")))) + '(jde-java-font-lock-api-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-bold-face ((t (:bold t :weight bold)))) + '(jde-java-font-lock-code-face ((t (nil)))) + '(jde-java-font-lock-constant-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-doc-tag-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-italic-face ((t (:italic t :slant italic)))) + '(jde-java-font-lock-link-face ((t (:foreground "cyan3" :underline t)))) + '(jde-java-font-lock-modifier-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-number-face ((t (:foreground "RosyBrown")))) + '(jde-java-font-lock-operator-face ((t (:foreground "cyan3")))) + '(jde-java-font-lock-package-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-pre-face ((t (nil)))) + '(jde-java-font-lock-underline-face ((t (:underline t)))) + '(lazy-highlight-face ((t (:bold t :foreground "yellow" :weight bold)))) + '(left-margin ((t (nil)))) + '(linemenu-face ((t (:background "gray30")))) + '(list-mode-item-selected ((t (:background "gray68")))) + '(log-view-file-face ((t (:bold t :background "grey70" :weight bold)))) + '(log-view-message-face ((t (:background "grey85")))) + '(magenta ((t (:foreground "gray85")))) + '(makefile-space-face ((t (:background "hotpink" :foreground "white")))) + '(man-bold ((t (:bold t :weight bold)))) + '(man-heading ((t (:bold t :weight bold)))) + '(man-italic ((t (:foreground "yellow")))) + '(man-xref ((t (:underline t)))) + '(menu ((t (:background "wheat" :foreground "gray30")))) + '(message-cited-text ((t (:foreground "orange")))) + '(message-cited-text-face ((t (:foreground "medium aquamarine")))) + '(message-header-cc-face ((t (:bold t :foreground "gray85" :weight bold)))) + '(message-header-contents ((t (:foreground "white")))) + '(message-header-name-face ((t (:foreground "gray85")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow" :slant italic :weight bold)))) + '(message-header-other-face ((t (:foreground "gray85")))) + '(message-header-subject-face ((t (:bold t :foreground "green3" :weight bold)))) + '(message-header-to-face ((t (:bold t :foreground "green2" :weight bold)))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-headers ((t (:bold t :foreground "orange" :weight bold)))) + '(message-highlighted-header-contents ((t (:bold t :weight bold)))) + '(message-mml-face ((t (:bold t :foreground "gray85" :weight bold)))) + '(message-separator-face ((t (:foreground "gray85")))) + '(message-url ((t (:bold t :foreground "pink" :weight bold)))) + '(mmm-default-submode-face ((t (:background "#c0c0c5")))) + '(mmm-face ((t (:background "black" :foreground "green")))) + '(mode-line ((t (:background "#3c5473" :foreground "lightgray" :box (:line-width -1 :style released-button :family "helv"))))) + '(mode-line-buffer-id ((t (:background "white" :foreground "DeepSkyBlue3" :slant normal :weight normal :width normal :family "outline-verdana")))) + '(mode-line-mousable ((t (:background "white" :foreground "DeepSkyBlue3")))) + '(mode-line-mousable-minor-mode ((t (:background "white" :foreground "DeepSkyBlue3")))) + '(my-summary-highlight-face ((t (:background "PaleTurquoise4" :foreground "White")))) + '(my-url-face ((t (:foreground "LightBlue")))) + '(nil ((t (nil)))) + '(paren-blink-off ((t (:foreground "gray80")))) + '(paren-face-match ((t (:background "turquoise")))) + '(paren-face-mismatch ((t (:background "purple" :foreground "white")))) + '(paren-face-no-match ((t (:background "yellow" :foreground "gray30")))) + '(paren-match ((t (:background "darkseagreen2")))) + '(paren-mismatch ((t (:background "RosyBrown" :foreground "gray30")))) + '(paren-mismatch-face ((t (:bold t :background "white" :foreground "red" :weight bold)))) + '(paren-no-match-face ((t (:bold t :background "white" :foreground "red" :weight bold)))) + '(pointer ((t (nil)))) + '(primary-selection ((t (:background "gray40")))) + '(reb-match-0 ((t (:background "lightblue")))) + '(reb-match-1 ((t (:background "aquamarine")))) + '(reb-match-2 ((t (:background "springgreen")))) + '(reb-match-3 ((t (:background "yellow")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "Cyan4")))) + '(right-margin ((t (nil)))) + '(scroll-bar ((t (:background "grey75")))) + '(secondary-selection ((t (:background "gray60")))) + '(semantic-dirty-token-face ((t (:background "gray10")))) + '(semantic-intangible-face ((t (:foreground "gray25")))) + '(semantic-read-only-face ((t (:background "gray25")))) + '(semantic-unmatched-syntax-face ((t (:underline "red")))) + '(senator-intangible-face ((t (:foreground "gray75")))) + '(senator-momentary-highlight-face ((t (:background "gray70")))) + '(senator-read-only-face ((t (:background "#664444")))) + '(sgml-comment-face ((t (:foreground "dark turquoise")))) + '(sgml-doctype-face ((t (:foreground "turquoise")))) + '(sgml-end-tag-face ((t (:foreground "aquamarine")))) + '(sgml-entity-face ((t (:foreground "gray85")))) + '(sgml-ignored-face ((t (:background "gray60" :foreground "gray40")))) + '(sgml-ms-end-face ((t (:foreground "green")))) + '(sgml-ms-start-face ((t (:foreground "yellow")))) + '(sgml-pi-face ((t (:foreground "lime green")))) + '(sgml-sgml-face ((t (:foreground "brown")))) + '(sgml-short-ref-face ((t (:foreground "deep sky blue")))) + '(sgml-start-tag-face ((t (:foreground "aquamarine")))) + '(sh-heredoc-face ((t (:foreground "tan")))) + '(shell-option-face ((t (:foreground "gray85")))) + '(shell-output-2-face ((t (:foreground "gray85")))) + '(shell-output-3-face ((t (:foreground "gray85")))) + '(shell-output-face ((t (:bold t :weight bold)))) + '(shell-prompt-face ((t (:foreground "yellow")))) + '(show-paren-match-face ((t (:bold t :background "turquoise" :weight bold)))) + '(show-paren-mismatch-face ((t (:bold t :background "RosyBrown" :foreground "white" :weight bold)))) + '(show-tabs-space-face ((t (:foreground "yellow")))) + '(show-tabs-tab-face ((t (:foreground "red")))) + '(smerge-base-face ((t (:foreground "red")))) + '(smerge-markers-face ((t (:background "grey85")))) + '(smerge-mine-face ((t (:foreground "Gray85")))) + '(smerge-other-face ((t (:foreground "darkgreen")))) + '(speedbar-button-face ((t (:bold t :weight bold)))) + '(speedbar-directory-face ((t (:bold t :weight bold)))) + '(speedbar-file-face ((t (:bold t :weight bold)))) + '(speedbar-highlight-face ((t (:background "sea green")))) + '(speedbar-selected-face ((t (:underline t)))) + '(speedbar-tag-face ((t (:foreground "yellow")))) + '(strokes-char-face ((t (:background "lightgray")))) + '(swbuff-current-buffer-face ((t (:bold t :foreground "gray85" :weight bold)))) + '(template-message-face ((t (:bold t :weight bold)))) + '(term-black ((t (:foreground "black")))) + '(term-blackbg ((t (:background "black")))) + '(term-blue ((t (:foreground "blue")))) + '(term-bluebg ((t (:background "blue")))) + '(term-bold ((t (:bold t :weight bold)))) + '(term-cyan ((t (:foreground "cyan")))) + '(term-cyanbg ((t (:background "cyan")))) + '(term-default ((t (:background "gray80" :foreground "gray30" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :family "outline-lucida console")))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-green ((t (:foreground "green")))) + '(term-greenbg ((t (:background "green")))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (:foreground "magenta")))) + '(term-magentabg ((t (:background "magenta")))) + '(term-red ((t (:foreground "red")))) + '(term-redbg ((t (:background "red")))) + '(term-underline ((t (:underline t)))) + '(term-white ((t (:foreground "white")))) + '(term-whitebg ((t (:background "white")))) + '(term-yellow ((t (:foreground "yellow")))) + '(term-yellowbg ((t (:background "yellow")))) + '(tex-math-face ((t (:foreground "RosyBrown")))) + '(texinfo-heading-face ((t (:foreground "Blue")))) + '(text-cursor ((t (:background "Red3" :foreground "gray80")))) + '(tool-bar ((t (:background "grey75" :foreground "black")))) + '(toolbar ((t (:background "Gray80")))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(variable-pitch ((t (:family "helv")))) + '(vc-annotate-face-0046FF ((t (:background "black" :foreground "wheat")))) + '(vcursor ((t (:background "cyan" :foreground "blue" :underline t)))) + '(vertical-divider ((t (:background "Gray80")))) + '(vhdl-font-lock-attribute-face ((t (:foreground "gray85")))) + '(vhdl-font-lock-directive-face ((t (:foreground "gray85")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "gray85")))) + '(vhdl-font-lock-function-face ((t (:foreground "gray85")))) + '(vhdl-font-lock-prompt-face ((t (:bold t :foreground "gray85" :weight bold)))) + '(vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "gray85" :weight bold)))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-speedbar-architecture-face ((t (:foreground "gray85")))) + '(vhdl-speedbar-architecture-selected-face ((t (:foreground "gray85" :underline t)))) + '(vhdl-speedbar-configuration-face ((t (:foreground "gray85")))) + '(vhdl-speedbar-configuration-selected-face ((t (:foreground "gray85" :underline t)))) + '(vhdl-speedbar-entity-face ((t (:foreground "gray85")))) + '(vhdl-speedbar-entity-selected-face ((t (:foreground "gray85" :underline t)))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "gray85")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:foreground "gray85" :underline t)))) + '(vhdl-speedbar-package-face ((t (:foreground "gray85")))) + '(vhdl-speedbar-package-selected-face ((t (:foreground "gray85" :underline t)))) + '(viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black")))) + '(viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen")))) + '(viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-search-face ((t (:background "khaki" :foreground "Black")))) + '(vm-header-content-face ((t (:italic t :foreground "wheat" :slant italic)))) + '(vm-header-from-face ((t (:italic t :foreground "wheat" :slant italic)))) + '(vm-header-name-face ((t (:foreground "cyan")))) + '(vm-header-subject-face ((t (:foreground "cyan")))) + '(vm-header-to-face ((t (:italic t :foreground "cyan" :slant italic)))) + '(vm-message-cited-face ((t (:foreground "Gray80")))) + '(vm-monochrome-image ((t (:background "white" :foreground "gray30")))) + '(vm-summary-face-1 ((t (:foreground "MediumAquamarine")))) + '(vm-summary-face-2 ((t (:foreground "MediumAquamarine")))) + '(vm-summary-face-3 ((t (:foreground "MediumAquamarine")))) + '(vm-summary-face-4 ((t (:foreground "MediumAquamarine")))) + '(vm-summary-highlight-face ((t (:foreground "White")))) + '(vm-xface ((t (:background "white" :foreground "gray30")))) + '(vmpc-pre-sig-face ((t (:foreground "gray85")))) + '(vmpc-sig-face ((t (:foreground "gray85")))) + '(vvb-face ((t (:background "pink" :foreground "gray30")))) + '(w3m-anchor-face ((t (:bold t :foreground "gray85" :weight bold)))) + '(w3m-arrived-anchor-face ((t (:bold t :foreground "gray85" :weight bold)))) + '(w3m-header-line-location-content-face ((t (:background "dark olive green" :foreground "wheat")))) + '(w3m-header-line-location-title-face ((t (:background "dark olive green" :foreground "beige")))) + '(white ((t (:foreground "white")))) + '(widget ((t (nil)))) + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "gray85")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85" :foreground "gray30")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "dim gray" :foreground "white")))) + '(woman-addition-face ((t (:foreground "orange")))) + '(woman-bold-face ((t (:bold t :weight bold)))) + '(woman-italic-face ((t (:foreground "beige")))) + '(woman-unknown-face ((t (:foreground "LightSalmon")))) + '(x-face ((t (:background "white" :foreground "gray30")))) + '(xrdb-option-name-face ((t (:foreground "gray85")))) + '(xref-keyword-face ((t (:foreground "gray85")))) + '(xref-list-default-face ((t (nil)))) + '(xref-list-pilot-face ((t (:foreground "gray85")))) + '(xref-list-symbol-face ((t (:foreground "navy")))) + '(xsl-fo-alternate-face ((t (:foreground "Yellow")))) + '(xsl-fo-main-face ((t (:foreground "PaleGreen")))) + '(xsl-other-element-face ((t (:foreground "Coral")))) + '(xsl-xslt-alternate-face ((t (:foreground "LightGray")))) + '(xsl-xslt-main-face ((t (:foreground "Wheat")))) + '(xxml-emph-1-face ((t (:background "lightyellow")))) + '(xxml-emph-2-face ((t (:background "lightyellow")))) + '(xxml-header-1-face ((t (:background "seashell1" :foreground "MediumAquamarine")))) + '(xxml-header-2-face ((t (:background "seashell1" :foreground "SkyBlue")))) + '(xxml-header-3-face ((t (:background "seashell1")))) + '(xxml-header-4-face ((t (:background "seashell1")))) + '(xxml-interaction-face ((t (:background "lightcyan")))) + '(xxml-rug-face ((t (:background "cyan")))) + '(xxml-sparkle-face ((t (:background "yellow")))) + '(xxml-unbreakable-space-face ((t (:foreground "grey" :underline t)))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "Cyan4"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'dark-blue2) + +;;; dark-blue2-theme.el ends here diff --git a/replace-colorthemes/dark-erc-theme.el b/replace-colorthemes/dark-erc-theme.el new file mode 100644 index 0000000..255af66 --- /dev/null +++ b/replace-colorthemes/dark-erc-theme.el @@ -0,0 +1,91 @@ +;;; dark-erc-theme.el --- dark-erc theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of dark-erc theme from `color-themes' + +;;; Code: + +(deftheme dark-erc + "dark-erc theme") + +(custom-theme-set-faces + 'dark-erc + + '(erc-action-face ((t (nil)))) + '(erc-bold-face ((t (:bold t)))) + '(erc-current-nick-face ((t (:bold t)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (nil)))) + '(erc-error-face ((t (:bold t :foreground "IndianRed")))) + '(erc-highlight-face ((t (:bold t :foreground "pale green")))) + '(erc-input-face ((t (:foreground "#555")))) + '(erc-inverse-face ((t (:background "steel blue")))) + '(erc-keyword-face ((t (:foreground "#999" :bold t)))) + '(erc-nick-msg-face ((t (:foreground "#888")))) + '(erc-notice-face ((t (:foreground "#444")))) + '(erc-pal-face ((t (:foreground "#888")))) + '(erc-prompt-face ((t (:foreground "#777" :bold t)))) + '(erc-timestamp-face ((t (:foreground "#777" :bold t)))) + '(fg:erc-color-face0 ((t (:foreground "white")))) + '(fg:erc-color-face1 ((t (:foreground "beige")))) + '(fg:erc-color-face2 ((t (:foreground "lemon chiffon")))) + '(fg:erc-color-face3 ((t (:foreground "light cyan")))) + '(fg:erc-color-face4 ((t (:foreground "powder blue")))) + '(fg:erc-color-face5 ((t (:foreground "sky blue")))) + '(fg:erc-color-face6 ((t (:foreground "dark sea green")))) + '(fg:erc-color-face7 ((t (:foreground "pale green")))) + '(fg:erc-color-face8 ((t (:foreground "medium spring green")))) + '(fg:erc-color-face9 ((t (:foreground "khaki")))) + '(fg:erc-color-face10 ((t (:foreground "pale goldenrod")))) + '(fg:erc-color-face11 ((t (:foreground "light goldenrod yellow")))) + '(fg:erc-color-face12 ((t (:foreground "light yellow")))) + '(fg:erc-color-face13 ((t (:foreground "yellow")))) + '(fg:erc-color-face14 ((t (:foreground "light goldenrod")))) + '(fg:erc-color-face15 ((t (:foreground "lime green")))) + '(bg:erc-color-face0 ((t (nil)))) + '(bg:erc-color-face1 ((t (nil)))) + '(bg:erc-color-face2 ((t (nil)))) + '(bg:erc-color-face3 ((t (nil)))) + '(bg:erc-color-face4 ((t (nil)))) + '(bg:erc-color-face5 ((t (nil)))) + '(bg:erc-color-face6 ((t (nil)))) + '(bg:erc-color-face7 ((t (nil)))) + '(bg:erc-color-face8 ((t (nil)))) + '(bg:erc-color-face9 ((t (nil)))) + '(bg:erc-color-face10 ((t (nil)))) + '(bg:erc-color-face11 ((t (nil)))) + '(bg:erc-color-face12 ((t (nil)))) + '(bg:erc-color-face13 ((t (nil)))) + '(bg:erc-color-face14 ((t (nil)))) + '(bg:erc-color-face15 ((t (nil))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'dark-erc) + +;;; dark-erc-theme.el ends here diff --git a/replace-colorthemes/dark-font-lock-theme.el b/replace-colorthemes/dark-font-lock-theme.el new file mode 100644 index 0000000..584a937 --- /dev/null +++ b/replace-colorthemes/dark-font-lock-theme.el @@ -0,0 +1,57 @@ +;;; dark-font-lock-theme.el --- dark-font-lock theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of dark-font-lock theme from `color-themes' + +;;; Code: + +(deftheme dark-font-lock + "dark-font-lock theme") + +(custom-theme-set-faces + 'dark-font-lock + + '(font-lock-builtin-face ((t (:bold t :foreground "#777")))) + '(font-lock-comment-face ((t (:foreground "#555")))) + '(font-lock-constant-face ((t (:foreground "#777")))) + '(font-lock-doc-string-face ((t (:foreground "#777")))) + '(font-lock-doc-face ((t (:foreground "#777")))) + '(font-lock-function-name-face ((t (:bold t :foreground "#777")))) + '(font-lock-keyword-face ((t (:foreground "#777")))) + '(font-lock-preprocessor-face ((t (:foreground "#777")))) + '(font-lock-reference-face ((t (:foreground "#777")))) + '(font-lock-string-face ((t (:foreground "#777")))) + '(font-lock-type-face ((t (:bold t)))) + '(font-lock-variable-name-face ((t (:bold t :foreground "#888")))) + '(font-lock-warning-face ((t (:bold t :foreground "#999"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'dark-font-lock) + +;;; dark-font-lock-theme.el ends here diff --git a/replace-colorthemes/dark-gnus-theme.el b/replace-colorthemes/dark-gnus-theme.el new file mode 100644 index 0000000..d020e14 --- /dev/null +++ b/replace-colorthemes/dark-gnus-theme.el @@ -0,0 +1,114 @@ +;;; dark-gnus-theme.el --- dark-gnus theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of dark-gnus theme from `color-themes' + +;;; Code: + +(deftheme dark-gnus + "dark-gnus theme") + +(custom-theme-set-faces + 'dark-gnus + + '(gnus-cite-attribution-face ((t (:foreground "#bbb")))) + '(gnus-cite-face-1 ((t (:foreground "#aaa")))) + '(gnus-cite-face-2 ((t (:foreground "#aaa")))) + '(gnus-cite-face-3 ((t (:foreground "#aaa")))) + '(gnus-cite-face-4 ((t (:foreground "#aaa")))) + '(gnus-cite-face-5 ((t (:foreground "#aaa")))) + '(gnus-cite-face-6 ((t (:foreground "#aaa")))) + '(gnus-cite-face-7 ((t (:foreground "#aaa")))) + '(gnus-cite-face-8 ((t (:foreground "#aaa")))) + '(gnus-cite-face-9 ((t (:foreground "#aaa")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:foreground "#ccc")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "#999")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "#999")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "#999")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "#999")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "#888")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "#888")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "#777")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "#777")))) + '(gnus-group-news-1-empty-face ((t (:foreground "#999")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "#999")))) + '(gnus-group-news-2-empty-face ((t (:foreground "#888")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "#888")))) + '(gnus-group-news-3-empty-face ((t (:foreground "#777")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "#777")))) + '(gnus-group-news-4-empty-face ((t (:foreground "#666")))) + '(gnus-group-news-4-face ((t (:bold t :foreground "#666")))) + '(gnus-group-news-5-empty-face ((t (:foreground "#666")))) + '(gnus-group-news-5-face ((t (:bold t :foreground "#666")))) + '(gnus-group-news-6-empty-face ((t (:foreground "#666")))) + '(gnus-group-news-6-face ((t (:bold t :foreground "#666")))) + '(gnus-group-news-low-empty-face ((t (:foreground "#666")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "#666")))) + '(gnus-header-content-face ((t (:foreground "#888")))) + '(gnus-header-from-face ((t (:bold t :foreground "#888")))) + '(gnus-header-name-face ((t (:bold t :foreground "#777")))) + '(gnus-header-newsgroups-face ((t (:bold t :foreground "#777")))) + '(gnus-header-subject-face ((t (:bold t :foreground "#999")))) + '(gnus-signature-face ((t (:foreground "#444")))) + '(gnus-splash-face ((t (:foreground "#ccc")))) + '(gnus-summary-cancelled-face ((t (:background "#555" :foreground "#000")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "#555")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "#666")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "#777")))) + '(gnus-summary-high-unread-face ((t (:bold t :foreground "#888")))) + '(gnus-summary-low-ancient-face ((t (:foreground "#444")))) + '(gnus-summary-low-read-face ((t (:foreground "#555")))) + '(gnus-summary-low-ticked-face ((t (:foreground "#666")))) + '(gnus-summary-low-unread-face ((t (:foreground "#777")))) + '(gnus-summary-normal-ancient-face ((t (:foreground "#555")))) + '(gnus-summary-normal-read-face ((t (:foreground "#666")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "#777")))) + '(gnus-summary-normal-unread-face ((t (:foreground "#888")))) + '(gnus-summary-selected-face ((t (:background "#333")))) + '(message-cited-text-face ((t (:foreground "#aaa")))) + '(message-header-cc-face ((t (:foreground "#888")))) + '(message-header-name-face ((t (:bold t :foreground "#777")))) + '(message-header-newsgroups-face ((t (:bold t :foreground "#777")))) + '(message-header-other-face ((t (:foreground "#666")))) + '(message-header-subject-face ((t (:bold t :foreground "#999")))) + '(message-header-to-face ((t (:bold t :foreground "#777")))) + '(message-header-xheader-face ((t (:foreground "#666")))) + '(message-separator-face ((t (:foreground "#999"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'dark-gnus) + +;;; dark-gnus-theme.el ends here diff --git a/replace-colorthemes/dark-green-theme.el b/replace-colorthemes/dark-green-theme.el new file mode 100644 index 0000000..8189a60 --- /dev/null +++ b/replace-colorthemes/dark-green-theme.el @@ -0,0 +1,85 @@ +;;; dark-green-theme.el --- dark-green theme + +;; Copyright (C) 2002 by ces93 +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of dark-green theme from `color-themes' + +;;; Code: + +(deftheme dark-green + "dark-green theme") + +(custom-theme-set-faces + 'dark-green + + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(border-glyph ((t (nil)))) + '(fringe ((t (nil)))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "grey75" :foreground "black")))) + '(gui-element ((t (:background "#ffffff" :foreground "#000000")))) + '(highlight ((t (:background "gray" :foreground "darkred")))) + '(isearch ((t (:background "LightSlateGray" :foreground "red")))) + '(italic ((t (:italic t)))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:background "gray68")))) + '(mode-line ((t (:background "LightSlateGray" :foreground "black")))) + '(mode-line ((t (:background "LightSlateGray" :foreground "black")))) + '(mode-line-buffer-id ((t (:background "LightSlateGray" :foreground "blue4")))) + '(mode-line-mousable ((t (:background "LightSlateGray" :foreground "firebrick")))) + '(mode-line-mousable-minor-mode ((t (:background "LightSlateGray" :foreground "green4")))) + '(pointer ((t (:background "#ffffff" :foreground "#000000")))) + '(primary-selection ((t (:background "gray65")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "gray65")))) + '(right-margin ((t (nil)))) + '(rpm-spec-dir-face ((t (:foreground "green")))) + '(rpm-spec-doc-face ((t (:foreground "magenta")))) + '(rpm-spec-ghost-face ((t (:foreground "red")))) + '(rpm-spec-macro-face ((t (:foreground "purple")))) + '(rpm-spec-package-face ((t (:foreground "red")))) + '(rpm-spec-tag-face ((t (:foreground "blue")))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(text-cursor ((t (:background "Red3" :foreground "DarkSlateGray")))) + '(tool-bar ((t (nil)))) + '(toolbar ((t (:background "#ffffff" :foreground "#000000")))) + '(underline ((t (:underline t)))) + '(vertical-divider ((t (:background "#ffffff" :foreground "#000000")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "darkorange" :foreground "black"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'dark-green) + +;;; dark-green-theme.el ends here diff --git a/replace-colorthemes/dark-info-theme.el b/replace-colorthemes/dark-info-theme.el new file mode 100644 index 0000000..19d9000 --- /dev/null +++ b/replace-colorthemes/dark-info-theme.el @@ -0,0 +1,50 @@ +;;; dark-info-theme.el --- dark-info theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of dark-info theme from `color-themes' + +;;; Code: + +(deftheme dark-info + "dark-info theme") + +(custom-theme-set-faces + 'dark-info + + '(info-header-node ((t (:foreground "#666")))) + '(info-header-xref ((t (:foreground "#666")))) + '(info-menu-5 ((t (:underline t)))) + '(info-menu-header ((t (:bold t :foreground "#666")))) + '(info-node ((t (:bold t :foreground "#888")))) + '(info-xref ((t (:bold t :foreground "#777"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'dark-info) + +;;; dark-info-theme.el ends here diff --git a/replace-colorthemes/dark-laptop-theme.el b/replace-colorthemes/dark-laptop-theme.el new file mode 100644 index 0000000..f04dd73 --- /dev/null +++ b/replace-colorthemes/dark-laptop-theme.el @@ -0,0 +1,177 @@ +;;; dark-laptop-theme.el --- dark-laptop theme + +;; Copyright (C) 2001 by Laurent Michel +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of dark-laptop theme from `color-themes' + +;;; Code: + +(deftheme dark-laptop + "dark-laptop theme") + +(custom-theme-set-faces + 'dark-laptop + + '(default ((t (:background "black" :foreground "white")))) + '(mouse ((t (:foreground "sienna1")))) + '(cursor ((t (:background "yellow")))) + '(border ((t (:foreground "black")))) + + '(gnus-mouse-face ((t (:background "darkolivegreen")))) + '(list-matching-lines-face ((t (:bold t)))) + '(view-highlight-face ((t (:background "darkolivegreen")))) + + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(custom-button-face ((t (nil)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :foreground "light blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "pink")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "lime green")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :foreground "light blue")))) + '(fl-comment-face ((t (:foreground "pink")))) + '(fl-doc-string-face ((t (:foreground "purple")))) + '(fl-function-name-face ((t (:foreground "red")))) + '(fl-keyword-face ((t (:foreground "cyan")))) + '(fl-string-face ((t (:foreground "green")))) + '(fl-type-face ((t (:foreground "yellow")))) + '(font-lock-builtin-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-comment-face ((t (:foreground "OrangeRed")))) + '(font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(font-lock-doc-string-face ((t (:foreground "LightSalmon")))) + '(font-lock-function-name-face ((t (:foreground "LightSkyBlue")))) + '(font-lock-keyword-face ((t (:foreground "Cyan")))) + '(font-lock-preprocessor-face ((t (:foreground "Aquamarine")))) + '(font-lock-reference-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-string-face ((t (:foreground "LightSalmon")))) + '(font-lock-type-face ((t (:foreground "PaleGreen")))) + '(font-lock-variable-name-face ((t (:foreground "LightGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:bold t :foreground "deep sky blue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:bold t :foreground "cyan")))) + '(gnus-cite-face-3 ((t (:bold t :foreground "gold")))) + '(gnus-cite-face-4 ((t (:foreground "light pink")))) + '(gnus-cite-face-5 ((t (:foreground "pale green")))) + '(gnus-cite-face-6 ((t (:bold t :foreground "chocolate")))) + '(gnus-cite-face-7 ((t (:foreground "orange")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t)))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise")))) + '(gnus-group-news-2-empty-face ((t (:foreground "turquoise")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "turquoise")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise")))) + '(gnus-header-content-face ((t (:italic t :foreground "forest green")))) + '(gnus-header-from-face ((t (:bold t :foreground "spring green")))) + '(gnus-header-name-face ((t (:foreground "deep sky blue")))) + '(gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "purple")))) + '(gnus-header-subject-face ((t (:bold t :foreground "orange")))) + '(gnus-signature-face ((t (:bold t :foreground "khaki")))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "pink")))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "pink")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "PaleGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "pink")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(highlight ((t (:background "darkolivegreen")))) + '(italic ((t (:italic t)))) + '(message-cited-text-face ((t (:bold t :foreground "red")))) + '(message-header-cc-face ((t (:bold t :foreground "green4")))) + '(message-header-name-face ((t (:bold t :foreground "orange")))) + '(message-header-newsgroups-face ((t (:bold t :foreground "violet")))) + '(message-header-other-face ((t (:bold t :foreground "chocolate")))) + '(message-header-subject-face ((t (:bold t :foreground "yellow")))) + '(message-header-to-face ((t (:bold t :foreground "cyan")))) + '(message-header-xheader-face ((t (:bold t :foreground "light blue")))) + '(message-mml-face ((t (:bold t :background "Green3")))) + '(message-separator-face ((t (:foreground "blue3")))) + '(mode-line ((t (:background "white" :foreground "black")))) + '(mode-line-buffer-id ((t (:background "white" :foreground "black")))) + '(mode-line-mousable ((t (:background "white" :foreground "black")))) + '(mode-line-mousable-minor-mode ((t (:background "white" :foreground "black")))) + '(region ((t (:background "blue")))) + '(primary-selection ((t (:background "blue")))) + '(isearch ((t (:background "blue")))) + '(zmacs-region ((t (:background "blue")))) + '(secondary-selection ((t (:background "darkslateblue")))) + '(underline ((t (:underline t)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:background "dim gray")))) + '(widget-inactive-face ((t (:foreground "light gray")))) + '(widget-single-line-field-face ((t (:background "dim gray"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'dark-laptop) + +;;; dark-laptop-theme.el ends here diff --git a/replace-colorthemes/deep-blue-theme.el b/replace-colorthemes/deep-blue-theme.el new file mode 100644 index 0000000..0afa1f9 --- /dev/null +++ b/replace-colorthemes/deep-blue-theme.el @@ -0,0 +1,137 @@ +;;; deep-blue-theme.el --- deep-blue theme + +;; Copyright (C) 2001 by Tomas Cerha +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of deep-blue theme from `color-themes' + +;;; Code: + +(deftheme deep-blue + "deep-blue theme") + +(custom-theme-set-faces + 'deep-blue + + '(default ((t (:background "#102e4e" :foreground "#eeeeee")))) + '(mouse ((t (:background "white")))) + '(cursor ((t (:background "green" :foreground "black")))) + '(border ((t (:background "black")))) + + '(Info-title-1-face ((t (:bold t :weight bold :height 1.728)))) + '(Info-title-2-face ((t (:bold t :weight bold :height 1.44)))) + '(Info-title-3-face ((t (:bold t :weight bold :height 1.2)))) + '(Info-title-4-face ((t (:bold t :weight bold)))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(calendar-today-face ((t (:background "blue")))) + '(change-log-acknowledgement-face ((t (:italic t :slant italic :foreground "CadetBlue")))) + '(change-log-conditionals-face ((t (:foreground "SeaGreen2")))) + '(change-log-date-face ((t (:foreground "burlywood")))) + '(change-log-email-face ((t (:foreground "SeaGreen2")))) + '(change-log-file-face ((t (:bold t :weight bold :foreground "goldenrod")))) + '(change-log-function-face ((t (:foreground "SeaGreen2")))) + '(change-log-list-face ((t (:bold t :weight bold :foreground "DeepSkyBlue1")))) + '(change-log-name-face ((t (:foreground "gold")))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(cvs-filename-face ((t (:foreground "lightblue")))) + '(cvs-handled-face ((t (:foreground "pink")))) + '(cvs-header-face ((t (:bold t :foreground "lightyellow" :weight bold)))) + '(cvs-marked-face ((t (:bold t :foreground "green" :weight bold)))) + '(cvs-msg-face ((t (:italic t :slant italic)))) + '(cvs-need-action-face ((t (:foreground "orange")))) + '(cvs-unknown-face ((t (:foreground "red")))) + '(diary-face ((t (:foreground "orange red")))) + '(diff-added-face ((t (nil)))) + '(diff-changed-face ((t (nil)))) + '(diff-context-face ((t (:foreground "grey70")))) + '(diff-file-header-face ((t (:bold t :background "grey60" :weight bold)))) + '(diff-function-face ((t (:foreground "grey70")))) + '(diff-header-face ((t (:background "grey45")))) + '(diff-hunk-header-face ((t (:background "grey45")))) + '(diff-index-face ((t (:bold t :weight bold :background "grey60")))) + '(diff-nonexistent-face ((t (:bold t :weight bold :background "grey60")))) + '(diff-removed-face ((t (nil)))) + + '(font-latex-bold-face ((t (:bold t :foreground "OliveDrab" :weight bold)))) + '(font-latex-italic-face ((t (:italic t :foreground "OliveDrab" :slant italic)))) + '(font-latex-math-face ((t (:foreground "burlywood")))) + '(font-latex-sedate-face ((t (:foreground "LightGray")))) + '(font-latex-string-face ((t (:foreground "LightSalmon")))) + '(font-latex-warning-face ((t (:bold t :foreground "Pink" :weight bold)))) + '(font-lock-builtin-face ((t (:foreground "LightCoral")))) + '(font-lock-comment-face ((t (:italic t :foreground "CadetBlue" :slant italic)))) + '(font-lock-constant-face ((t (:foreground "gold")))) + '(font-lock-doc-face ((t (:foreground "BlanchedAlmond")))) + '(font-lock-doc-string-face ((t (:foreground "BlanchedAlmond")))) + '(font-lock-function-name-face ((t (:bold t :foreground "goldenrod" :weight bold)))) + '(font-lock-keyword-face ((t (:bold t :foreground "DeepSkyBlue1" :weight bold)))) + '(font-lock-preprocessor-face ((t (:foreground "gold")))) + '(font-lock-reference-face ((t (:foreground "LightCoral")))) + '(font-lock-string-face ((t (:foreground "burlywood")))) + '(font-lock-type-face ((t (:foreground "CadetBlue1")))) + '(font-lock-variable-name-face ((t (:foreground "SeaGreen2")))) + '(font-lock-warning-face ((t (:foreground "yellow")))) + '(fringe ((t (:background "#405060")))) + '(header-line ((t (:box (:line-width 2 :style released-button) :background "grey20" :foreground "grey90" :box nil)))) + '(highlight ((t (:background "darkgreen")))) + '(holiday-face ((t (:foreground "green")))) + '(info-header-node ((t (:foreground "DeepSkyBlue1")))) + '(info-header-xref ((t (:bold t :weight bold :foreground "SeaGreen2")))) + '(info-menu-5 ((t (:foreground "wheat")))) + '(info-menu-header ((t (:bold t :weight bold)))) + '(info-node ((t (:foreground "DeepSkyBlue1")))) + '(info-xref ((t (:bold t :foreground "SeaGreen2" :weight bold)))) + '(isearch ((t (:background "palevioletred2" :foreground "brown4")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise4")))) + '(italic ((t (:italic t :slant italic)))) + '(menu ((t (:background "gray" :foreground "black")))) + '(mode-line ((t (:background "gray" :foreground "black" :box (:line-width 2 :style released-button))))) + '(mode-line-buffer-id ((t (:background "gray" :foreground "black" :box (:line-width 2 :style released-button))))) + '(mode-line-mousable ((t (:background "gray" :foreground "black" :box (:line-width 2 :style released-button))))) + '(mode-line-mousable-minor-mode ((t (:background "gray" :foreground "black" :box (:line-width 2 :style released-button))))) + '(region ((t (:background "DarkCyan")))) + '(scroll-bar ((t (:background "gray" :foreground "#506070")))) + '(secondary-selection ((t (:background "yellow" :foreground "gray10")))) + '(show-paren-match-face ((t (:bold t :foreground "yellow" :weight bold)))) + '(show-paren-mismatch-face ((t (:bold t :foreground "red" :weight bold)))) + '(tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button))))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "#102e4e")))) + '(underline ((t (:underline t)))) + + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:background "dim gray")))) + '(widget-inactive-face ((t (:foreground "light gray")))) + '(widget-single-line-field-face ((t (:background "dim gray"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'deep-blue) + +;;; deep-blue-theme.el ends here diff --git a/replace-colorthemes/desert-theme.el b/replace-colorthemes/desert-theme.el new file mode 100644 index 0000000..158bc5c --- /dev/null +++ b/replace-colorthemes/desert-theme.el @@ -0,0 +1,175 @@ +;;; desert-theme.el --- desert theme + +;; Copyright (C) Sergei Lebedev +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of desert theme from `color-themes' + +;;; Code: + +(deftheme desert + "desert theme") + +(custom-theme-set-faces + 'desert + + '(default ((t (:background "gray20" :foreground "ghost white")))) + + '(ac-candidate-face ((t (:background "gray15" :foreground "ghost white")))) + '(ac-completion-face ((t (:background "olivedrab" :foreground "khaki")))) + '(ac-selection-face ((t (:foreground "khaki" :background "olivedrab")))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(border ((t (nil)))) + '(buffer-menu-buffer ((t (:bold t :foreground "khaki" :weight bold)))) + '(button ((t (:bold t :weight bold :underline nil :foreground "MediumPurple3" :background "gray20")))) + + '(completions-annotations ((t (:underline t)))) + '(completions-common-part ((t (:foreground "ghost white" :background "gray20")))) + '(completions-first-difference ((t (:bold t :weight bold)))) + + '(cursor ((t (:background "khaki")))) + + '(dired-directory ((t (:bold t :weight bold :foreground "PaleGreen3")))) + '(dired-flagged ((t (:bold t :weight bold :foreground "Pink")))) + '(dired-header ((t (:bold t :weight bold :foreground "PaleGreen3")))) + '(dired-ignored ((t (:foreground "grey70")))) + '(dired-mark ((t (:foreground "#ffa0a0")))) + '(dired-marked ((t (:bold t :weight bold :foreground "DarkOrange")))) + '(dired-perm-write ((t (:foreground "LightSkyBlue3")))) + '(dired-symlink ((t (:foreground "khaki")))) + '(dired-warning ((t (:bold t :weight bold :foreground "goldenrod")))) + + '(elscreen-tab-background-face ((t (:background "gray15")))) + '(elscreen-tab-control-face + ((t (:bold t :weight bold :foreground "goldenrod" :background "gray15" :underline nil)))) + '(elscreen-tab-current-screen-face + ((t (:bold t :background "gray15" :foreground "goldenrod" :weight bold)))) + '(elscreen-tab-other-screen-face ((t (:background "gray15" :foreground "gray60")))) + + '(error ((t (:bold t :foreground "Pink" :weight bold)))) + '(escape-glyph ((t (:foreground "cyan")))) + '(file-name-shadow ((t (:foreground "grey70")))) + + '(font-lock-builtin-face ((t (:foreground "MediumPurple3")))) + '(font-lock-comment-delimiter-face ((t (:foreground "LightSkyBlue3")))) + '(font-lock-comment-face ((t (:foreground "LightSkyBlue3")))) + '(font-lock-constant-face ((t (:foreground "#ffa0a0")))) + '(font-lock-doc-face ((t (:foreground "IndianRed3")))) + '(font-lock-function-name-face ((t (:bold t :foreground "PaleGreen3" :weight bold)))) + '(font-lock-keyword-face ((t (:foreground "khaki")))) + '(font-lock-negation-char-face ((t (nil)))) + '(font-lock-preprocessor-face ((t (:foreground "MediumPurple3")))) + '(font-lock-regexp-grouping-backslash ((t (:bold t :weight bold)))) + '(font-lock-regexp-grouping-construct ((t (:bold t :weight bold)))) + '(font-lock-string-face ((t (:foreground "#ffa0a0")))) + '(font-lock-type-face ((t (:bold t :foreground "PaleGreen3" :weight bold)))) + '(font-lock-variable-name-face ((t (:foreground "ghost white")))) + '(font-lock-warning-face ((t (:bold t :foreground "goldenrod" :weight bold)))) + + '(fringe ((t (:background "gray20")))) + '(glyphless-char ((t (:height 0.6)))) + '(header-line ((t (:background "gray15" :box (:color "gray20" :line-width 2))))) + '(help-argument-name ((t (nil)))) + '(highlight ((t (:background "olivedrab" :foreground "khaki")))) + '(ido-first-match ((t (:bold t :foreground "PaleGreen3" :weight bold)))) + '(ido-only-match ((t (:bold t :foreground "PaleGreen3" :weight bold)))) + '(ido-subdir ((t (:bold t :weight bold :foreground "khaki")))) + + '(isearch ((t (:background "olivedrab" :foreground "khaki")))) + '(isearch-fail ((t (:background "red4")))) + '(isearch-lazy-light + ((t (:bold t :background "gray20" :foreground "ghost white" :weight bold)))) + + '(italic ((t (:underline t)))) + + '(jabber-activity-face ((t (:bold t :weight bold :foreground "PaleGreen3")))) + '(jabber-activity-personal-face ((t (:bold t :foreground "#ffa0a0" :weight bold)))) + '(jabber-chat-prompt-foreign ((t (:bold t :foreground "PaleGreen3" :weight bold)))) + '(jabber-chat-prompt-local ((t (:bold t :foreground "#ffa0a0" :weight bold)))) + '(jabber-chat-prompt-system ((t (:bold t :foreground "LightSkyBlue3" :weight bold)))) + '(jabber-rare-time-face ((t (:bold t :foreground "PaleGreen3" :weight bold)))) + '(jabber-roster-user-away ((t (:foreground "IndianRed3")))) + '(jabber-roster-user-chatty ((t (:bold t :foreground "PaleGreen3" :weight bold)))) + '(jabber-roster-user-dnd ((t (:foreground "LightSkyBlue3")))) + '(jabber-roster-user-error ((t (:bold t :weight bold :foreground "goldenrod")))) + '(jabber-roster-user-offline ((t (:background "gray20" :foreground "gray40")))) + '(jabber-roster-user-online ((t (:bold t :foreground "khaki" :weight bold)))) + '(jabber-roster-user-xa ((t (:foreground "IndianRed3")))) + '(jabber-title-large ((t (:bold t :weight bold :height 1.728)))) + '(jabber-title-medium ((t (:bold t :weight bold :height 1.44)))) + '(jabber-title-small ((t (:bold t :weight bold :height 1.2)))) + + '(lazy-highlight ((t (:background "paleturquoise4")))) + '(link ((t (:bold t :background "gray20" :foreground "MediumPurple3" :underline nil :weight bold)))) + '(link-visited ((t (:bold t :underline nil :foreground "MediumPurple3" :background "gray20" :weight bold)))) + '(linum ((t (:background "gray20" :foreground "yellow")))) + '(match ((t (:bold t :weight bold)))) + '(menu ((t (nil)))) + '(minibuffer-prompt ((t (:bold t :foreground "khaki" :weight bold)))) + + '(mode-line + ((t (:box (:color "gray20" :line-width 2) + :background "gray15" :foreground "gray60")))) + '(mode-line-buffer-id + ((t (:bold t :background "gray15" :box (:color "gray20" :line-width 2) + :foreground "goldenrod" :weight bold)))) + '(mode-line-emphasis ((t (:bold t :weight bold)))) + '(mode-line-highlight ((t (:box (:line-width 2 :color "grey40" :style released-button))))) + '(mode-line-inactive + ((t (:foreground "gray60" :background "gray15" + :box (:color "gray20" :line-width 2))))) + + '(mouse ((t (:background "khaki")))) + '(next-error ((t (:background "olivedrab" :foreground "khaki")))) + '(nobreak-space ((t (:foreground "cyan" :underline t)))) + '(query-replace ((t (:foreground "khaki" :background "olivedrab")))) + '(region ((t (:foreground "khaki" :background "olivedrab")))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "SkyBlue4")))) + '(shadow ((t (:foreground "grey70")))) + '(show-paren-match ((t (:bold t :foreground "PaleGreen3" :weight bold)))) + '(show-paren-mismatch ((t (:bold t :foreground "goldenrod" :weight bold)))) + '(success ((t (:bold t :foreground "Green1" :weight bold)))) + '(tool-bar + ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button))))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:bold t :weight bold :foreground "goldenrod")))) + '(underline ((t (:underline t)))) + + '(vertical-border ((t (nil)))) + '(warning ((t (:bold t :foreground "DarkOrange" :weight bold)))) + '(widget-button ((t (:bold t :weight bold)))) + '(widget-button-pressed ((t (:foreground "red1")))) + '(widget-documentation ((t (:foreground "lime green")))) + '(widget-field ((t (:background "dim gray")))) + '(widget-inactive ((t (:foreground "grey70")))) + '(widget-single-line-field ((t (:background "dim gray")))) ) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'desert) + +;;; desert-theme.el ends here diff --git a/replace-colorthemes/digital-ofs1-theme.el b/replace-colorthemes/digital-ofs1-theme.el new file mode 100644 index 0000000..b32651c --- /dev/null +++ b/replace-colorthemes/digital-ofs1-theme.el @@ -0,0 +1,518 @@ +;;; digital-ofs1-theme.el --- digital-ofs1 theme + +;; Copyright (C) 2001 by Gareth Owen +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of digital-ofs1 theme from `color-themes' + +;;; Code: + +(deftheme digital-ofs1 + "digital-ofs1 theme") + +(custom-theme-set-faces + 'digital-ofs1 + + '(default ((t (:background "#CA94AA469193" :foreground "Black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:foreground "black")))) + + '(Man-overstrike-face ((t (:bold t)))) + '(Man-underline-face ((t (:underline t :bold t)))) + '(gnus-mouse-face ((t (:bold t :background "darkseagreen2")))) + '(goto-address-mail-face ((t (:italic t :bold t)))) + '(goto-address-mail-mouse-face ((t (:bold t :background "paleturquoise")))) + '(goto-address-url-face ((t (:bold t)))) + '(goto-address-url-mouse-face ((t (:bold t :background "darkseagreen2")))) + '(ispell-highlight-face ((t (:bold t :background "darkseagreen2")))) + '(list-matching-lines-face ((t (:bold t)))) + '(rmail-highlight-face ((t (:italic t :bold t :foreground "Blue")))) + '(view-highlight-face ((t (:bold t :background "darkseagreen2")))) + + '(default ((t (:bold t)))) + '(bbdb-company ((t (:italic t)))) + '(bbdb-field-name ((t (:bold t)))) + '(bbdb-field-value ((t (nil)))) + '(bbdb-name ((t (:underline t)))) + '(blank-space-face ((t (nil)))) + '(blank-tab-face ((t (nil)))) + '(blue ((t (:bold t :foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(border-glyph ((t (:bold t)))) + '(buffers-tab ((t (:background "black" :foreground "LightSkyBlue")))) + '(calendar-today-face ((t (:underline t :bold t :foreground "white")))) + '(comint-input-face ((t (nil)))) + '(cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue")))) + '(cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red")))) + '(cperl-here-face ((t (nil)))) + '(cperl-invalid-face ((t (:foreground "white")))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(cperl-pod-face ((t (nil)))) + '(cperl-pod-head-face ((t (nil)))) + '(custom-button-face ((t (:bold t)))) + '(custom-changed-face ((t (:bold t :background "blue" :foreground "white")))) + '(custom-comment-face ((t (:foreground "white")))) + '(custom-comment-tag-face ((t (:foreground "white")))) + '(custom-documentation-face ((t (:bold t)))) + '(custom-face-tag-face ((t (:underline t :bold t)))) + '(custom-group-tag-face ((t (:underline t :bold t :foreground "DarkBlue")))) + '(custom-group-tag-face-1 ((t (:underline t :bold t :foreground "red")))) + '(custom-invalid-face ((t (:bold t :background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:bold t :background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:bold t :background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t :bold t)))) + '(custom-set-face ((t (:bold t :background "white" :foreground "blue")))) + '(custom-state-face ((t (:bold t :foreground "dark green")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :bold t :foreground "blue")))) + '(cvs-filename-face ((t (:foreground "white")))) + '(cvs-handled-face ((t (:foreground "pink")))) + '(cvs-header-face ((t (:bold t :foreground "green")))) + '(cvs-marked-face ((t (:bold t :foreground "green3")))) + '(cvs-msg-face ((t (:italic t :foreground "red")))) + '(cvs-need-action-face ((t (:foreground "yellow")))) + '(cvs-unknown-face ((t (:foreground "grey")))) + '(cyan ((t (:foreground "cyan")))) + '(diary-face ((t (:bold t :foreground "red")))) + '(diff-added-face ((t (nil)))) + '(diff-changed-face ((t (nil)))) + '(diff-file-header-face ((t (:bold t :background "grey70")))) + '(diff-hunk-header-face ((t (:background "grey85")))) + '(diff-index-face ((t (:bold t :background "grey70")))) + '(diff-removed-face ((t (nil)))) + '(dired-face-boring ((t (:foreground "Gray65")))) + '(dired-face-directory ((t (:bold t)))) + '(dired-face-executable ((t (:foreground "SeaGreen")))) + '(dired-face-flagged ((t (:background "LightSlateGray")))) + '(dired-face-header ((t (:background "grey75" :foreground "black")))) + '(dired-face-marked ((t (:background "PaleVioletRed")))) + '(dired-face-permissions ((t (:background "grey75" :foreground "black")))) + '(dired-face-setuid ((t (:foreground "Red")))) + '(dired-face-socket ((t (:foreground "magenta")))) + '(dired-face-symlink ((t (:foreground "cyan")))) + '(display-time-mail-balloon-enhance-face ((t (:bold t :background "orange")))) + '(display-time-mail-balloon-gnus-group-face ((t (:bold t :foreground "blue")))) + '(display-time-time-balloon-face ((t (:bold t :foreground "red")))) + '(ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick")))) + '(ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black")))) + '(ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid")))) + '(ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy")))) + '(ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black")))) + '(ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-B ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black")))) + '(ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy")))) + '(ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black")))) + '(ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black")))) + '(ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black")))) + '(ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White")))) + '(ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White")))) + '(erc-action-face ((t (:bold t)))) + '(erc-bold-face ((t (:bold t)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (nil)))) + '(erc-error-face ((t (:bold t)))) + '(erc-input-face ((t (nil)))) + '(erc-inverse-face ((t (nil)))) + '(erc-notice-face ((t (nil)))) + '(erc-pal-face ((t (nil)))) + '(erc-prompt-face ((t (nil)))) + '(erc-underline-face ((t (nil)))) + '(eshell-ls-archive-face ((t (:bold t :foreground "Orchid")))) + '(eshell-ls-backup-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "Blue")))) + '(eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen")))) + '(eshell-ls-missing-face ((t (:bold t :foreground "Red")))) + '(eshell-ls-picture-face ((t (:foreground "Violet")))) + '(eshell-ls-product-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-readonly-face ((t (:foreground "Brown")))) + '(eshell-ls-special-face ((t (:bold t :foreground "Magenta")))) + '(eshell-ls-symlink-face ((t (:bold t :foreground "DarkCyan")))) + '(eshell-ls-text-face ((t (:foreground "medium aquamarine")))) + '(eshell-ls-todo-face ((t (:bold t :foreground "aquamarine")))) + '(eshell-ls-unreadable-face ((t (:foreground "Grey30")))) + '(eshell-prompt-face ((t (:bold t :foreground "Red")))) + '(eshell-test-failed-face ((t (:bold t :foreground "OrangeRed")))) + '(eshell-test-ok-face ((t (:bold t :foreground "Green")))) + '(excerpt ((t (:italic t)))) + '(ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue")))) + '(fg:black ((t (:foreground "black")))) + '(fixed ((t (:bold t)))) + '(fl-comment-face ((t (:foreground "medium purple")))) + '(fl-doc-string-face ((t (nil)))) + '(fl-function-name-face ((t (:foreground "green")))) + '(fl-keyword-face ((t (:foreground "LightGreen")))) + '(fl-string-face ((t (:foreground "light coral")))) + '(fl-type-face ((t (:foreground "cyan")))) + '(flyspell-duplicate-face ((t (:underline t :bold t :foreground "Gold3")))) + '(flyspell-incorrect-face ((t (:underline t :bold t :foreground "OrangeRed")))) + '(font-latex-bold-face ((t (:bold t)))) + '(font-latex-italic-face ((t (:italic t)))) + '(font-latex-math-face ((t (nil)))) + '(font-latex-sedate-face ((t (nil)))) + '(font-latex-string-face ((t (nil)))) + '(font-latex-warning-face ((t (nil)))) + '(font-lock-builtin-face ((t (:italic t :bold t :foreground "Orchid")))) + '(font-lock-comment-face ((t (:bold t :foreground "Firebrick")))) + '(font-lock-constant-face ((t (:italic t :bold t :foreground "CadetBlue")))) + '(font-lock-doc-string-face ((t (:italic t :bold t :foreground "green4")))) + '(font-lock-emphasized-face ((t (:bold t)))) + '(font-lock-exit-face ((t (:foreground "green")))) + '(font-lock-function-name-face ((t (:italic t :bold t :foreground "Blue")))) + '(font-lock-keyword-face ((t (:bold t :foreground "dark olive green")))) + '(font-lock-other-emphasized-face ((t (:italic t :bold t)))) + '(font-lock-other-type-face ((t (:bold t :foreground "DarkBlue")))) + '(font-lock-preprocessor-face ((t (:italic t :bold t :foreground "blue3")))) + '(font-lock-reference-face ((t (:italic t :bold t :foreground "red3")))) + '(font-lock-special-comment-face ((t (nil)))) + '(font-lock-special-keyword-face ((t (nil)))) + '(font-lock-string-face ((t (:italic t :bold t :foreground "DarkBlue")))) + '(font-lock-type-face ((t (:italic t :bold t :foreground "DarkGreen")))) + '(font-lock-variable-name-face ((t (:italic t :bold t :foreground "darkgreen")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(fringe ((t (:background "grey95")))) + '(gdb-arrow-face ((t (:bold t)))) + '(gnus-cite-attribution-face ((t (:italic t :bold t)))) + '(gnus-cite-face-1 ((t (:bold t :foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:bold t :foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:bold t :foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:bold t :foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-cite-face-list ((t (nil)))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t)))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t)))) + '(gnus-filterhist-face-1 ((t (nil)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen")))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-header-content-face ((t (:italic t :foreground "indianred4")))) + '(gnus-header-from-face ((t (:bold t :foreground "red3")))) + '(gnus-header-name-face ((t (:bold t :foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "MidnightBlue")))) + '(gnus-header-subject-face ((t (:bold t :foreground "red4")))) + '(gnus-picons-face ((t (:background "white" :foreground "black")))) + '(gnus-picons-xbm-face ((t (:background "white" :foreground "black")))) + '(gnus-signature-face ((t (:italic t :bold t)))) + '(gnus-splash ((t (nil)))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-high-unread-face ((t (:italic t :bold t)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :bold t :foreground "firebrick")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (:bold t)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(gnus-x-face ((t (:background "white" :foreground "black")))) + '(green ((t (:bold t :foreground "green")))) + '(gui-button-face ((t (:bold t :background "grey75" :foreground "black")))) + '(gui-element ((t (:bold t :background "Gray80")))) + '(highlight ((t (:bold t :background "darkseagreen2")))) + '(highlight-changes-delete-face ((t (:underline t :foreground "red")))) + '(highlight-changes-face ((t (:foreground "red")))) + '(highline-face ((t (:background "black" :foreground "white")))) + '(holiday-face ((t (:bold t :background "pink" :foreground "white")))) + '(hproperty:but-face ((t (:bold t)))) + '(hproperty:flash-face ((t (:bold t)))) + '(hproperty:highlight-face ((t (:bold t)))) + '(hproperty:item-face ((t (:bold t)))) + '(html-helper-bold-face ((t (:bold t)))) + '(html-helper-bold-italic-face ((t (nil)))) + '(html-helper-builtin-face ((t (:underline t :foreground "blue3")))) + '(html-helper-italic-face ((t (:italic t :bold t :foreground "yellow")))) + '(html-helper-underline-face ((t (:underline t)))) + '(html-tag-face ((t (:bold t)))) + '(hyper-apropos-documentation ((t (:foreground "white")))) + '(hyper-apropos-heading ((t (:bold t)))) + '(hyper-apropos-hyperlink ((t (:foreground "sky blue")))) + '(hyper-apropos-major-heading ((t (:bold t)))) + '(hyper-apropos-section-heading ((t (:bold t)))) + '(hyper-apropos-warning ((t (:bold t :foreground "red")))) + '(ibuffer-marked-face ((t (:foreground "red")))) + '(info-menu-5 ((t (:underline t :bold t)))) + '(info-menu-6 ((t (nil)))) + '(info-node ((t (:italic t :bold t)))) + '(info-xref ((t (:bold t)))) + '(isearch ((t (:bold t :background "paleturquoise")))) + '(isearch-secondary ((t (:foreground "red3")))) + '(ispell-face ((t (:bold t)))) + '(italic ((t (:italic t :bold t)))) + '(jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan")))) + '(jde-bug-breakpoint-marker ((t (:background "yellow" :foreground "red")))) + '(jde-java-font-lock-link-face ((t (:underline t :foreground "blue")))) + '(jde-java-font-lock-number-face ((t (:foreground "RosyBrown")))) + '(lazy-highlight-face ((t (:bold t :foreground "dark magenta")))) + '(left-margin ((t (:bold t)))) + '(linemenu-face ((t (nil)))) + '(list-mode-item-selected ((t (:bold t :background "gray68")))) + '(magenta ((t (:foreground "magenta")))) + '(makefile-space-face ((t (:background "hotpink")))) + '(man-bold ((t (:bold t)))) + '(man-heading ((t (:bold t)))) + '(man-italic ((t (:foreground "yellow")))) + '(man-xref ((t (:underline t)))) + '(message-cited-text ((t (:bold t :foreground "orange")))) + '(message-cited-text-face ((t (:bold t :foreground "red")))) + '(message-header-cc-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-contents ((t (:italic t :bold t :foreground "white")))) + '(message-header-name-face ((t (:bold t :foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4")))) + '(message-header-other-face ((t (:bold t :foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:bold t :foreground "blue")))) + '(message-headers ((t (:bold t :foreground "orange")))) + '(message-highlighted-header-contents ((t (:bold t)))) + '(message-mml-face ((t (:bold t :foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "brown")))) + '(message-url ((t (:bold t :foreground "pink")))) + '(mmm-face ((t (:background "black" :foreground "green")))) + '(mode-line ((t (:bold t :background "Black" :foreground "#CA94AA469193")))) + '(mode-line-buffer-id ((t (:bold t :background "Gray80" :foreground "blue4")))) + '(mode-line-mousable ((t (:bold t :background "Gray80" :foreground "firebrick")))) + '(mode-line-mousable-minor-mode ((t (:bold t :background "Gray80" :foreground "green4")))) + '(my-tab-face ((t (nil)))) + '(nil ((t (nil)))) + '(p4-diff-del-face ((t (:bold t)))) + '(paren-blink-off ((t (:foreground "gray80")))) + '(paren-face ((t (nil)))) + '(paren-face-match ((t (nil)))) + '(paren-face-mismatch ((t (nil)))) + '(paren-face-no-match ((t (nil)))) + '(paren-match ((t (:background "darkseagreen2")))) + '(paren-mismatch ((t (:background "DeepPink" :foreground "black")))) + '(paren-mismatch-face ((t (:bold t :background "DeepPink" :foreground "white")))) + '(paren-no-match-face ((t (:bold t :background "yellow" :foreground "white")))) + '(pointer ((t (:bold t)))) + '(primary-selection ((t (:bold t :background "gray65")))) + '(red ((t (:bold t :foreground "red")))) + '(region ((t (:bold t :background "gray")))) + '(right-margin ((t (:bold t)))) + '(searchm-buffer ((t (:bold t)))) + '(searchm-button ((t (:bold t)))) + '(searchm-field ((t (nil)))) + '(searchm-field-label ((t (:bold t)))) + '(searchm-highlight ((t (:bold t)))) + '(secondary-selection ((t (:bold t :background "paleturquoise")))) + '(semantic-intangible-face ((t (:foreground "gray25")))) + '(semantic-read-only-face ((t (:background "gray25")))) + '(senator-momentary-highlight-face ((t (:background "gray70")))) + '(setnu-line-number-face ((t (:italic t :bold t)))) + '(sgml-comment-face ((t (:foreground "dark green")))) + '(sgml-doctype-face ((t (:foreground "maroon")))) + '(sgml-end-tag-face ((t (:foreground "blue2")))) + '(sgml-entity-face ((t (:foreground "red2")))) + '(sgml-ignored-face ((t (:background "gray90" :foreground "maroon")))) + '(sgml-ms-end-face ((t (:foreground "maroon")))) + '(sgml-ms-start-face ((t (:foreground "maroon")))) + '(sgml-pi-face ((t (:foreground "maroon")))) + '(sgml-sgml-face ((t (:foreground "maroon")))) + '(sgml-short-ref-face ((t (:foreground "goldenrod")))) + '(sgml-start-tag-face ((t (:foreground "blue2")))) + '(shell-input-face ((t (:bold t)))) + '(shell-option-face ((t (:bold t :foreground "blue4")))) + '(shell-output-2-face ((t (:bold t :foreground "green4")))) + '(shell-output-3-face ((t (:bold t :foreground "green4")))) + '(shell-output-face ((t (:bold t)))) + '(shell-prompt-face ((t (:bold t :foreground "red4")))) + '(show-paren-match-face ((t (:bold t :background "turquoise")))) + '(show-paren-mismatch-face ((t (:bold t :background "purple" :foreground "white")))) + '(speedbar-button-face ((t (:bold t :foreground "magenta")))) + '(speedbar-directory-face ((t (:bold t :foreground "orchid")))) + '(speedbar-file-face ((t (:bold t :foreground "pink")))) + '(speedbar-highlight-face ((t (:background "black")))) + '(speedbar-selected-face ((t (:underline t :foreground "cyan")))) + '(speedbar-tag-face ((t (:foreground "yellow")))) + '(swbuff-current-buffer-face ((t (:bold t :foreground "red")))) + '(template-message-face ((t (:bold t)))) + '(term-black ((t (:foreground "black")))) + '(term-blackbg ((t (:background "black")))) + '(term-blue ((t (:foreground "blue")))) + '(term-blue-bold-face ((t (:bold t :background "snow2" :foreground "blue")))) + '(term-blue-face ((t (:foreground "blue")))) + '(term-blue-inv-face ((t (:background "blue")))) + '(term-blue-ul-face ((t (:underline t :background "snow2" :foreground "blue")))) + '(term-bluebg ((t (:background "blue")))) + '(term-bold ((t (:bold t)))) + '(term-cyan ((t (:foreground "cyan")))) + '(term-cyan-bold-face ((t (:bold t :background "snow2" :foreground "cyan")))) + '(term-cyan-face ((t (:foreground "cyan")))) + '(term-cyan-inv-face ((t (:background "cyan")))) + '(term-cyan-ul-face ((t (:underline t :background "snow2" :foreground "cyan")))) + '(term-cyanbg ((t (:background "cyan")))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-bold-face ((t (:bold t :background "snow2" :foreground "darkslategray")))) + '(term-default-face ((t (:background "snow2" :foreground "darkslategray")))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-default-inv-face ((t (:background "darkslategray" :foreground "snow2")))) + '(term-default-ul-face ((t (:underline t :background "snow2" :foreground "darkslategray")))) + '(term-green ((t (:foreground "green")))) + '(term-green-bold-face ((t (:bold t :background "snow2" :foreground "green")))) + '(term-green-face ((t (:foreground "green")))) + '(term-green-inv-face ((t (:background "green")))) + '(term-green-ul-face ((t (:underline t :background "snow2" :foreground "green")))) + '(term-greenbg ((t (:background "green")))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (:foreground "magenta")))) + '(term-magenta-bold-face ((t (:bold t :background "snow2" :foreground "magenta")))) + '(term-magenta-face ((t (:foreground "magenta")))) + '(term-magenta-inv-face ((t (:background "magenta")))) + '(term-magenta-ul-face ((t (:underline t :background "snow2" :foreground "magenta")))) + '(term-magentabg ((t (:background "magenta")))) + '(term-red ((t (:foreground "red")))) + '(term-red-bold-face ((t (:bold t :background "snow2" :foreground "red")))) + '(term-red-face ((t (:foreground "red")))) + '(term-red-inv-face ((t (:background "red")))) + '(term-red-ul-face ((t (:underline t :background "snow2" :foreground "red")))) + '(term-redbg ((t (:background "red")))) + '(term-underline ((t (:underline t)))) + '(term-white ((t (:foreground "white")))) + '(term-white-bold-face ((t (:bold t :background "snow2" :foreground "white")))) + '(term-white-face ((t (:foreground "white")))) + '(term-white-inv-face ((t (:background "snow2")))) + '(term-white-ul-face ((t (:underline t :background "snow2" :foreground "white")))) + '(term-whitebg ((t (:background "white")))) + '(term-yellow ((t (:foreground "yellow")))) + '(term-yellow-bold-face ((t (:bold t :background "snow2" :foreground "yellow")))) + '(term-yellow-face ((t (:foreground "yellow")))) + '(term-yellow-inv-face ((t (:background "yellow")))) + '(term-yellow-ul-face ((t (:underline t :background "snow2" :foreground "yellow")))) + '(term-yellowbg ((t (:background "yellow")))) + '(text-cursor ((t (:bold t :background "Red3" :foreground "gray80")))) + '(toolbar ((t (:bold t :background "Gray80")))) + '(underline ((t (:underline t :bold t)))) + '(vc-annotate-face-0046FF ((t (nil)))) + '(vcursor ((t (:underline t :background "cyan" :foreground "blue")))) + '(vertical-divider ((t (:bold t :background "Gray80")))) + '(vhdl-font-lock-attribute-face ((t (:foreground "Orchid")))) + '(vhdl-font-lock-directive-face ((t (:foreground "CadetBlue")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4")))) + '(vhdl-font-lock-function-face ((t (:foreground "Orchid4")))) + '(vhdl-font-lock-generic-/constant-face ((t (nil)))) + '(vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red")))) + '(vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange")))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-font-lock-type-face ((t (nil)))) + '(vhdl-font-lock-variable-face ((t (nil)))) + '(vhdl-speedbar-architecture-face ((t (:foreground "Blue")))) + '(vhdl-speedbar-architecture-selected-face ((t (:underline t :foreground "Blue")))) + '(vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod")))) + '(vhdl-speedbar-configuration-selected-face ((t (:underline t :foreground "DarkGoldenrod")))) + '(vhdl-speedbar-entity-face ((t (:foreground "ForestGreen")))) + '(vhdl-speedbar-entity-selected-face ((t (:underline t :foreground "ForestGreen")))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "Brown")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:underline t :foreground "Brown")))) + '(vhdl-speedbar-package-face ((t (:foreground "Grey50")))) + '(vhdl-speedbar-package-selected-face ((t (:underline t :foreground "Grey50")))) + '(vhdl-speedbar-subprogram-face ((t (nil)))) + '(viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black")))) + '(viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen")))) + '(viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-search-face ((t (:background "khaki" :foreground "Black")))) + '(vm-xface ((t (:background "white" :foreground "black")))) + '(vmpc-pre-sig-face ((t (:foreground "forestgreen")))) + '(vmpc-sig-face ((t (:foreground "steelblue")))) + '(vvb-face ((t (nil)))) + '(w3m-anchor-face ((t (:bold t :foreground "DodgerBlue1")))) + '(w3m-arrived-anchor-face ((t (:bold t :foreground "DodgerBlue3")))) + '(w3m-header-line-location-content-face ((t (:background "dark olive green" :foreground "wheat")))) + '(w3m-header-line-location-title-face ((t (:background "dark olive green" :foreground "beige")))) + '(white ((t (:foreground "white")))) + '(widget ((t (nil)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:bold t :foreground "red")))) + '(widget-documentation-face ((t (:bold t :foreground "dark green")))) + '(widget-field-face ((t (:bold t :background "gray85")))) + '(widget-inactive-face ((t (:bold t :foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85")))) + '(woman-bold-face ((t (:bold t)))) + '(woman-italic-face ((t (:foreground "beige")))) + '(woman-unknown-face ((t (:foreground "LightSalmon")))) + '(x-face ((t (:bold t :background "white" :foreground "black")))) + '(x-symbol-adobe-fontspecific-face ((t (nil)))) + '(x-symbol-face ((t (nil)))) + '(x-symbol-heading-face ((t (:bold t)))) + '(x-symbol-info-face ((t (nil)))) + '(x-symbol-invisible-face ((t (nil)))) + '(x-symbol-revealed-face ((t (nil)))) + '(xrdb-option-name-face ((t (:foreground "red")))) + '(xref-keyword-face ((t (:foreground "blue")))) + '(xref-list-default-face ((t (nil)))) + '(xref-list-pilot-face ((t (:foreground "navy")))) + '(xref-list-symbol-face ((t (:foreground "navy")))) + '(yellow ((t (:bold t :foreground "yellow")))) + '(zmacs-region ((t (:bold t :background "gray65"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'digital-ofs1) + +;;; digital-ofs1-theme.el ends here diff --git a/replace-colorthemes/emacs-21-theme.el b/replace-colorthemes/emacs-21-theme.el new file mode 100644 index 0000000..90dea70 --- /dev/null +++ b/replace-colorthemes/emacs-21-theme.el @@ -0,0 +1,391 @@ +;;; emacs-21-theme.el --- emacs-21 theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of emacs-21 theme from `color-themes' + +;;; Code: + +(deftheme emacs-21 + "emacs-21 theme") + +(custom-theme-set-faces + 'emacs-21 + + '(default ((t (:background "white" :foreground "black")))) + '(mouse ((t (:background "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:background "black")))) + + '(Man-overstrike-face ((t (:bold t :weight bold)))) + '(Man-underline-face ((t (:underline t)))) + '(cperl-here-face ((t (:foreground "RosyBrown")))) + '(cperl-invalid-face ((t (:underline t)))) + '(cperl-pod-face ((t (:foreground "Firebrick")))) + '(cperl-pod-head-face ((t (:foreground "DarkGoldenrod")))) + '(gnus-article-button-face ((t (:bold t :weight bold)))) + '(gnus-article-mouse-face ((t (:background "darkseagreen2")))) + '(gnus-mouse-face ((t (:background "darkseagreen2")))) + '(help-highlight-face ((t (:underline t)))) + '(idlwave-class-arrow-face ((t (:bold t :weight bold)))) + '(idlwave-shell-breakpoint-face ((t (:background "Pink" :foreground "Black")))) + '(idlwave-shell-expression-face ((t (:background "yellow")))) + '(idlwave-shell-stop-line-face ((t (:background "darkseagreen2")))) + '(ispell-highlight-face ((t (:background "darkseagreen2")))) + '(list-matching-lines-face ((t (:bold t :weight bold)))) + '(view-highlight-face ((t (:background "darkseagreen2")))) + '(widget-mouse-face ((t (:background "darkseagreen2")))) + '(Info-title-1-face ((t (:bold t :weight bold :height 1.728)))) + '(Info-title-2-face ((t (:bold t :weight bold :height 1.44)))) + '(Info-title-3-face ((t (:bold t :weight bold :height 1.2)))) + '(Info-title-4-face ((t (:bold t :weight bold)))) + '(antlr-font-lock-keyword-face ((t (:bold t :foreground "black" :weight bold)))) + '(antlr-font-lock-literal-face ((t (:bold t :foreground "brown4" :weight bold)))) + '(antlr-font-lock-ruledef-face ((t (:bold t :foreground "blue" :weight bold)))) + '(antlr-font-lock-ruleref-face ((t (:foreground "blue4")))) + '(antlr-font-lock-tokendef-face ((t (:bold t :foreground "blue" :weight bold)))) + '(antlr-font-lock-tokenref-face ((t (:foreground "orange4")))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(calendar-today-face ((t (:underline t)))) + '(change-log-acknowledgement-face ((t (:foreground "Firebrick")))) + '(change-log-conditionals-face ((t (:foreground "DarkGoldenrod")))) + '(change-log-date-face ((t (:foreground "RosyBrown")))) + '(change-log-email-face ((t (:foreground "DarkGoldenrod")))) + '(change-log-file-face ((t (:foreground "Blue")))) + '(change-log-function-face ((t (:foreground "DarkGoldenrod")))) + '(change-log-list-face ((t (:foreground "Purple")))) + '(change-log-name-face ((t (:foreground "CadetBlue")))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "dark blue")))) + '(cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue" :weight bold)))) + '(cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red" :slant italic :weight bold)))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(custom-button-face ((t (:background "lightgrey" :foreground "black" + :box (:line-width 2 :style released-button))))) + '(custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" + :box (:line-width 2 :style pressed-button))))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "gray85")))) + '(custom-comment-tag-face ((t (:foreground "blue4")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:bold t :weight bold :height 1.2)))) + '(custom-group-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2)))) + '(custom-group-tag-face-1 ((t (:bold t :foreground "red" :weight bold :height 1.2)))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:bold t :underline t :weight bold)))) + '(custom-variable-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2)))) + '(cvs-filename-face ((t (:foreground "blue4")))) + '(cvs-handled-face ((t (:foreground "pink")))) + '(cvs-header-face ((t (:bold t :foreground "blue4" :weight bold)))) + '(cvs-marked-face ((t (:bold t :foreground "green3" :weight bold)))) + '(cvs-msg-face ((t (:italic t :slant italic)))) + '(cvs-need-action-face ((t (:foreground "orange")))) + '(cvs-unknown-face ((t (:foreground "red")))) + '(diary-face ((t (:foreground "red")))) + '(diff-added-face ((t (nil)))) + '(diff-changed-face ((t (nil)))) + '(diff-context-face ((t (:foreground "grey50")))) + '(diff-file-header-face ((t (:bold t :background "grey70" :weight bold)))) + '(diff-function-face ((t (:foreground "grey50")))) + '(diff-header-face ((t (:background "grey85")))) + '(diff-hunk-header-face ((t (:background "grey85")))) + '(diff-index-face ((t (:bold t :weight bold :background "grey70")))) + '(diff-nonexistent-face ((t (:bold t :weight bold :background "grey70")))) + '(diff-removed-face ((t (nil)))) + '(dired-face-boring ((t (:foreground "RosyBrown")))) + '(dired-face-directory ((t (:foreground "Blue")))) + '(dired-face-executable ((t (nil)))) + '(dired-face-flagged ((t (:foreground "Red" :weight bold)))) + '(dired-face-marked ((t (:foreground "Red" :weight bold)))) + '(dired-face-permissions ((t (nil)))) + '(dired-face-setuid ((t (nil)))) + '(dired-face-socket ((t (nil)))) + '(dired-face-symlink ((t (:foreground "Purple")))) + '(ebrowse-default-face ((t (nil)))) + '(ebrowse-file-name-face ((t (:italic t :slant italic)))) + '(ebrowse-member-attribute-face ((t (:foreground "red")))) + '(ebrowse-member-class-face ((t (:foreground "purple")))) + '(ebrowse-progress-face ((t (:background "blue")))) + '(ebrowse-root-class-face ((t (:bold t :foreground "blue" :weight bold)))) + '(ebrowse-tree-mark-face ((t (:foreground "red")))) + '(ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick")))) + '(ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black")))) + '(ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid")))) + '(ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy")))) + '(ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black")))) + '(ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-B ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black")))) + '(ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy")))) + '(ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black")))) + '(ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black")))) + '(ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black")))) + '(ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White")))) + '(ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White")))) + '(eshell-ls-archive-face ((t (:bold t :foreground "Orchid" :weight bold)))) + '(eshell-ls-backup-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed" :weight bold)))) + '(eshell-ls-directory-face ((t (:bold t :foreground "Blue" :weight bold)))) + '(eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen" :weight bold)))) + '(eshell-ls-missing-face ((t (:bold t :foreground "Red" :weight bold)))) + '(eshell-ls-product-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-readonly-face ((t (:foreground "Brown")))) + '(eshell-ls-special-face ((t (:bold t :foreground "Magenta" :weight bold)))) + '(eshell-ls-symlink-face ((t (:bold t :foreground "Dark Cyan" :weight bold)))) + '(eshell-ls-unreadable-face ((t (:foreground "Grey30")))) + '(eshell-prompt-face ((t (:bold t :foreground "Red" :weight bold)))) + '(eshell-test-failed-face ((t (:bold t :foreground "OrangeRed" :weight bold)))) + '(eshell-test-ok-face ((t (:bold t :foreground "Green" :weight bold)))) + '(excerpt ((t (:italic t :slant italic)))) + '(fixed ((t (:bold t :weight bold)))) + '(fixed-pitch ((t (:family "courier")))) + '(flyspell-duplicate-face ((t (:bold t :foreground "Gold3" :underline t :weight bold)))) + '(flyspell-incorrect-face ((t (:bold t :foreground "OrangeRed" :underline t :weight bold)))) + '(font-lock-builtin-face ((t (:foreground "Orchid")))) + '(font-lock-comment-face ((t (:foreground "Firebrick")))) + '(font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(font-lock-doc-face ((t (:foreground "RosyBrown")))) + '(font-lock-doc-string-face ((t (:foreground "RosyBrown")))) + '(font-lock-function-name-face ((t (:foreground "Blue")))) + '(font-lock-keyword-face ((t (:foreground "Purple")))) + '(font-lock-preprocessor-face ((t (:foreground "CadetBlue")))) + '(font-lock-reference-face ((t (:foreground "Orchid")))) + '(font-lock-string-face ((t (:foreground "RosyBrown")))) + '(font-lock-type-face ((t (:foreground "ForestGreen")))) + '(font-lock-variable-name-face ((t (:foreground "DarkGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red" :weight bold)))) + '(fringe ((t (:background "grey95")))) + '(gnus-cite-attribution-face ((t (:italic t :slant italic)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t :weight bold)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t :slant italic)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3" :weight bold)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3" :weight bold)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4" :weight bold)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4" :weight bold)))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen" :weight bold)))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4" :weight bold)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t :weight bold)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t :weight bold)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t :weight bold)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t :weight bold)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen" :weight bold)))) + '(gnus-header-content-face ((t (:italic t :foreground "indianred4" :slant italic)))) + '(gnus-header-from-face ((t (:foreground "red3")))) + '(gnus-header-name-face ((t (:foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue" :slant italic)))) + '(gnus-header-subject-face ((t (:foreground "red4")))) + '(gnus-signature-face ((t (:italic t :slant italic)))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue" :weight bold)))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen" :weight bold)))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick" :weight bold)))) + '(gnus-summary-high-unread-face ((t (:bold t :weight bold)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue" :slant italic)))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen" :slant italic)))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick" :slant italic)))) + '(gnus-summary-low-unread-face ((t (:italic t :slant italic)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(header-line ((t (:box (:line-width -1 :style released-button) :background "grey90" :foreground "grey20" :box nil)))) + '(hi-black-b ((t (:bold t :weight bold)))) + '(hi-black-hb ((t (:bold t :weight bold :height 1.67)))) + '(hi-blue ((t (:background "light blue")))) + '(hi-blue-b ((t (:bold t :foreground "blue" :weight bold)))) + '(hi-green ((t (:background "green")))) + '(hi-green-b ((t (:bold t :foreground "green" :weight bold)))) + '(hi-pink ((t (:background "pink")))) + '(hi-red-b ((t (:bold t :foreground "red" :weight bold)))) + '(hi-yellow ((t (:background "yellow")))) + '(highlight ((t (:background "darkseagreen2")))) + '(highlight-changes-delete-face ((t (:foreground "red" :underline t)))) + '(highlight-changes-face ((t (:foreground "red")))) + '(holiday-face ((t (:background "pink")))) + '(idlwave-help-link-face ((t (:foreground "Blue")))) + '(idlwave-shell-bp-face ((t (:background "Pink" :foreground "Black")))) + '(info-header-node ((t (:italic t :bold t :weight bold :slant italic :foreground "brown")))) + '(info-header-xref ((t (:bold t :weight bold :foreground "magenta4")))) + '(info-menu-5 ((t (:foreground "red1")))) + '(info-menu-header ((t (:bold t :weight bold)))) + '(info-node ((t (:italic t :bold t :foreground "brown" :slant italic :weight bold)))) + '(info-xref ((t (:bold t :foreground "magenta4" :weight bold)))) + '(isearch ((t (:background "magenta4" :foreground "lightskyblue1")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise")))) + '(italic ((t (:italic t :slant italic)))) + '(log-view-file-face ((t (:bold t :background "grey70" :weight bold)))) + '(log-view-message-face ((t (:background "grey85")))) + '(makefile-space-face ((t (:background "hotpink")))) + '(menu ((t (nil)))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4" :slant italic :weight bold)))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue" :weight bold)))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue" :weight bold)))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button))))) + '(mode-line-buffer-id ((t (:bold t :background "grey75" :foreground "black" :box (:line-width -1 :style released-button))))) + '(mode-line-mousable ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button))))) + '(mode-line-mousable-minor-mode ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button))))) + '(primary-selection ((t (:background "lightgoldenrod2")))) + '(reb-match-0 ((t (:background "lightblue")))) + '(reb-match-1 ((t (:background "aquamarine")))) + '(reb-match-2 ((t (:background "springgreen")))) + '(reb-match-3 ((t (:background "yellow")))) + '(region ((t (:background "lightgoldenrod2")))) + '(scroll-bar ((t (:background "grey75")))) + '(secondary-selection ((t (:background "yellow")))) + '(sh-heredoc-face ((t (:foreground "tan")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(show-tabs-space-face ((t (:foreground "yellow")))) + '(show-tabs-tab-face ((t (:foreground "red")))) + '(smerge-base-face ((t (:foreground "red")))) + '(smerge-markers-face ((t (:background "grey85")))) + '(smerge-mine-face ((t (:foreground "blue")))) + '(smerge-other-face ((t (:foreground "darkgreen")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(strokes-char-face ((t (:background "lightgray")))) + '(term-black ((t (:stipple nil :background "white" :foreground "black")))) + '(term-blackbg ((t (:stipple nil :background "black" :foreground "black")))) + '(term-blue ((t (:stipple nil :background "white" :foreground "blue")))) + '(term-bluebg ((t (:stipple nil :background "blue" :foreground "black")))) + '(term-bold ((t (:bold t :stipple nil :background "white" :foreground "black")))) + '(term-cyan ((t (:stipple nil :background "white" :foreground "cyan")))) + '(term-cyanbg ((t (:stipple nil :background "cyan" :foreground "black")))) + '(term-default ((t (:stipple nil :background "white" :foreground "black")))) + '(term-default-bg ((t (:stipple nil :foreground "black")))) + '(term-default-bg-inv ((t (:stipple nil :foreground "black")))) + '(term-default-fg ((t (:stipple nil :background "white")))) + '(term-default-fg-inv ((t (:stipple nil :background "white")))) + '(term-green ((t (:stipple nil :background "white" :foreground "green")))) + '(term-greenbg ((t (:stipple nil :background "green" :foreground "black")))) + '(term-invisible ((t (:stipple nil :foreground "black")))) + '(term-invisible-inv ((t (:stipple nil :foreground "black")))) + '(term-magenta ((t (:stipple nil :background "white" :foreground "magenta")))) + '(term-magentabg ((t (:stipple nil :background "magenta" :foreground "black")))) + '(term-red ((t (:stipple nil :background "white" :foreground "red")))) + '(term-redbg ((t (:stipple nil :background "red" :foreground "black")))) + '(term-underline ((t (:stipple nil :background "white" :foreground "black")))) + '(term-white ((t (:stipple nil :background "white" :foreground "white")))) + '(term-whitebg ((t (:stipple nil :background "white" :foreground "black")))) + '(term-yellow ((t (:stipple nil :background "white" :foreground "yellow")))) + '(term-yellowbg ((t (:stipple nil :background "yellow" :foreground "black")))) + '(tex-math-face ((t (:foreground "RosyBrown")))) + '(texinfo-heading-face ((t (:foreground "Blue")))) + '(tool-bar ((t (:background "grey75" :foreground "black" + :box (:line-width 1 :style released-button))))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(vcursor ((t (:background "cyan" :foreground "blue" :underline t)))) + '(vhdl-font-lock-attribute-face ((t (:foreground "Orchid")))) + '(vhdl-font-lock-directive-face ((t (:foreground "CadetBlue")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4")))) + '(vhdl-font-lock-function-face ((t (:foreground "Orchid4")))) + '(vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red" :weight bold)))) + '(vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange" :weight bold)))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-speedbar-architecture-face ((t (:foreground "Blue")))) + '(vhdl-speedbar-architecture-selected-face ((t (:foreground "Blue" :underline t)))) + '(vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod")))) + '(vhdl-speedbar-configuration-selected-face ((t (:foreground "DarkGoldenrod" :underline t)))) + '(vhdl-speedbar-entity-face ((t (:foreground "ForestGreen")))) + '(vhdl-speedbar-entity-selected-face ((t (:foreground "ForestGreen" :underline t)))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "Brown")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:foreground "Brown" :underline t)))) + '(vhdl-speedbar-package-face ((t (:foreground "Grey50")))) + '(vhdl-speedbar-package-selected-face ((t (:foreground "Grey50" :underline t)))) + '(viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black")))) + '(viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen")))) + '(viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-search-face ((t (:background "khaki" :foreground "Black")))) + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85")))) + '(woman-addition-face ((t (:foreground "orange")))) + '(woman-bold-face ((t (:bold t :foreground "blue" :weight bold)))) + '(woman-italic-face ((t (:italic t :foreground "red" :underline t :slant italic)))) + '(woman-unknown-face ((t (:foreground "brown")))) + '(zmacs-region ((t (:background "lightgoldenrod2")))) ) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'emacs-21) + +;;; emacs-21-theme.el ends here diff --git a/replace-colorthemes/emacs-nw-theme.el b/replace-colorthemes/emacs-nw-theme.el new file mode 100644 index 0000000..ff07a71 --- /dev/null +++ b/replace-colorthemes/emacs-nw-theme.el @@ -0,0 +1,400 @@ +;;; emacs-nw-theme.el --- emacs-nw theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of emacs-nw theme from `color-themes' + +;;; Code: + +(deftheme emacs-nw + "emacs-nw theme") + +(custom-theme-set-faces + 'emacs-nw + + '(default ((t (:background "white" :foreground "black")))) + '(mouse ((t (:background "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:background "black")))) + + '(Man-overstrike-face ((t (:bold t :weight bold)))) + '(Man-underline-face ((t (:underline t)))) + '(cperl-here-face ((t (:foreground "RosyBrown")))) + '(cperl-invalid-face ((t (:underline t)))) + '(cperl-pod-face ((t (:foreground "Firebrick")))) + '(cperl-pod-head-face ((t (:foreground "DarkGoldenrod")))) + '(gnus-article-button-face ((t (:bold t :weight bold)))) + '(gnus-article-mouse-face ((t (:background "darkseagreen2")))) + '(gnus-mouse-face ((t (:background "darkseagreen2")))) + '(help-highlight-face ((t (:underline t)))) + '(idlwave-class-arrow-face ((t (:bold t :weight bold)))) + '(idlwave-shell-breakpoint-face ((t (:background "Pink" :foreground "Black")))) + '(idlwave-shell-expression-face ((t (:background "yellow")))) + '(idlwave-shell-stop-line-face ((t (:background "darkseagreen2")))) + '(ispell-highlight-face ((t (:background "darkseagreen2")))) + '(list-matching-lines-face ((t (:bold t :weight bold)))) + '(view-highlight-face ((t (:background "darkseagreen2")))) + '(widget-mouse-face ((t (:background "darkseagreen2")))) + + '(Info-title-1-face ((t (:bold t :weight bold :family "helv" :height 1.728)))) + '(Info-title-2-face ((t (:bold t :family "helv" :weight bold :height 1.44)))) + '(Info-title-3-face ((t (:bold t :weight bold :family "helv" :height 1.2)))) + '(Info-title-4-face ((t (:bold t :family "helv" :weight bold)))) + '(antlr-font-lock-keyword-face ((t (:bold t :foreground "black" :weight bold)))) + '(antlr-font-lock-literal-face ((t (:bold t :foreground "brown4" :weight bold)))) + '(antlr-font-lock-ruledef-face ((t (:bold t :foreground "blue" :weight bold)))) + '(antlr-font-lock-ruleref-face ((t (:foreground "blue4")))) + '(antlr-font-lock-tokendef-face ((t (:bold t :foreground "blue" :weight bold)))) + '(antlr-font-lock-tokenref-face ((t (:foreground "orange4")))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :weight bold)))) + '(calendar-today-face ((t (:underline t)))) + '(change-log-acknowledgement-face ((t (:foreground "Firebrick")))) + '(change-log-conditionals-face ((t (:foreground "DarkGoldenrod")))) + '(change-log-date-face ((t (:foreground "RosyBrown")))) + '(change-log-email-face ((t (:foreground "DarkGoldenrod")))) + '(change-log-file-face ((t (:foreground "Blue")))) + '(change-log-function-face ((t (:foreground "DarkGoldenrod")))) + '(change-log-list-face ((t (:foreground "Purple")))) + '(change-log-name-face ((t (:foreground "CadetBlue")))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "dark blue")))) + '(cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue" :weight bold)))) + '(cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red" :weight bold)))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(custom-button-face ((t (:background "lightgrey" :foreground "black" + :box (:line-width 2 :style released-button))))) + '(custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" + :box (:line-width 2 :style pressed-button))))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "gray85")))) + '(custom-comment-tag-face ((t (:foreground "blue4")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:bold t :family "helv" :weight bold :height 1.2)))) + '(custom-group-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2)))) + '(custom-group-tag-face-1 ((t (:bold t :family "helv" :foreground "red" :weight bold :height 1.2)))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:bold t :underline t :weight bold)))) + '(custom-variable-tag-face ((t (:bold t :family "helv" :foreground "blue" :weight bold :height 1.2)))) + '(cvs-filename-face ((t (:foreground "blue4")))) + '(cvs-handled-face ((t (:foreground "pink")))) + '(cvs-header-face ((t (:bold t :foreground "blue4" :weight bold)))) + '(cvs-marked-face ((t (:bold t :foreground "green3" :weight bold)))) + '(cvs-msg-face ((t (:italic t)))) + '(cvs-need-action-face ((t (:foreground "orange")))) + '(cvs-unknown-face ((t (:foreground "red")))) + '(diary-face ((t (:foreground "red")))) + '(diff-added-face ((t (nil)))) + '(diff-changed-face ((t (nil)))) + '(diff-context-face ((t (:foreground "grey50")))) + '(diff-file-header-face ((t (:bold t :background "grey70" :weight bold)))) + '(diff-function-face ((t (:foreground "grey50")))) + '(diff-header-face ((t (:background "grey85")))) + '(diff-hunk-header-face ((t (:background "grey85")))) + '(diff-index-face ((t (:bold t :weight bold :background "grey70")))) + '(diff-nonexistent-face ((t (:bold t :weight bold :background "grey70")))) + '(diff-removed-face ((t (nil)))) + '(dired-face-boring ((t (:foreground "RosyBrown")))) + '(dired-face-directory ((t (:foreground "Blue")))) + '(dired-face-executable ((t (nil)))) + '(dired-face-flagged ((t (:foreground "Red" :weight bold)))) + '(dired-face-marked ((t (:foreground "Red" :weight bold)))) + '(dired-face-permissions ((t (nil)))) + '(dired-face-setuid ((t (nil)))) + '(dired-face-socket ((t (nil)))) + '(dired-face-symlink ((t (:foreground "Purple")))) + '(ebrowse-default-face ((t (nil)))) + '(ebrowse-file-name-face ((t (:italic t)))) + '(ebrowse-member-attribute-face ((t (:foreground "red")))) + '(ebrowse-member-class-face ((t (:foreground "purple")))) + '(ebrowse-progress-face ((t (:background "blue")))) + '(ebrowse-root-class-face ((t (:bold t :foreground "blue" :weight bold)))) + '(ebrowse-tree-mark-face ((t (:foreground "red")))) + '(ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick")))) + '(ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black")))) + '(ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid")))) + '(ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy")))) + '(ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black")))) + '(ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-B ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black")))) + '(ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy")))) + '(ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black")))) + '(ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black")))) + '(ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black")))) + '(ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White")))) + '(ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White")))) + '(eshell-ls-archive-face ((t (:bold t :foreground "Orchid" :weight bold)))) + '(eshell-ls-backup-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed" :weight bold)))) + '(eshell-ls-directory-face ((t (:bold t :foreground "Blue" :weight bold)))) + '(eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen" :weight bold)))) + '(eshell-ls-missing-face ((t (:bold t :foreground "Red" :weight bold)))) + '(eshell-ls-product-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-readonly-face ((t (:foreground "Brown")))) + '(eshell-ls-special-face ((t (:bold t :foreground "Magenta" :weight bold)))) + '(eshell-ls-symlink-face ((t (:bold t :foreground "Dark Cyan" :weight bold)))) + '(eshell-ls-unreadable-face ((t (:foreground "Grey30")))) + '(eshell-prompt-face ((t (:bold t :foreground "Red" :weight bold)))) + '(eshell-test-failed-face ((t (:bold t :foreground "OrangeRed" :weight bold)))) + '(eshell-test-ok-face ((t (:bold t :foreground "Green" :weight bold)))) + '(excerpt ((t (:italic t)))) + '(fixed ((t (:bold t :weight bold)))) + '(fixed-pitch ((t (:family "courier")))) + '(flyspell-duplicate-face ((t (:bold t :foreground "Gold3" :underline t :weight bold)))) + '(flyspell-incorrect-face ((t (:bold t :foreground "OrangeRed" :underline t :weight bold)))) + '(font-lock-builtin-face ((t (:foreground "Orchid")))) + '(font-lock-comment-face ((t (:foreground "Firebrick")))) + '(font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(font-lock-doc-face ((t (:foreground "RosyBrown")))) + '(font-lock-doc-string-face ((t (:foreground "RosyBrown")))) + '(font-lock-function-name-face ((t (:foreground "Blue")))) + '(font-lock-keyword-face ((t (:foreground "Purple")))) + '(font-lock-preprocessor-face ((t (:foreground "CadetBlue")))) + '(font-lock-reference-face ((t (:foreground "Orchid")))) + '(font-lock-string-face ((t (:foreground "RosyBrown")))) + '(font-lock-type-face ((t (:foreground "ForestGreen")))) + '(font-lock-variable-name-face ((t (:foreground "DarkGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red" :weight bold)))) + '(fringe ((t (:background "grey95")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t :weight bold)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t :weight bold)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :weight bold)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3" :weight bold)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3" :weight bold)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4" :weight bold)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4" :weight bold)))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen" :weight bold)))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4" :weight bold)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t :weight bold)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t :weight bold)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t :weight bold)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t :weight bold)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen" :weight bold)))) + '(gnus-header-content-face ((t (:italic t :foreground "indianred4")))) + '(gnus-header-from-face ((t (:foreground "red3")))) + '(gnus-header-name-face ((t (:foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue")))) + '(gnus-header-subject-face ((t (:foreground "red4")))) + '(gnus-signature-face ((t (:italic t)))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue" :weight bold)))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen" :weight bold)))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick" :weight bold)))) + '(gnus-summary-high-unread-face ((t (:bold t :weight bold)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(header-line ((t (:box (:line-width -1 :style released-button) :background "grey90" :foreground "grey20" :box nil)))) + '(hi-black-b ((t (:bold t :weight bold)))) + '(hi-black-hb ((t (:bold t :family "helv" :weight bold :height 1.67)))) + '(hi-blue ((t (:background "light blue")))) + '(hi-blue-b ((t (:bold t :foreground "blue" :weight bold)))) + '(hi-green ((t (:background "green")))) + '(hi-green-b ((t (:bold t :foreground "green" :weight bold)))) + '(hi-pink ((t (:background "pink")))) + '(hi-red-b ((t (:bold t :foreground "red" :weight bold)))) + '(hi-yellow ((t (:background "yellow")))) + '(highlight ((t (:background "darkseagreen2")))) + '(highlight-changes-delete-face ((t (:foreground "red" :underline t)))) + '(highlight-changes-face ((t (:foreground "red")))) + '(holiday-face ((t (:background "pink")))) + '(idlwave-help-link-face ((t (:foreground "Blue")))) + '(idlwave-shell-bp-face ((t (:background "Pink" :foreground "Black")))) + '(info-header-node ((t (:italic t :bold t :weight bold :foreground "brown")))) + '(info-header-xref ((t (:bold t :weight bold :foreground "magenta4")))) + '(info-menu-5 ((t (:foreground "red1")))) + '(info-menu-header ((t (:bold t :family "helv" :weight bold)))) + '(info-node ((t (:italic t :bold t :foreground "brown" :weight bold)))) + '(info-xref ((t (:bold t :foreground "magenta4" :weight bold)))) + '(isearch ((t (:background "magenta4" :foreground "lightskyblue1")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise")))) + '(italic ((t (:italic t)))) + '(log-view-file-face ((t (:bold t :background "grey70" :weight bold)))) + '(log-view-message-face ((t (:background "grey85")))) + '(makefile-space-face ((t (:background "hotpink")))) + '(menu ((t (:background "grey50" :foreground "white" + :box (:line-width -1 :style released-button))))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4" :weight bold)))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue" :weight bold)))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue" :weight bold)))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "grey50" :foreground "white" + :box (:line-width -1 :style released-button))))) + '(mode-line ((t (:background "grey50" :foreground "white" + :box (:line-width -1 :style released-button))))) + '(mode-line-buffer-id ((t (:bold t :background "grey75" :foreground "black" + :box (:line-width -1 :style released-button))))) + '(mode-line-mousable ((t (:background "grey75" :foreground "black" + :box (:line-width -1 :style released-button))))) + '(mode-line-mousable-minor-mode ((t (:background "grey75" :foreground "black" + :box (:line-width -1 :style released-button))))) + '(primary-selection ((t (:background "lightgoldenrod2")))) + '(reb-match-0 ((t (:background "lightblue")))) + '(reb-match-1 ((t (:background "aquamarine")))) + '(reb-match-2 ((t (:background "springgreen")))) + '(reb-match-3 ((t (:background "yellow")))) + '(region ((t (:background "lightgoldenrod2")))) + '(scroll-bar ((t (:background "grey75")))) + '(secondary-selection ((t (:background "yellow")))) + '(sh-heredoc-face ((t (:foreground "tan")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(show-tabs-space-face ((t (:foreground "yellow")))) + '(show-tabs-tab-face ((t (:foreground "red")))) + '(smerge-base-face ((t (:foreground "red")))) + '(smerge-markers-face ((t (:background "grey85")))) + '(smerge-mine-face ((t (:foreground "blue")))) + '(smerge-other-face ((t (:foreground "darkgreen")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(strokes-char-face ((t (:background "lightgray")))) + '(term-black ((t (:background "white" :foreground "black")))) + '(term-blackbg ((t (:foreground "black")))) + '(term-blue ((t (:background "white" :foreground "blue")))) + '(term-bluebg ((t (:background "blue" :foreground "black")))) + '(term-bold ((t (:bold t :background "white" :foreground "black")))) + '(term-cyan ((t (:background "white" :foreground "cyan")))) + '(term-cyanbg ((t (:background "cyan" :foreground "black")))) + '(term-default ((t (:background "white" :foreground "black")))) + '(term-default-bg ((t (:foreground "black")))) + '(term-default-bg-inv ((t (:foreground "black")))) + '(term-default-fg ((t (:background "white")))) + '(term-default-fg-inv ((t (:background "white")))) + '(term-green ((t (:background "white" :foreground "green")))) + '(term-greenbg ((t (:background "green" :foreground "black")))) + '(term-invisible ((t (:foreground "black")))) + '(term-invisible-inv ((t (:foreground "black")))) + '(term-magenta ((t (:background "white" :foreground "magenta")))) + '(term-magentabg ((t (:background "magenta" :foreground "black")))) + '(term-red ((t (:background "white" :foreground "red")))) + '(term-redbg ((t (:background "red" :foreground "black")))) + '(term-underline ((t (:background "white" :foreground "black")))) + '(term-white ((t (:background "white" :foreground "white")))) + '(term-whitebg ((t (:background "white" :foreground "black")))) + '(term-yellow ((t (:background "white" :foreground "yellow")))) + '(term-yellowbg ((t (:background "yellow" :foreground "black")))) + '(tex-math-face ((t (:foreground "RosyBrown")))) + '(texinfo-heading-face ((t (:foreground "Blue")))) + '(tool-bar ((t (:background "grey75" :foreground "black" + :box (:line-width 1 :style released-button))))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(variable-pitch ((t (:family "helv")))) + '(vcursor ((t (:background "cyan" :foreground "blue" :underline t)))) + '(vhdl-font-lock-attribute-face ((t (:foreground "Orchid")))) + '(vhdl-font-lock-directive-face ((t (:foreground "CadetBlue")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4")))) + '(vhdl-font-lock-function-face ((t (:foreground "Orchid4")))) + '(vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red" :weight bold)))) + '(vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange" :weight bold)))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-speedbar-architecture-face ((t (:foreground "Blue")))) + '(vhdl-speedbar-architecture-selected-face ((t (:foreground "Blue" :underline t)))) + '(vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod")))) + '(vhdl-speedbar-configuration-selected-face ((t (:foreground "DarkGoldenrod" :underline t)))) + '(vhdl-speedbar-entity-face ((t (:foreground "ForestGreen")))) + '(vhdl-speedbar-entity-selected-face ((t (:foreground "ForestGreen" :underline t)))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "Brown")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:foreground "Brown" :underline t)))) + '(vhdl-speedbar-package-face ((t (:foreground "Grey50")))) + '(vhdl-speedbar-package-selected-face ((t (:foreground "Grey50" :underline t)))) + '(viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black")))) + '(viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen")))) + '(viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-search-face ((t (:background "khaki" :foreground "Black")))) + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85")))) + '(woman-addition-face ((t (:foreground "orange")))) + '(woman-bold-face ((t (:bold t :foreground "blue" :weight bold)))) + '(woman-italic-face ((t (:italic t :foreground "red" :underline t)))) + '(woman-unknown-face ((t (:foreground "brown")))) + '(zmacs-region ((t (:background "lightgoldenrod2"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'emacs-nw) + +;;; emacs-nw-theme.el ends here diff --git a/replace-colorthemes/euphoria-theme.el b/replace-colorthemes/euphoria-theme.el new file mode 100644 index 0000000..0320333 --- /dev/null +++ b/replace-colorthemes/euphoria-theme.el @@ -0,0 +1,109 @@ +;;; euphoria-theme.el --- euphoria theme + +;; Copyright (C) 2000 by oGLOWo +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of euphoria theme from `color-themes' + +;;; Code: + +(deftheme euphoria + "euphoria theme") + +(custom-theme-set-faces + 'euphoria + + '(default ((t (:background "black" :foreground "#00ff00")))) + '(mouse ((t (:background "yellow")))) + '(cursor ((t (:background "yellow")))) + '(border ((t (:background "black")))) + + '(help-highlight-face ((t (:underline t)))) + '(list-matching-lines-face ((t (:bold t :weight bold)))) + '(widget-mouse-face ((t (:background "darkolivegreen")))) + + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(fixed-pitch ((t (:family "courier")))) + '(font-lock-builtin-face ((t (:foreground "magenta")))) + '(font-lock-comment-face ((t (:foreground "deeppink")))) + '(font-lock-constant-face ((t (:foreground "blue")))) + '(font-lock-doc-face ((t (:foreground "cyan")))) + '(font-lock-doc-string-face ((t (:foreground "cyan")))) + '(font-lock-function-name-face ((t (:foreground "purple")))) + '(font-lock-keyword-face ((t (:foreground "red")))) + '(font-lock-preprocessor-face ((t (:foreground "blue1")))) + '(font-lock-reference-face ((t (nil)))) + '(font-lock-string-face ((t (:foreground "cyan")))) + '(font-lock-type-face ((t (:foreground "yellow")))) + '(font-lock-variable-name-face ((t (:foreground "violet")))) + '(font-lock-warning-face ((t (:bold t :foreground "red" :weight bold)))) + '(fringe ((t (:background "gray16" :foreground "#00ff00")))) + '(header-line ((t (:box (:line-width -1 :style released-button) :background "grey20" :foreground "grey90" :box nil)))) + '(highlight ((t (:background "darkolivegreen")))) + '(horizontal-divider ((t (:background "gray16" :foreground "#00ff00")))) + '(isearch ((t (:background "palevioletred2" :foreground "brown4")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise4")))) + '(italic ((t (:italic t :slant italic)))) + '(menu ((t (:background "gray16" :foreground "green")))) + '(mode-line ((t (:background "gray16" :foreground "#00ff00" + :box (:line-width -1 :style released-button))))) + '(mode-line-buffer-id ((t (:background "gray16" :foreground "#00ff00")))) + '(mode-line-mousable ((t (:background "gray16" :foreground "#00ff00")))) + '(mode-line-mousable-minor-mode ((t (:background "gray16" :foreground "#00ff00")))) + '(primary-selection ((t (:background "#00ff00" :foreground "black")))) + '(region ((t (:background "steelblue" :foreground "white")))) + '(scroll-bar ((t (:background "gray16" :foreground "#00ff00")))) + '(secondary-selection ((t (:background "#00ff00" :foreground "black")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(speedbar-button-face ((t (:foreground "#00ff00")))) + '(speedbar-directory-face ((t (:foreground "#00ff00")))) + '(speedbar-file-face ((t (:foreground "cyan")))) + '(speedbar-highlight-face ((t (:background "#00ff00" :foreground "purple")))) + '(speedbar-selected-face ((t (:foreground "deeppink" :underline t)))) + '(speedbar-tag-face ((t (:foreground "yellow")))) + '(tool-bar ((t (:background "gray16" :foreground "green" + :box (:line-width 1 :style released-button))))) + '(tooltip ((t (:background "gray16" :foreground "#00ff00")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(variable-pitch ((t (:family "helv")))) + '(vertical-divider ((t (:background "gray16" :foreground "#00ff00")))) + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:background "dim gray")))) + '(widget-inactive-face ((t (:foreground "light gray")))) + '(widget-single-line-field-face ((t (:background "dim gray")))) + '(zmacs-region ((t (:background "steelblue" :foreground "white"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'euphoria) + +;;; euphoria-theme.el ends here diff --git a/replace-colorthemes/feng-shui-theme.el b/replace-colorthemes/feng-shui-theme.el new file mode 100644 index 0000000..44d5408 --- /dev/null +++ b/replace-colorthemes/feng-shui-theme.el @@ -0,0 +1,88 @@ +;;; feng-shui-theme.el --- feng-shui theme + +;; Copyright (C) 2003 by walterh@rocketmail.com +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of feng-shui theme from `color-themes' + +;;; Code: + +(deftheme feng-shui + "feng-shui theme") + +(custom-theme-set-faces + 'feng-shui + + '(default ((t (:background "ivory" :foreground "black")))) + '(mouse ((t (:background "slateblue")))) + '(cursor ((t (:background "slateblue" :foreground "black")))) + '(border ((t (:background "black")))) + + '(help-highlight-face ((t (:underline t)))) + '(list-matching-lines-face ((t (:bold t :weight bold)))) + '(view-highlight-face ((t (:background "mistyRose" :foreground "black")))) + '(widget-mouse-face ((t (:background "mistyRose" :foreground "black")))) + + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :weight bold)))) + '(fixed-pitch ((t (:family "courier")))) + '(font-lock-builtin-face ((t (:foreground "black")))) + '(font-lock-comment-face ((t (:italic t :background "seashell")))) + '(font-lock-constant-face ((t (:foreground "darkblue")))) + '(font-lock-doc-face ((t (:background "lemonChiffon")))) + '(font-lock-function-name-face ((t (:bold t :underline t :weight bold)))) + '(font-lock-keyword-face ((t (:foreground "blue")))) + '(font-lock-string-face ((t (:background "lemonChiffon")))) + '(font-lock-type-face ((t (:foreground "black")))) + '(font-lock-variable-name-face ((t (:foreground "black")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red" :weight bold)))) + '(fringe ((t (:background "grey95")))) + '(header-line ((t (:bold t :weight bold :underline t :background "grey90" :foreground "grey20")))) + '(highlight ((t (:background "mistyRose" :foreground "black")))) + '(isearch ((t (:background "magenta4" :foreground "lightskyblue1")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise")))) + '(italic ((t (:italic t)))) + '(menu ((t (nil)))) + '(mode-line ((t (:bold t :background "mistyRose" :foreground "navy" :underline t :weight bold)))) + '(region ((t (:background "lavender" :foreground "black")))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "yellow")))) + '(tool-bar ((t (:background "grey75" :foreground "black" + :box (:line-width 1 :style released-button))))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(variable-pitch ((t (:family "helv")))) + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'feng-shui) + +;;; feng-shui-theme.el ends here diff --git a/replace-colorthemes/fischmeister-theme.el b/replace-colorthemes/fischmeister-theme.el new file mode 100644 index 0000000..427c78e --- /dev/null +++ b/replace-colorthemes/fischmeister-theme.el @@ -0,0 +1,72 @@ +;;; fischmeister-theme.el --- fischmeister theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of fischmeister theme from `color-themes' + +;;; Code: + +(deftheme fischmeister + "fischmeister theme") + +(custom-theme-set-faces + 'fischmeister + + '(default ((t (:background "gray80" :foreground "black")))) + '(mouse ((t (:foreground "red")))) + '(cursor ((t (:background "yellow")))) + '(border ((t (:foreground "black")))) + + '(mode-line ((t (:foreground "gray80" :background "black")))) + '(mode-line-buffer-id ((t (:foreground "gray80" :background "black")))) + '(mode-line-mousable ((t (:foreground "gray80" :background "black")))) + '(mode-line-mousable-minor-mode ((t (:foreground "gray80" :background "black")))) + '(highlight ((t (:background "darkseagreen2")))) + '(bold ((t (:bold t)))) + '(italic ((t (:italic t)))) + '(bold-italic ((t (:bold t :italic t)))) + '(region ((t (:background "gray")))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(underline ((t (:underline t)))) + '(show-paren-match-face ((t (:foreground "yellow" :background "darkgreen")))) + '(show-paren-mismatch-face ((t (:foreground "white" :background "red")))) + '(font-lock-comment-face ((t (:foreground "FireBrick" :bold t :italic t)))) + '(font-lock-string-face ((t (:foreground "DarkSlateBlue" :italic t)))) + '(font-lock-keyword-face ((t (:foreground "navy")))) + '(font-lock-builtin-face ((t (:foreground "white")))) + '(font-lock-function-name-face ((t (:foreground "Blue")))) + '(font-lock-variable-name-face ((t (:foreground "Darkblue")))) + '(font-lock-type-face ((t (:foreground "darkgreen")))) + '(font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(font-lock-warning-face ((t (:foreground "Orchid" :bold t)))) + '(font-lock-reference-face ((t (:foreground "SteelBlue"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'fischmeister) + +;;; fischmeister-theme.el ends here diff --git a/replace-colorthemes/gnome-theme.el b/replace-colorthemes/gnome-theme.el new file mode 100644 index 0000000..87c63b7 --- /dev/null +++ b/replace-colorthemes/gnome-theme.el @@ -0,0 +1,56 @@ +;;; gnome-theme.el --- gnome theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of gnome theme from `color-themes' + +;;; Code: + +(deftheme gnome + "gnome theme") + +(custom-theme-set-faces + 'gnome + + '(default ((t (:background "darkslategrey" :foreground "wheat")))) + + '(region ((t (:foreground "cyan" :background "dark cyan")))) + '(underline ((t (:foreground "yellow" :underline t)))) + '(mode-line ((t (:foreground "dark cyan" :background "wheat")))) + '(mode-line-buffer-id ((t (:foreground "dark cyan" :background "wheat")))) + '(mode-line-mousable ((t (:foreground "dark cyan" :background "wheat")))) + '(mode-line-mousable-minor-mode ((t (:foreground "dark cyan" :background "wheat")))) + '(italic ((t (:foreground "dark red" :italic t)))) + '(bold-italic ((t (:foreground "dark red" :bold t :italic t)))) + '(font-lock-comment-face ((t (:foreground "Firebrick")))) + '(bold ((t (:bold))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'gnome) + +;;; gnome-theme.el ends here diff --git a/replace-colorthemes/gnome2-theme.el b/replace-colorthemes/gnome2-theme.el new file mode 100644 index 0000000..eb12571 --- /dev/null +++ b/replace-colorthemes/gnome2-theme.el @@ -0,0 +1,105 @@ +;;; gnome2-theme.el --- gnome2 theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of gnome2 theme from `color-themes' + +;;; Code: + +(deftheme gnome2 + "gnome2 theme") + +(custom-theme-set-faces + 'gnome2 + + '(default ((t (:foreground "wheat" :background "darkslategrey")))) + + '(mouse ((t (:foreground "Grey")))) + '(cursor ((t (:background "LightGray")))) + '(border ((t (:foreground "black")))) + + '(bbdb-company ((t (:foreground "pale green")))) + '(bbdb-name ((t (:bold t :foreground "pale green")))) + '(bbdb-field-name ((t (:foreground "medium sea green")))) + '(bbdb-field-value ((t (:foreground "dark sea green")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t :foreground "beige")))) + '(calendar-today-face ((t (:underline t)))) + '(comint-highlight-prompt ((t (:foreground "medium aquamarine")))) + '(cperl-array-face ((t (:foreground "Yellow")))) + '(cperl-hash-face ((t (:foreground "White")))) + '(cperl-nonoverridable-face ((t (:foreground "SkyBlue")))) + '(custom-button-face ((t (:underline t :foreground "MediumSlateBlue")))) + '(custom-documentation-face ((t (:foreground "Grey")))) + '(custom-group-tag-face ((t (:foreground "MediumAquamarine")))) + '(custom-state-face ((t (:foreground "LightSalmon")))) + '(custom-variable-tag-face ((t (:foreground "Aquamarine")))) + '(diary-face ((t (:foreground "IndianRed")))) + '(dired-face-directory ((t (:bold t :foreground "sky blue")))) + '(dired-face-permissions ((t (:foreground "aquamarine")))) + '(dired-face-flagged ((t (:foreground "tomato")))) + '(dired-face-marked ((t (:foreground "light salmon")))) + '(dired-face-executable ((t (:foreground "green yellow")))) + '(fringe ((t (:background "darkslategrey")))) + '(highlight ((t (:background "PaleGreen" :foreground "DarkGreen")))) + '(highline-face ((t (:background "SeaGreen")))) + '(holiday-face ((t (:background "DimGray")))) + '(hyper-apropos-hyperlink ((t (:bold t :foreground "DodgerBlue1")))) + '(hyper-apropos-documentation ((t (:foreground "LightSalmon")))) + '(info-header-xref ((t (:foreground "DodgerBlue1" :bold t)))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:underline t :bold t :foreground "DodgerBlue1")))) + '(info-xref ((t (:bold t :foreground "DodgerBlue1")))) + '(isearch ((t (:background "sea green")))) + '(italic ((t (:italic t)))) + '(menu ((t (:foreground "wheat" :background "darkslategrey")))) + '(mode-line ((t (:background "dark olive green" :foreground "wheat")))) + '(mode-line-buffer-id ((t (:background "dark olive green" :foreground "beige")))) + '(mode-line-mousable ((t (:background "dark olive green" :foreground "yellow green")))) + '(mode-line-mousable-minor-mode ((t (:background "dark olive green" :foreground "wheat")))) + '(region ((t (:background "dark cyan" :foreground "cyan")))) + '(secondary-selection ((t (:background "Aquamarine" :foreground "SlateBlue")))) + '(show-paren-match-face ((t (:bold t :background "Aquamarine" :foreground "steel blue")))) + '(show-paren-mismatch-face ((t (:background "Red" :foreground "White")))) + '(underline ((t (:underline t)))) + '(widget-field-face ((t (:foreground "LightBlue")))) + '(widget-inactive-face ((t (:foreground "DimGray")))) + '(widget-single-line-field-face ((t (:foreground "LightBlue")))) + '(w3m-anchor-face ((t (:bold t :foreground "DodgerBlue1")))) + '(w3m-arrived-anchor-face ((t (:bold t :foreground "DodgerBlue3")))) + '(w3m-header-line-location-title-face ((t (:foreground "beige" :background "dark olive green")))) + '(w3m-header-line-location-content-face ((t (:foreground "wheat" :background "dark olive green")))) + '(woman-bold-face ((t (:bold t)))) + '(woman-italic-face ((t (:foreground "beige")))) + '(woman-unknown-face ((t (:foreground "LightSalmon")))) + '(zmacs-region ((t (:background "dark cyan" :foreground "cyan"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'gnome2) + +;;; gnome2-theme.el ends here diff --git a/replace-colorthemes/goldenrod-theme.el b/replace-colorthemes/goldenrod-theme.el new file mode 100644 index 0000000..2ba0e54 --- /dev/null +++ b/replace-colorthemes/goldenrod-theme.el @@ -0,0 +1,165 @@ +;;; goldenrod-theme.el --- goldenrod theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of goldenrod theme from `color-themes' + +;;; Code: + +(deftheme goldenrod + "goldenrod theme") + +(custom-theme-set-faces + 'goldenrod + + '(default ((t (:background "black" :foreground "goldenrod")))) + '(mouse ((t (:foreground "goldenrod")))) + '(cursor ((t (:background "light goldenrod")))) + '(border ((t (:foreground "black")))) + + '(erc-action-face ((t (nil)))) + '(erc-bold-face ((t (:bold t)))) + '(erc-current-nick-face ((t (:bold t :foreground "yellow")))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "pale green")))) + '(erc-error-face ((t (:bold t :foreground "IndianRed")))) + '(erc-highlight-face ((t (:bold t :foreground "pale green")))) + '(erc-input-face ((t (:foreground "light blue")))) + '(erc-inverse-face ((t (:background "steel blue")))) + '(erc-keyword-face ((t (:foreground "orange" :bold t)))) + '(erc-notice-face ((t (:foreground "light salmon")))) + '(erc-notice-face ((t (:foreground "MediumAquamarine")))) + '(erc-pal-face ((t (:foreground "pale green")))) + '(erc-prompt-face ((t (:foreground "light blue" :bold t)))) + '(fg:erc-color-face0 ((t (:foreground "white")))) + '(fg:erc-color-face1 ((t (:foreground "beige")))) + '(fg:erc-color-face2 ((t (:foreground "lemon chiffon")))) + '(fg:erc-color-face3 ((t (:foreground "light cyan")))) + '(fg:erc-color-face4 ((t (:foreground "powder blue")))) + '(fg:erc-color-face5 ((t (:foreground "sky blue")))) + '(fg:erc-color-face6 ((t (:foreground "dark sea green")))) + '(fg:erc-color-face7 ((t (:foreground "pale green")))) + '(fg:erc-color-face8 ((t (:foreground "medium spring green")))) + '(fg:erc-color-face9 ((t (:foreground "khaki")))) + '(fg:erc-color-face10 ((t (:foreground "pale goldenrod")))) + '(fg:erc-color-face11 ((t (:foreground "light goldenrod yellow")))) + '(fg:erc-color-face12 ((t (:foreground "light yellow")))) + '(fg:erc-color-face13 ((t (:foreground "yellow")))) + '(fg:erc-color-face14 ((t (:foreground "light goldenrod")))) + '(fg:erc-color-face15 ((t (:foreground "lime green")))) + '(bg:erc-color-face0 ((t (nil)))) + '(bg:erc-color-face1 ((t (nil)))) + '(bg:erc-color-face2 ((t (nil)))) + '(bg:erc-color-face3 ((t (nil)))) + '(bg:erc-color-face4 ((t (nil)))) + '(bg:erc-color-face5 ((t (nil)))) + '(bg:erc-color-face6 ((t (nil)))) + '(bg:erc-color-face7 ((t (nil)))) + '(bg:erc-color-face8 ((t (nil)))) + '(bg:erc-color-face9 ((t (nil)))) + '(bg:erc-color-face10 ((t (nil)))) + '(bg:erc-color-face11 ((t (nil)))) + '(bg:erc-color-face12 ((t (nil)))) + '(bg:erc-color-face13 ((t (nil)))) + '(bg:erc-color-face14 ((t (nil)))) + '(bg:erc-color-face15 ((t (nil)))) + + '(ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick")))) + '(ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black")))) + '(ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid")))) + '(ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy")))) + '(ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black")))) + '(ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-B ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black")))) + '(ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy")))) + '(ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black")))) + '(ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black")))) + '(ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black")))) + '(ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White")))) + '(ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White")))) + + '(eshell-ls-archive-face ((t (:bold t :foreground "IndianRed")))) + '(eshell-ls-backup-face ((t (:foreground "Grey")))) + '(eshell-ls-clutter-face ((t (:foreground "DimGray")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "dark khaki")))) + '(eshell-ls-executable-face ((t (:foreground "Coral")))) + '(eshell-ls-missing-face ((t (:foreground "black")))) + '(eshell-ls-picture-face ((t (:foreground "gold")))) ; non-standard face + '(eshell-ls-product-face ((t (:foreground "dark sea green")))) + '(eshell-ls-readonly-face ((t (:foreground "light steel blue")))) + '(eshell-ls-special-face ((t (:foreground "gold")))) + '(eshell-ls-symlink-face ((t (:foreground "peach puff")))) + '(eshell-ls-text-face ((t (:foreground "moccasin")))) ; non-standard face + '(eshell-ls-todo-face ((t (:bold t :foreground "yellow green")))) ; non-standard face + '(eshell-ls-unreadable-face ((t (:foreground "DimGray")))) + '(eshell-prompt-face ((t (:foreground "lemon chiffon")))) + + '(goto-address-mail-face ((t (:bold t :foreground "pale goldenrod")))) + '(list-matching-lines-face ((t (:bold t)))) + '(view-highlight-face ((t (:background "dark slate blue")))) + + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t :foreground "lavender")))) + '(font-lock-builtin-face ((t (:foreground "pale goldenrod")))) + '(font-lock-comment-face ((t (:foreground "indian red")))) + '(font-lock-constant-face ((t (:foreground "pale green")))) + '(font-lock-function-name-face ((t (:bold t :foreground "lemon chiffon")))) + '(font-lock-keyword-face ((t (:foreground "wheat")))) + '(font-lock-string-face ((t (:foreground "gold")))) + '(font-lock-type-face ((t (:foreground "dark khaki" :bold t)))) + '(font-lock-variable-name-face ((t (:bold t :foreground "khaki")))) + '(font-lock-warning-face ((t (:bold t :foreground "orange red")))) + '(fringe ((t (:background "gray25")))) + '(header-line ((t (:background "gray20" :foreground "gray70")))) + '(highlight ((t (:background "dark slate blue")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:bold t)))) + '(info-xref ((t (:bold t :foreground "pale goldenrod")))) + '(isearch ((t (:background "SeaGreen4")))) + '(isearch-lazy-highlight-face ((t (:background "DarkOliveGreen4")))) + '(italic ((t (:italic t :foreground "lavender")))) + '(menu ((t (:background "gray25" :foreground "lemon chiffon")))) + '(mode-line ((t (:background "gray40" :foreground "lemon chiffon" + :box (:line-width 1 :style released-button))))) + '(mode-line-buffer-id ((t (:background "AntiqueWhite4" :foreground "lemon chiffon")))) + '(mode-line-mousable ((t (:background "AntiqueWhite4" :foreground "lemon chiffon")))) + '(mode-line-mousable-minor-mode ((t (:background "wheat" :foreground "lemon chiffon")))) + '(mode-line-inactive ((t (:background "gray20" :foreground "lemon chiffon")))) + '(region ((t (:background "dark olive green")))) + '(secondary-selection ((t (:background "dark green")))) + '(tool-bar ((t (:background "gray25" :foreground "lemon chiffon" + :box (:line-width 1 :style released-button))))) + '(underline ((t (:underline t))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'goldenrod) + +;;; goldenrod-theme.el ends here diff --git a/replace-colorthemes/gray1-theme.el b/replace-colorthemes/gray1-theme.el new file mode 100644 index 0000000..862d783 --- /dev/null +++ b/replace-colorthemes/gray1-theme.el @@ -0,0 +1,98 @@ +;;; gray1-theme.el --- gray1 theme + +;; Copyright (C) 2001 by Paul Pulli +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of gray1 theme from `color-themes' + +;;; Code: + +(deftheme gray1 + "gray1 theme") + +(custom-theme-set-faces + 'gray1 + + '(default ((t (:background "darkgray" :foreground "black")))) + '(cursor ((t (:background "Yellow")))) + '(border ((t (:foreground "black")))) + + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(border-glyph ((t (nil)))) + '(cperl-here-face ((t (:background "gray68" :foreground "DeepPink")))) + '(font-lock-builtin-face ((t (:bold t :foreground "red3")))) + '(font-lock-comment-face ((t (:foreground "gray50")))) + '(font-lock-constant-face ((t (:bold t :foreground "blue3")))) + '(font-lock-doc-string-face ((t (:foreground "black")))) + '(font-lock-function-name-face ((t (:bold t :foreground "DeepPink3")))) + '(font-lock-keyword-face ((t (:bold t :foreground "red")))) + '(font-lock-other-type-face ((t (:bold t :foreground "green4")))) + '(font-lock-preprocessor-face ((t (:bold t :foreground "blue3")))) + '(font-lock-reference-face ((t (:bold t :foreground "red3")))) + '(font-lock-string-face ((t (:foreground "red")))) + '(font-lock-type-face ((t (:bold t :foreground "white")))) + '(font-lock-variable-name-face ((t (:bold t :foreground "blue3")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(green ((t (:foreground "green4")))) + '(gui-button-face ((t (:background "black" :foreground "red")))) + '(gui-element ((t (:background "gray58")))) + '(highlight ((t (:background "magenta" :foreground "yellow")))) + '(isearch ((t (:background "red" :foreground "yellow")))) + '(italic ((t (:italic t)))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:background "gray90" :foreground "purple")))) + '(m4-face ((t (:background "gray90" :foreground "orange3")))) + '(message-cited-text ((t (nil)))) + '(message-header-contents ((t (nil)))) + '(message-headers ((t (nil)))) + '(message-highlighted-header-contents ((t (nil)))) + '(mode-line ((t (:background "#aa80aa" :foreground "White")))) + '(mode-line-buffer-id ((t (:background "#aa80aa" :foreground "linen")))) + '(mode-line-mousable ((t (:background "#aa80aa" :foreground "cyan")))) + '(mode-line-mousable-minor-mode ((t (:background "#aa80aa" :foreground "yellow")))) + '(paren-blink-off ((t (:foreground "gray58")))) + '(paren-blink-on ((t (:foreground "purple")))) + '(paren-match ((t (:background "gray68" :foreground "white")))) + '(paren-mismatch ((t (:background "DeepPink" :foreground "black")))) + '(pointer ((t (nil)))) + '(primary-selection ((t (:background "gray")))) + '(red ((t (:foreground "red")))) + '(right-margin ((t (nil)))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(text-cursor ((t (:background "Yellow" :foreground "darkgray")))) + '(toolbar ((t (:background "#aa80aa" :foreground "linen")))) + '(underline ((t (:underline t)))) + '(vertical-divider ((t (nil)))) + '(x-face ((t (:background "black" :foreground "lavenderblush")))) + '(yellow ((t (:foreground "yellow3")))) + '(zmacs-region ((t (:background "paleturquoise" :foreground "black"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'gray1) + +;;; gray1-theme.el ends here diff --git a/replace-colorthemes/gray30-theme.el b/replace-colorthemes/gray30-theme.el new file mode 100644 index 0000000..e2101eb --- /dev/null +++ b/replace-colorthemes/gray30-theme.el @@ -0,0 +1,200 @@ +;;; gray30-theme.el --- gray30 theme + +;; Copyright (C) 2002 by Girish Bharadwaj +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of gray30 theme from `color-themes' + +;;; Code: + +(deftheme gray30 + "gray30 theme") + +(custom-theme-set-faces + 'gray30 + + '(default ((t (:background "gray30" :foreground "gainsboro")))) + '(mouse ((t (:background "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:background "black")))) + + '(help-highlight-face ((t (:underline t)))) + '(list-matching-lines-face ((t (:bold t :weight bold)))) + '(widget-mouse-face ((t (:background "darkolivegreen")))) + + '(bg:erc-color-face0 ((t (:background "White")))) + '(bg:erc-color-face1 ((t (:background "black")))) + '(bg:erc-color-face10 ((t (:background "lightblue1")))) + '(bg:erc-color-face11 ((t (:background "cyan")))) + '(bg:erc-color-face12 ((t (:background "blue")))) + '(bg:erc-color-face13 ((t (:background "deeppink")))) + '(bg:erc-color-face14 ((t (:background "gray50")))) + '(bg:erc-color-face15 ((t (:background "gray90")))) + '(bg:erc-color-face2 ((t (:background "blue4")))) + '(bg:erc-color-face3 ((t (:background "green4")))) + '(bg:erc-color-face4 ((t (:background "red")))) + '(bg:erc-color-face5 ((t (:background "brown")))) + '(bg:erc-color-face6 ((t (:background "purple")))) + '(bg:erc-color-face7 ((t (:background "orange")))) + '(bg:erc-color-face8 ((t (:background "yellow")))) + '(bg:erc-color-face9 ((t (:background "green")))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(button ((t (:underline t)))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(custom-button-face ((t (:background "lightgrey" :foreground "black" + :box (:line-width 2 :style released-button))))) + '(custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" + :box (:line-width 2 :style pressed-button))))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "dim gray")))) + '(custom-comment-tag-face ((t (:foreground "gray80")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:bold t :weight bold :height 1.2)))) + '(custom-group-tag-face ((t (:bold t :foreground "light blue" :weight bold :height 1.2)))) + '(custom-group-tag-face-1 ((t (:bold t :foreground "pink" :weight bold :height 1.2)))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "lime green")))) + '(custom-variable-button-face ((t (:bold t :underline t :weight bold)))) + '(custom-variable-tag-face ((t (:bold t :foreground "light blue" :weight bold :height 1.2)))) + '(erc-action-face ((t (:bold t :weight bold)))) + '(erc-bold-face ((t (:bold t :weight bold)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "IndianRed")))) + '(erc-error-face ((t (:background "Red" :foreground "White")))) + '(erc-input-face ((t (:foreground "brown")))) + '(erc-inverse-face ((t (:background "Black" :foreground "White")))) + '(erc-notice-face ((t (:bold t :foreground "SlateBlue" :weight bold)))) + '(erc-prompt-face ((t (:bold t :background "lightBlue2" :foreground "Black" :weight bold)))) + '(erc-timestamp-face ((t (:bold t :foreground "green" :weight bold)))) + '(erc-underline-face ((t (:underline t)))) + '(eshell-ls-archive-face ((t (:bold t :foreground "Orchid" :weight bold)))) + '(eshell-ls-backup-face ((t (:foreground "LightSalmon")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed" :weight bold)))) + '(eshell-ls-directory-face ((t (:bold t :foreground "SkyBlue" :weight bold)))) + '(eshell-ls-executable-face ((t (:bold t :foreground "Green" :weight bold)))) + '(eshell-ls-missing-face ((t (:bold t :foreground "Red" :weight bold)))) + '(eshell-ls-product-face ((t (:foreground "LightSalmon")))) + '(eshell-ls-readonly-face ((t (:foreground "Pink")))) + '(eshell-ls-special-face ((t (:bold t :foreground "Magenta" :weight bold)))) + '(eshell-ls-symlink-face ((t (:bold t :foreground "Cyan" :weight bold)))) + '(eshell-ls-unreadable-face ((t (:foreground "DarkGrey")))) + '(fg:erc-color-face0 ((t (:foreground "White")))) + '(fg:erc-color-face1 ((t (:foreground "black")))) + '(fg:erc-color-face10 ((t (:foreground "lightblue1")))) + '(fg:erc-color-face11 ((t (:foreground "cyan")))) + '(fg:erc-color-face12 ((t (:foreground "blue")))) + '(fg:erc-color-face13 ((t (:foreground "deeppink")))) + '(fg:erc-color-face14 ((t (:foreground "gray50")))) + '(fg:erc-color-face15 ((t (:foreground "gray90")))) + '(fg:erc-color-face2 ((t (:foreground "blue4")))) + '(fg:erc-color-face3 ((t (:foreground "green4")))) + '(fg:erc-color-face4 ((t (:foreground "red")))) + '(fg:erc-color-face5 ((t (:foreground "brown")))) + '(fg:erc-color-face6 ((t (:foreground "purple")))) + '(fg:erc-color-face7 ((t (:foreground "orange")))) + '(fg:erc-color-face8 ((t (:foreground "yellow")))) + '(fg:erc-color-face9 ((t (:foreground "green")))) + + '(font-lock-builtin-face ((t (:foreground "LightSkyBlue" :underline t)))) + '(font-lock-comment-face ((t (:italic t :foreground "lightgreen" :slant oblique)))) + '(font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(font-lock-function-name-face ((t (:bold t :foreground "DodgerBlue" :weight bold :height 1.05)))) + '(font-lock-keyword-face ((t (:foreground "LightPink" :height 1.05)))) + '(font-lock-string-face ((t (:foreground "LightSalmon")))) + '(font-lock-type-face ((t (:foreground "yellow" :height 1.05)))) + '(font-lock-variable-name-face ((t (:foreground "gold")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink" :weight bold)))) + '(fringe ((t (:background "grey10")))) + '(header-line ((t (:box (:line-width -1 :style released-button) :background "grey20" :foreground "grey90" :box nil)))) + '(highlight ((t (:background "darkolivegreen")))) + '(isearch ((t (:background "palevioletred2" :foreground "brown4")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise4")))) + '(italic ((t (:italic t :slant italic)))) + '(jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan")))) + '(jde-db-active-breakpoint-face ((t (:background "red" :foreground "black")))) + '(jde-db-requested-breakpoint-face ((t (:background "yellow" :foreground "black")))) + '(jde-db-spec-breakpoint-face ((t (:background "green" :foreground "black")))) + '(jde-java-font-lock-api-face ((t (:foreground "light goldenrod")))) + '(jde-java-font-lock-bold-face ((t (:bold t :weight bold)))) + '(jde-java-font-lock-code-face ((t (nil)))) + '(jde-java-font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(jde-java-font-lock-doc-tag-face ((t (:foreground "light coral")))) + '(jde-java-font-lock-italic-face ((t (:italic t :slant italic)))) + '(jde-java-font-lock-link-face ((t (:foreground "cadetblue" :underline t :slant normal)))) + '(jde-java-font-lock-modifier-face ((t (:foreground "LightSteelBlue")))) + '(jde-java-font-lock-number-face ((t (:foreground "LightSalmon")))) + '(jde-java-font-lock-operator-face ((t (:foreground "medium blue")))) + '(jde-java-font-lock-package-face ((t (:foreground "steelblue1")))) + '(jde-java-font-lock-pre-face ((t (nil)))) + '(jde-java-font-lock-underline-face ((t (:underline t)))) + '(menu ((t (nil)))) + '(minibuffer-prompt ((t (:foreground "cyan")))) + '(mode-line ((t (:background "grey75" :foreground "black" + :box (:line-width -1 :style released-button))))) + '(mode-line-inactive ((t (:background "grey30" :foreground "grey80" :weight light + :box (:line-width -1 :color "grey40" :style nil))))) + '(primary-selection ((t (:background "blue3")))) + '(region ((t (:background "blue3")))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "SkyBlue4")))) + '(semantic-dirty-token-face ((t (:background "lightyellow")))) + '(semantic-unmatched-syntax-face ((t (:underline "red")))) + '(senator-intangible-face ((t (:foreground "gray75")))) + '(senator-momentary-highlight-face ((t (:background "gray30")))) + '(senator-read-only-face ((t (:background "#664444")))) + '(show-paren-match-face ((t (:background "steelblue3")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(speedbar-button-face ((t (:foreground "green3")))) + '(speedbar-directory-face ((t (:foreground "light blue")))) + '(speedbar-file-face ((t (:foreground "cyan")))) + '(speedbar-highlight-face ((t (:background "sea green")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-tag-face ((t (:foreground "yellow")))) + '(template-message-face ((t (:bold t :weight bold)))) + '(tool-bar ((t (:background "grey75" :foreground "black" + :box (:line-width 1 :style released-button))))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:background "dim gray")))) + '(widget-inactive-face ((t (:foreground "light gray")))) + '(widget-single-line-field-face ((t (:background "dim gray")))) + '(zmacs-region ((t (:background "blue3"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'gray30) + +;;; gray30-theme.el ends here diff --git a/replace-colorthemes/greiner-theme.el b/replace-colorthemes/greiner-theme.el new file mode 100644 index 0000000..ca4035c --- /dev/null +++ b/replace-colorthemes/greiner-theme.el @@ -0,0 +1,100 @@ +;;; greiner-theme.el --- greiner theme + +;; Copyright (C) 2000 by Kevin Greiner +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of greiner theme from `color-themes' + +;;; Code: + +(deftheme greiner + "greiner theme") + +(custom-theme-set-faces + 'greiner + + '(default ((t (:background "beige" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:foreground "black")))) + '(default ((t (nil)))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(list-matching-lines-face ((t (:bold t)))) + '(custom-button-face ((t (nil)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :foreground "blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "red")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :foreground "blue")))) + '(font-lock-builtin-face ((t (:foreground "blue4")))) + '(font-lock-comment-face ((t (:foreground "Firebrick")))) + '(font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(font-lock-function-name-face ((t (:foreground "Blue")))) + '(font-lock-keyword-face ((t (:foreground "royal blue")))) + '(font-lock-string-face ((t (:foreground "RosyBrown")))) + '(font-lock-type-face ((t (:foreground "ForestGreen")))) + '(font-lock-variable-name-face ((t (:foreground "DarkGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(highlight ((t (:background "darkseagreen2")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:italic t :bold t)))) + '(info-xref ((t (:bold t)))) + '(italic ((t (:italic t)))) + '(mode-line ((t (:background "black" :foreground "white")))) + '(mode-line-mousable-minor-mode ((t (:background "black" :foreground "white")))) + '(mode-line-mousable ((t (:background "black" :foreground "white")))) + '(mode-line-buffer-id ((t (:background "black" :foreground "white")))) + '(region ((t (:background "gray")))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:underline t :foreground "red")))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(underline ((t (:underline t)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'greiner) + +;;; greiner-theme.el ends here diff --git a/replace-colorthemes/gtk-ide-theme.el b/replace-colorthemes/gtk-ide-theme.el new file mode 100644 index 0000000..77e31cf --- /dev/null +++ b/replace-colorthemes/gtk-ide-theme.el @@ -0,0 +1,63 @@ +;;; gtk-ide-theme.el --- gtk-ide theme + +;; Copyright (C) 2000 by Gordon Messmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of gtk-ide theme from `color-themes' + +;;; Code: + +(deftheme gtk-ide + "gtk-ide theme") + +(custom-theme-set-faces + 'gtk-ide + + '(default ((t (:background "white" :foreground "black")))) + '(mouse ((t (:foreground "grey15")))) + '(cursor ((t (:background "grey15")))) + + '(font-lock-comment-face ((t (:italic t :foreground "grey55")))) + '(font-lock-string-face ((t (:foreground "DarkRed")))) + '(font-lock-keyword-face ((t (:foreground "DarkBlue")))) + '(font-lock-warning-face ((t (:bold t :foreground "VioletRed")))) + '(font-lock-constant-face ((t (:foreground "OliveDrab")))) + '(font-lock-type-face ((t (:foreground "SteelBlue4")))) + '(font-lock-variable-name-face ((t (:foreground "DarkGoldenrod")))) + '(font-lock-function-name-face ((t (:foreground "SlateBlue")))) + '(font-lock-builtin-face ((t (:foreground "ForestGreen")))) + '(highline-face ((t (:background "grey95")))) + '(show-paren-match-face ((t (:background "grey80")))) + '(region ((t (:background "grey80")))) + '(highlight ((t (:background "LightSkyBlue")))) + '(secondary-selection ((t (:background "grey55")))) + '(widget-field-face ((t (:background "navy")))) + '(widget-single-line-field-face ((t (:background "royalblue"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'gtk-ide) + +;;; gtk-ide-theme.el ends here diff --git a/replace-colorthemes/high-contrast-theme.el b/replace-colorthemes/high-contrast-theme.el new file mode 100644 index 0000000..e57f4b3 --- /dev/null +++ b/replace-colorthemes/high-contrast-theme.el @@ -0,0 +1,271 @@ +;;; high-contrast-theme.el --- high-contrast theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of high-contrast theme from `color-themes' + +;;; Code: + +(deftheme high-contrast + "high-contrast theme") + +(custom-theme-set-faces + 'high-contrast + + '(default ((t (:background "white" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "red")))) + '(border ((t (:foreground "black")))) + + '(Man-overstrike-face ((t (:bold t)))) + '(Man-underline-face ((t (:underline t)))) + '(apropos-keybinding-face ((t (:underline t)))) + '(apropos-label-face ((t (:italic t)))) + '(apropos-match-face ((t (:background "paleturquoise")))) + '(apropos-property-face ((t (:bold t :italic t)))) + '(apropos-symbol-face ((t (:bold t)))) + '(goto-address-mail-face ((t (:italic t)))) + '(goto-address-mail-mouse-face ((t (:background "paleturquoise")))) + '(goto-address-url-face ((t (:bold t)))) + '(goto-address-url-mouse-face ((t (:background "darkseagreen2")))) + '(help-highlight-face ((t (:underline t)))) + '(list-matching-lines-face ((t (:bold t)))) + '(view-highlight-face ((t (:background "darkseagreen2")))) + '(bold ((t (:bold t :underline t)))) + '(bold-italic ((t (:bold t :underline t)))) + '(calendar-today-face ((t (:underline t)))) + '(cperl-array-face ((t (:foreground "Blue" :background "lightyellow2" :bold t)))) + '(cperl-hash-face ((t (:foreground "Red" :background "lightyellow2" :bold t :italic t)))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(custom-button-face ((t (nil)))) + '(custom-changed-face ((t (:foreground "white" :background "blue")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:foreground "blue" :underline t)))) + '(custom-group-tag-face-1 ((t (:foreground "red" :underline t)))) + '(custom-invalid-face ((t (:foreground "yellow" :background "red")))) + '(custom-modified-face ((t (:foreground "white" :background "blue")))) + '(custom-rogue-face ((t (:foreground "pink" :background "black")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:foreground "blue" :background "white")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:bold t :underline t)))) + '(custom-variable-tag-face ((t (:foreground "blue" :underline t)))) + '(diary-face ((t (:foreground "red")))) + '(ediff-current-diff-face-A ((t (:foreground "firebrick" :background "pale green")))) + '(ediff-current-diff-face-Ancestor ((t (:foreground "Black" :background "VioletRed")))) + '(ediff-current-diff-face-B ((t (:foreground "DarkOrchid" :background "Yellow")))) + '(ediff-current-diff-face-C ((t (:foreground "Navy" :background "Pink")))) + '(ediff-even-diff-face-A ((t (:foreground "Black" :background "light grey")))) + '(ediff-even-diff-face-Ancestor ((t (:foreground "White" :background "Grey")))) + '(ediff-even-diff-face-B ((t (:foreground "White" :background "Grey")))) + '(ediff-even-diff-face-C ((t (:foreground "Black" :background "light grey")))) + '(ediff-fine-diff-face-A ((t (:foreground "Navy" :background "sky blue")))) + '(ediff-fine-diff-face-Ancestor ((t (:foreground "Black" :background "Green")))) + '(ediff-fine-diff-face-B ((t (:foreground "Black" :background "cyan")))) + '(ediff-fine-diff-face-C ((t (:foreground "Black" :background "Turquoise")))) + '(ediff-odd-diff-face-A ((t (:foreground "White" :background "Grey")))) + '(ediff-odd-diff-face-Ancestor ((t (:foreground "Black" :background "light grey")))) + '(ediff-odd-diff-face-B ((t (:foreground "Black" :background "light grey")))) + '(ediff-odd-diff-face-C ((t (:foreground "White" :background "Grey")))) + '(eshell-ls-archive-face ((t (:foreground "Orchid" :bold t)))) + '(eshell-ls-backup-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-clutter-face ((t (:foreground "OrangeRed" :bold t)))) + '(eshell-ls-directory-face ((t (:foreground "Blue" :bold t)))) + '(eshell-ls-executable-face ((t (:foreground "ForestGreen" :bold t)))) + '(eshell-ls-missing-face ((t (:foreground "Red" :bold t)))) + '(eshell-ls-product-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-readonly-face ((t (:foreground "Brown")))) + '(eshell-ls-special-face ((t (:foreground "Magenta" :bold t)))) + '(eshell-ls-symlink-face ((t (:foreground "DarkCyan" :bold t)))) + '(eshell-ls-unreadable-face ((t (:foreground "Grey30")))) + '(eshell-prompt-face ((t (:foreground "Red" :bold t)))) + '(eshell-test-failed-face ((t (:foreground "OrangeRed" :bold t)))) + '(eshell-test-ok-face ((t (:foreground "Green" :bold t)))) + '(excerpt ((t (:italic t)))) + '(fixed ((t (:bold t)))) + '(flyspell-duplicate-face ((t (:foreground "Gold3" :bold t :underline t)))) + '(flyspell-incorrect-face ((t (:foreground "OrangeRed" :bold t :underline t)))) + '(font-lock-builtin-face ((t (:bold t :foreground "Red")))) + '(font-lock-comment-face ((t (:bold t :foreground "Firebrick")))) + '(font-lock-constant-face ((t (:bold t :underline t :foreground "Blue")))) + '(font-lock-function-name-face ((t (:bold t :foreground "Blue")))) + '(font-lock-keyword-face ((t (:bold t :foreground "Purple")))) + '(font-lock-string-face ((t (:bold t :foreground "DarkGreen")))) + '(font-lock-type-face ((t (:bold t :foreground "ForestGreen")))) + '(font-lock-variable-name-face ((t (:bold t :foreground "DarkGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(fringe ((t (:background "grey95")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:bold t :italic t)))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t)))) + '(gnus-emphasis-underline-bold-italic ((t (:bold t :italic t :underline t)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:foreground "DeepPink3" :bold t)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:foreground "HotPink3" :bold t)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:foreground "magenta4" :bold t)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:foreground "DeepPink4" :bold t)))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:foreground "ForestGreen" :bold t)))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:foreground "CadetBlue4" :bold t)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:foreground "DarkGreen" :bold t)))) + '(gnus-header-content-face ((t (:foreground "indianred4" :italic t)))) + '(gnus-header-from-face ((t (:foreground "red3")))) + '(gnus-header-name-face ((t (:foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:foreground "MidnightBlue" :italic t)))) + '(gnus-header-subject-face ((t (:foreground "red4")))) + '(gnus-signature-face ((t (:italic t)))) + '(gnus-splash-face ((t (:foreground "ForestGreen")))) + '(gnus-summary-cancelled-face ((t (:foreground "yellow" :background "black")))) + '(gnus-summary-high-ancient-face ((t (:foreground "RoyalBlue" :bold t)))) + '(gnus-summary-high-read-face ((t (:foreground "DarkGreen" :bold t)))) + '(gnus-summary-high-ticked-face ((t (:foreground "firebrick" :bold t)))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:foreground "RoyalBlue" :italic t)))) + '(gnus-summary-low-read-face ((t (:foreground "DarkGreen" :italic t)))) + '(gnus-summary-low-ticked-face ((t (:foreground "firebrick" :italic t)))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(highlight ((t (:background "black" :foreground "white" :bold 1)))) + '(highlight-changes-delete-face ((t (:foreground "red" :underline t)))) + '(highlight-changes-face ((t (:foreground "red")))) + '(highline-face ((t (:background "paleturquoise")))) + '(holiday-face ((t (:background "pink")))) + '(info-menu-5 ((t (:underline t :bold t)))) + '(info-node ((t (:bold t)))) + '(info-xref ((t (:bold t)))) + '(italic ((t (:bold t :underline t)))) + '(makefile-space-face ((t (:background "hotpink")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:foreground "blue4" :bold t :italic t)))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:foreground "navy blue" :bold t)))) + '(message-header-to-face ((t (:foreground "MidnightBlue" :bold t)))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "black" :foreground "white" :bold 1)))) + '(mode-line-buffer-id ((t (:background "black" :foreground "white" :bold 1)))) + '(mode-line-mousable ((t (:background "black" :foreground "white" :bold 1)))) + '(mode-line-mousable-minor-mode ((t (:background "black" :foreground "white" :bold 1)))) + '(region ((t (:background "black" :foreground "white" :bold 1)))) + '(secondary-selection ((t (:background "black" :foreground "white" :bold 1)))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:foreground "white" :background "purple")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(term-black ((t (:foreground "black")))) + '(term-blackbg ((t (:background "black")))) + '(term-blue ((t (:foreground "blue")))) + '(term-bluebg ((t (:background "blue")))) + '(term-bold ((t (:bold t)))) + '(term-cyan ((t (:foreground "cyan")))) + '(term-cyanbg ((t (:background "cyan")))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-green ((t (:foreground "green")))) + '(term-greenbg ((t (:background "green")))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (:foreground "magenta")))) + '(term-magentabg ((t (:background "magenta")))) + '(term-red ((t (:foreground "red")))) + '(term-redbg ((t (:background "red")))) + '(term-underline ((t (:underline t)))) + '(term-white ((t (:foreground "white")))) + '(term-whitebg ((t (:background "white")))) + '(term-yellow ((t (:foreground "yellow")))) + '(term-yellowbg ((t (:background "yellow")))) + '(underline ((t (:bold t :underline t)))) + '(vcursor ((t (:foreground "blue" :background "cyan" :underline t)))) + '(vhdl-font-lock-attribute-face ((t (:foreground "Orchid")))) + '(vhdl-font-lock-directive-face ((t (:foreground "CadetBlue")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4")))) + '(vhdl-font-lock-function-face ((t (:foreground "Orchid4")))) + '(vhdl-font-lock-prompt-face ((t (:foreground "Red" :bold t)))) + '(vhdl-font-lock-reserved-words-face ((t (:foreground "Orange" :bold t)))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-speedbar-architecture-face ((t (:foreground "Blue")))) + '(vhdl-speedbar-architecture-selected-face ((t (:foreground "Blue" :underline t)))) + '(vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod")))) + '(vhdl-speedbar-configuration-selected-face ((t (:foreground "DarkGoldenrod" :underline t)))) + '(vhdl-speedbar-entity-face ((t (:foreground "ForestGreen")))) + '(vhdl-speedbar-entity-selected-face ((t (:foreground "ForestGreen" :underline t)))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "Brown")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:foreground "Brown" :underline t)))) + '(vhdl-speedbar-package-face ((t (:foreground "Grey50")))) + '(vhdl-speedbar-package-selected-face ((t (:foreground "Grey50" :underline t)))) + '(viper-minibuffer-emacs-face ((t (:foreground "Black" :background "darkseagreen2")))) + '(viper-minibuffer-insert-face ((t (:foreground "Black" :background "pink")))) + '(viper-minibuffer-vi-face ((t (:foreground "DarkGreen" :background "grey")))) + '(viper-replace-overlay-face ((t (:foreground "Black" :background "darkseagreen2")))) + '(viper-search-face ((t (:foreground "Black" :background "khaki")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'high-contrast) + +;;; high-contrast-theme.el ends here diff --git a/replace-colorthemes/hober-theme.el b/replace-colorthemes/hober-theme.el new file mode 100644 index 0000000..3be624a --- /dev/null +++ b/replace-colorthemes/hober-theme.el @@ -0,0 +1,277 @@ +;;; hober-theme.el --- hober theme + +;; Copyright (C) 1999, 2000 Jonadab the Unsightly One +;; Copyright (C) 2000, 2001, 2002, 2003 Alex Schroeder +;; Copyright (C) 2003, 2004, 2005, 2006 Xavier Maillard +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of hober theme from `color-themes' + +;;; Code: + +(deftheme hober + "hober theme") + +(custom-theme-set-faces + 'hober + + '(default ((t (:background "black" :foreground "#c0c0c0")))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(border ((t (:background "black")))) + '(buffer-menu-buffer ((t (:bold t :weight bold)))) + '(button ((t (:underline t :foreground "cyan1")))) + '(calendar-today-face ((t (:underline t)))) + '(completions-annotations ((t (:italic t :slant italic)))) + '(completions-common-part ((t (:foreground "#c0c0c0" :background "black")))) + '(completions-first-difference ((t (:bold t :weight bold)))) + '(cperl-array-face ((t (:bold t :background "lightyellow2" + :foreground "Blue" :weight bold)))) + '(cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" + :foreground "Red" :slant italic :weight bold)))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(cursor ((t (:background "medium turquoise")))) + '(diary-face ((t (:foreground "red")))) + + '(dired-directory ((t (:foreground "#4186be")))) + '(dired-flagged ((t (:bold t :weight bold :foreground "Pink")))) + '(dired-header ((t (:foreground "Coral")))) + '(dired-ignored ((t (:foreground "grey70")))) + '(dired-mark ((t (:foreground "#00ff00")))) + '(dired-marked ((t (:bold t :weight bold :foreground "DarkOrange")))) + '(dired-perm-write ((t (:foreground "Red")))) + '(dired-symlink ((t (:foreground "#00ffff")))) + '(dired-warning ((t (:bold t :weight bold :foreground "Red")))) + + '(error ((t (:bold t :foreground "Pink" :weight bold)))) + '(escape-glyph ((t (:foreground "cyan")))) + '(excerpt ((t (:italic t :slant italic)))) + '(file-name-shadow ((t (:foreground "grey70")))) + '(fixed ((t (:bold t :weight bold)))) + + '(flyspell-duplicate-face ((t (:bold t :foreground "Gold3" :underline t :weight bold)))) + '(flyspell-incorrect-face ((t (:bold t :foreground "OrangeRed" :underline t :weight bold)))) + + '(font-lock-builtin-face ((t (:foreground "#ffaa00")))) + '(font-lock-comment-delimiter-face ((t (:foreground "Red")))) + '(font-lock-comment-face ((t (:foreground "Red")))) + '(font-lock-constant-face ((t (:foreground "#00ff00")))) + '(font-lock-doc-face ((t (:foreground "#ffff00")))) + '(font-lock-function-name-face ((t (:foreground "#4186be")))) + '(font-lock-keyword-face ((t (:foreground "#00ffff")))) + '(font-lock-negation-char-face ((t (nil)))) + '(font-lock-preprocessor-face ((t (:foreground "#ffaa00")))) + '(font-lock-regexp-grouping-backslash ((t (:bold t :weight bold)))) + '(font-lock-regexp-grouping-construct ((t (:bold t :weight bold)))) + '(font-lock-string-face ((t (:foreground "#ffff00")))) + '(font-lock-type-face ((t (:foreground "Coral")))) + '(font-lock-variable-name-face ((t (:bold t :foreground "white" :weight bold)))) + '(font-lock-warning-face ((t (:bold t :foreground "Red" :weight bold)))) + + '(fringe ((t (:background "grey10")))) + '(glyphless-char ((t (:height 0.6)))) + + '(gnus-cite-attribution-face ((t (:italic t :slant italic)))) + '(gnus-cite-face-1 ((t (:foreground "Khaki")))) + '(gnus-cite-face-2 ((t (:foreground "Coral")))) + '(gnus-cite-face-3 ((t (:foreground "#4186be")))) + '(gnus-cite-face-4 ((t (:foreground "yellow green")))) + '(gnus-cite-face-5 ((t (:foreground "IndianRed")))) + '(gnus-cite-face-list ((t (:bold t :foreground "red" :weight bold)))) + '(gnus-emphasis-bold ((t (:bold t :weight bold)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(gnus-emphasis-italic ((t (:italic t :slant italic)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t + :slant italic :weight bold)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face + ((t (:bold t :foreground "DeepPink3" :weight bold)))) + '(gnus-group-mail-2-empty-face + ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3" :weight bold)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4" :weight bold)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face + ((t (:bold t :foreground "DeepPink4" :weight bold)))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen" :weight bold)))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4" :weight bold)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t :weight bold)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen" :weight bold)))) + '(gnus-header-content-face ((t (:italic t :foreground "#4186be" :slant italic)))) + '(gnus-header-from-face ((t (:foreground "Coral")))) + '(gnus-header-name-face ((t (:foreground "white")))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "#4186be" :slant italic)))) + '(gnus-header-subject-face ((t (:foreground "#4186be")))) + '(gnus-signature-face ((t (:foreground "white")))) + '(gnus-splash-face ((t (:foreground "ForestGreen")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face + ((t (:bold t :foreground "RoyalBlue" :weight bold)))) + '(gnus-summary-high-read-face + ((t (:bold t :foreground "DarkGreen" :weight bold)))) + '(gnus-summary-high-ticked-face + ((t (:bold t :foreground "firebrick" :weight bold)))) + '(gnus-summary-high-unread-face + ((t (:bold t :weight bold)))) + '(gnus-summary-low-ancient-face + ((t (:italic t :foreground "RoyalBlue" :slant italic)))) + '(gnus-summary-low-read-face + ((t (:italic t :foreground "DarkGreen" :slant italic)))) + '(gnus-summary-low-ticked-face + ((t (:italic t :foreground "firebrick" :slant italic)))) + '(gnus-summary-low-unread-face + ((t (:italic t :slant italic)))) + '(gnus-summary-normal-ancient-face + ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + + '(header-line ((t (:box (:line-width -1 :style released-button) + :background "grey20" :foreground "grey90" :box nil)))) + '(help-argument-name ((t (nil)))) + '(highlight ((t (:background "#c0c0c0" :foreground "black")))) + '(highlight-changes-delete-face ((t (:foreground "red" :underline t)))) + '(highlight-changes-face ((t (:foreground "red")))) + '(holiday-face ((t (:background "pink")))) + '(isearch ((t (:background "palevioletred2" :foreground "brown4")))) + '(isearch-fail ((t (:background "red4")))) + '(italic ((t (:italic t :slant italic)))) + '(lazy-highlight ((t (:background "paleturquoise4")))) + '(link ((t (:foreground "cyan1" :underline t)))) + '(link-visited ((t (:underline t :foreground "violet")))) + '(makefile-space-face ((t (:background "hotpink")))) + '(match ((t (:background "RoyalBlue3")))) + '(menu ((t (nil)))) + + '(message-cited-text-face ((t (:foreground "white")))) + '(message-header-cc-face ((t (:foreground "#4186be")))) + '(message-header-name-face ((t (:foreground "white")))) + '(message-header-newsgroups-face + ((t (:bold t :foreground "Coral" :weight bold)))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face + ((t (:bold t :foreground "#4186be" :weight bold)))) + '(message-header-to-face ((t (:bold t :foreground "#4186be" :weight bold)))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-separator-face ((t (:foreground "brown")))) + + '(minibuffer-prompt ((t (:foreground "cyan")))) + '(mode-line + ((t (:background "darkslateblue" :foreground "white" + :box (:line-width -1 :style released-button))))) + '(mode-line-buffer-id ((t (:bold t :background "darkslateblue" + :foreground "white" :weight bold)))) + '(mode-line-emphasis ((t (:bold t :weight bold)))) + '(mode-line-highlight + ((t (:box (:line-width 2 :color "grey40" :style released-button))))) + '(mode-line-inactive + ((t (:background "grey30" + :foreground "grey80" + :box (:line-width -1 :color "grey40" :style nil) + :weight light)))) + '(mode-line-mousable ((t (:background "darkslateblue" :foreground "white")))) + '(mode-line-mousable-minor-mode + ((t (:background "darkslateblue" :foreground "white")))) + + '(mouse ((t (:background "black")))) + '(next-error ((t (:foreground "white" :background "darkslateblue")))) + '(nobreak-space ((t (:foreground "cyan" :underline t)))) + '(query-replace ((t (:foreground "brown4" :background "palevioletred2")))) + '(region ((t (:background "darkslateblue" :foreground "white")))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "paleturquoise")))) + + '(sgml-doctype-face ((t (:foreground "orange")))) + '(sgml-end-tag-face ((t (:foreground "greenyellow")))) + '(sgml-entity-face ((t (:foreground "gold")))) + '(sgml-ignored-face ((t (:background "gray60" :foreground "gray20")))) + '(sgml-sgml-face ((t (:foreground "yellow")))) + '(sgml-start-tag-face ((t (:foreground "mediumspringgreen")))) + + '(shadow ((t (:foreground "grey70")))) + '(show-paren-match-face ((t (:background "purple" :foreground "white")))) + '(show-paren-mismatch-face ((t (:background "red" :foreground "white")))) + '(success ((t (:bold t :foreground "Green1" :weight bold)))) + + '(term-black ((t (:foreground "black")))) + '(term-blackbg ((t (:background "black")))) + '(term-blue ((t (:foreground "#4186be")))) + '(term-bluebg ((t (:background "#4186be")))) + '(term-bold ((t (:bold t :weight bold)))) + '(term-cyan ((t (:foreground "#71bebe")))) + '(term-cyanbg ((t (:background "#71bebe")))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-green ((t (:foreground "#e5f779")))) + '(term-greenbg ((t (:background "#e5f779")))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (:foreground "#ef9ebe")))) + '(term-magentabg ((t (:background "#ef9ebe")))) + '(term-red ((t (:foreground "#ef8171")))) + '(term-redbg ((t (:background "#ef8171")))) + '(term-underline ((t (:underline t)))) + '(term-white ((t (:foreground "#c0c0c0")))) + '(term-whitebg ((t (:background "#c0c0c0")))) + '(term-yellow ((t (:foreground "#fff796")))) + '(term-yellowbg ((t (:background "#fff796")))) + + '(tool-bar + ((t (:background "grey75" :foreground "black" + :box (:line-width 1 :style released-button))))) + '(tooltip + ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "red1")))) + '(underline ((t (:underline t)))) + + '(vertical-border ((t (nil)))) + '(warning ((t (:bold t :foreground "DarkOrange" :weight bold)))) + + '(widget-button ((t (:bold t :weight bold)))) + '(widget-button-pressed ((t (:background "black" :foreground "red")))) + '(widget-documentation ((t (:background "white" :foreground "dark green")))) + '(widget-field ((t (:background "gray85" :foreground "black")))) + '(widget-inactive ((t (:background "red" :foreground "dim gray")))) + '(widget-single-line-field ((t (:background "gray85" :foreground "black")))) + + '(zmacs-region ((t (:background "darkslateblue" :foreground "white"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'hober) + +;;; hober-theme.el ends here diff --git a/replace-colorthemes/images/aalto-dark-theme.png b/replace-colorthemes/images/aalto-dark-theme.png new file mode 100644 index 0000000..9a807b8 Binary files /dev/null and b/replace-colorthemes/images/aalto-dark-theme.png differ diff --git a/replace-colorthemes/images/aalto-light-theme.png b/replace-colorthemes/images/aalto-light-theme.png new file mode 100644 index 0000000..33b1006 Binary files /dev/null and b/replace-colorthemes/images/aalto-light-theme.png differ diff --git a/replace-colorthemes/images/aliceblue-theme.png b/replace-colorthemes/images/aliceblue-theme.png new file mode 100644 index 0000000..25e7f1b Binary files /dev/null and b/replace-colorthemes/images/aliceblue-theme.png differ diff --git a/replace-colorthemes/images/andreas-theme.png b/replace-colorthemes/images/andreas-theme.png new file mode 100644 index 0000000..dd92e9c Binary files /dev/null and b/replace-colorthemes/images/andreas-theme.png differ diff --git a/replace-colorthemes/images/arjen-theme.png b/replace-colorthemes/images/arjen-theme.png new file mode 100644 index 0000000..03da7c0 Binary files /dev/null and b/replace-colorthemes/images/arjen-theme.png differ diff --git a/replace-colorthemes/images/beige-diff-theme.png b/replace-colorthemes/images/beige-diff-theme.png new file mode 100644 index 0000000..96f3b8c Binary files /dev/null and b/replace-colorthemes/images/beige-diff-theme.png differ diff --git a/replace-colorthemes/images/beige-eshell-theme.png b/replace-colorthemes/images/beige-eshell-theme.png new file mode 100644 index 0000000..648b119 Binary files /dev/null and b/replace-colorthemes/images/beige-eshell-theme.png differ diff --git a/replace-colorthemes/images/bharadwaj-slate-theme.png b/replace-colorthemes/images/bharadwaj-slate-theme.png new file mode 100644 index 0000000..aa34cd2 Binary files /dev/null and b/replace-colorthemes/images/bharadwaj-slate-theme.png differ diff --git a/replace-colorthemes/images/bharadwaj-theme.png b/replace-colorthemes/images/bharadwaj-theme.png new file mode 100644 index 0000000..915e84b Binary files /dev/null and b/replace-colorthemes/images/bharadwaj-theme.png differ diff --git a/replace-colorthemes/images/billw-theme.png b/replace-colorthemes/images/billw-theme.png new file mode 100644 index 0000000..39cb805 Binary files /dev/null and b/replace-colorthemes/images/billw-theme.png differ diff --git a/replace-colorthemes/images/black-on-gray-theme.png b/replace-colorthemes/images/black-on-gray-theme.png new file mode 100644 index 0000000..b93eab0 Binary files /dev/null and b/replace-colorthemes/images/black-on-gray-theme.png differ diff --git a/replace-colorthemes/images/blippbolpp-theme.png b/replace-colorthemes/images/blippbolpp-theme.png new file mode 100644 index 0000000..5c2c932 Binary files /dev/null and b/replace-colorthemes/images/blippbolpp-theme.png differ diff --git a/replace-colorthemes/images/blue-erc-theme.png b/replace-colorthemes/images/blue-erc-theme.png new file mode 100644 index 0000000..c076f80 Binary files /dev/null and b/replace-colorthemes/images/blue-erc-theme.png differ diff --git a/replace-colorthemes/images/blue-eshell-theme.png b/replace-colorthemes/images/blue-eshell-theme.png new file mode 100644 index 0000000..7d8afa8 Binary files /dev/null and b/replace-colorthemes/images/blue-eshell-theme.png differ diff --git a/replace-colorthemes/images/blue-gnus-theme.png b/replace-colorthemes/images/blue-gnus-theme.png new file mode 100644 index 0000000..4b7df62 Binary files /dev/null and b/replace-colorthemes/images/blue-gnus-theme.png differ diff --git a/replace-colorthemes/images/blue-mood-theme.png b/replace-colorthemes/images/blue-mood-theme.png new file mode 100644 index 0000000..3b033a2 Binary files /dev/null and b/replace-colorthemes/images/blue-mood-theme.png differ diff --git a/replace-colorthemes/images/blue-sea-theme.png b/replace-colorthemes/images/blue-sea-theme.png new file mode 100644 index 0000000..8f554fa Binary files /dev/null and b/replace-colorthemes/images/blue-sea-theme.png differ diff --git a/replace-colorthemes/images/calm-forest-theme.png b/replace-colorthemes/images/calm-forest-theme.png new file mode 100644 index 0000000..3d32816 Binary files /dev/null and b/replace-colorthemes/images/calm-forest-theme.png differ diff --git a/replace-colorthemes/images/charcoal-black-theme.png b/replace-colorthemes/images/charcoal-black-theme.png new file mode 100644 index 0000000..10dec26 Binary files /dev/null and b/replace-colorthemes/images/charcoal-black-theme.png differ diff --git a/replace-colorthemes/images/clarity-theme.png b/replace-colorthemes/images/clarity-theme.png new file mode 100644 index 0000000..ee4914b Binary files /dev/null and b/replace-colorthemes/images/clarity-theme.png differ diff --git a/replace-colorthemes/images/classic-theme.png b/replace-colorthemes/images/classic-theme.png new file mode 100644 index 0000000..97f1656 Binary files /dev/null and b/replace-colorthemes/images/classic-theme.png differ diff --git a/replace-colorthemes/images/cobalt-theme.png b/replace-colorthemes/images/cobalt-theme.png new file mode 100644 index 0000000..825e8e3 Binary files /dev/null and b/replace-colorthemes/images/cobalt-theme.png differ diff --git a/replace-colorthemes/images/comidia-theme.png b/replace-colorthemes/images/comidia-theme.png new file mode 100644 index 0000000..0582b77 Binary files /dev/null and b/replace-colorthemes/images/comidia-theme.png differ diff --git a/replace-colorthemes/images/dark-blue-theme.png b/replace-colorthemes/images/dark-blue-theme.png new file mode 100644 index 0000000..18293a7 Binary files /dev/null and b/replace-colorthemes/images/dark-blue-theme.png differ diff --git a/replace-colorthemes/images/dark-blue2-theme.png b/replace-colorthemes/images/dark-blue2-theme.png new file mode 100644 index 0000000..d36805d Binary files /dev/null and b/replace-colorthemes/images/dark-blue2-theme.png differ diff --git a/replace-colorthemes/images/dark-erc-theme.png b/replace-colorthemes/images/dark-erc-theme.png new file mode 100644 index 0000000..f736e8f Binary files /dev/null and b/replace-colorthemes/images/dark-erc-theme.png differ diff --git a/replace-colorthemes/images/dark-font-lock-theme.png b/replace-colorthemes/images/dark-font-lock-theme.png new file mode 100644 index 0000000..7e5446f Binary files /dev/null and b/replace-colorthemes/images/dark-font-lock-theme.png differ diff --git a/replace-colorthemes/images/dark-gnus-theme.png b/replace-colorthemes/images/dark-gnus-theme.png new file mode 100644 index 0000000..d70e754 Binary files /dev/null and b/replace-colorthemes/images/dark-gnus-theme.png differ diff --git a/replace-colorthemes/images/dark-green-theme.png b/replace-colorthemes/images/dark-green-theme.png new file mode 100644 index 0000000..a1cbbef Binary files /dev/null and b/replace-colorthemes/images/dark-green-theme.png differ diff --git a/replace-colorthemes/images/dark-info-theme.png b/replace-colorthemes/images/dark-info-theme.png new file mode 100644 index 0000000..0523c14 Binary files /dev/null and b/replace-colorthemes/images/dark-info-theme.png differ diff --git a/replace-colorthemes/images/dark-laptop-theme.png b/replace-colorthemes/images/dark-laptop-theme.png new file mode 100644 index 0000000..9f8e35e Binary files /dev/null and b/replace-colorthemes/images/dark-laptop-theme.png differ diff --git a/replace-colorthemes/images/deep-blue-theme.png b/replace-colorthemes/images/deep-blue-theme.png new file mode 100644 index 0000000..f6dd8b4 Binary files /dev/null and b/replace-colorthemes/images/deep-blue-theme.png differ diff --git a/replace-colorthemes/images/desert-theme.png b/replace-colorthemes/images/desert-theme.png new file mode 100644 index 0000000..f69fa90 Binary files /dev/null and b/replace-colorthemes/images/desert-theme.png differ diff --git a/replace-colorthemes/images/digital-ofs1-theme.png b/replace-colorthemes/images/digital-ofs1-theme.png new file mode 100644 index 0000000..c07a846 Binary files /dev/null and b/replace-colorthemes/images/digital-ofs1-theme.png differ diff --git a/replace-colorthemes/images/emacs-21-theme.png b/replace-colorthemes/images/emacs-21-theme.png new file mode 100644 index 0000000..b8fa9b3 Binary files /dev/null and b/replace-colorthemes/images/emacs-21-theme.png differ diff --git a/replace-colorthemes/images/emacs-nw-theme.png b/replace-colorthemes/images/emacs-nw-theme.png new file mode 100644 index 0000000..6873387 Binary files /dev/null and b/replace-colorthemes/images/emacs-nw-theme.png differ diff --git a/replace-colorthemes/images/euphoria-theme.png b/replace-colorthemes/images/euphoria-theme.png new file mode 100644 index 0000000..f079c69 Binary files /dev/null and b/replace-colorthemes/images/euphoria-theme.png differ diff --git a/replace-colorthemes/images/feng-shui-theme.png b/replace-colorthemes/images/feng-shui-theme.png new file mode 100644 index 0000000..673eeb4 Binary files /dev/null and b/replace-colorthemes/images/feng-shui-theme.png differ diff --git a/replace-colorthemes/images/fischmeister-theme.png b/replace-colorthemes/images/fischmeister-theme.png new file mode 100644 index 0000000..6a777f5 Binary files /dev/null and b/replace-colorthemes/images/fischmeister-theme.png differ diff --git a/replace-colorthemes/images/gnome-theme.png b/replace-colorthemes/images/gnome-theme.png new file mode 100644 index 0000000..47510f1 Binary files /dev/null and b/replace-colorthemes/images/gnome-theme.png differ diff --git a/replace-colorthemes/images/gnome2-theme.png b/replace-colorthemes/images/gnome2-theme.png new file mode 100644 index 0000000..53aee97 Binary files /dev/null and b/replace-colorthemes/images/gnome2-theme.png differ diff --git a/replace-colorthemes/images/goldenrod-theme.png b/replace-colorthemes/images/goldenrod-theme.png new file mode 100644 index 0000000..1347d08 Binary files /dev/null and b/replace-colorthemes/images/goldenrod-theme.png differ diff --git a/replace-colorthemes/images/gray1-theme.png b/replace-colorthemes/images/gray1-theme.png new file mode 100644 index 0000000..c9290a4 Binary files /dev/null and b/replace-colorthemes/images/gray1-theme.png differ diff --git a/replace-colorthemes/images/gray30-theme.png b/replace-colorthemes/images/gray30-theme.png new file mode 100644 index 0000000..84a46d1 Binary files /dev/null and b/replace-colorthemes/images/gray30-theme.png differ diff --git a/replace-colorthemes/images/greiner-theme.png b/replace-colorthemes/images/greiner-theme.png new file mode 100644 index 0000000..c404bfe Binary files /dev/null and b/replace-colorthemes/images/greiner-theme.png differ diff --git a/replace-colorthemes/images/gtk-ide-theme.png b/replace-colorthemes/images/gtk-ide-theme.png new file mode 100644 index 0000000..067c0b7 Binary files /dev/null and b/replace-colorthemes/images/gtk-ide-theme.png differ diff --git a/replace-colorthemes/images/high-contrast-theme.png b/replace-colorthemes/images/high-contrast-theme.png new file mode 100644 index 0000000..ae98b7a Binary files /dev/null and b/replace-colorthemes/images/high-contrast-theme.png differ diff --git a/replace-colorthemes/images/hober-theme.png b/replace-colorthemes/images/hober-theme.png new file mode 100644 index 0000000..d54999c Binary files /dev/null and b/replace-colorthemes/images/hober-theme.png differ diff --git a/replace-colorthemes/images/infodoc-theme.png b/replace-colorthemes/images/infodoc-theme.png new file mode 100644 index 0000000..a9d9972 Binary files /dev/null and b/replace-colorthemes/images/infodoc-theme.png differ diff --git a/replace-colorthemes/images/janodabian-slate-theme.png b/replace-colorthemes/images/janodabian-slate-theme.png new file mode 100644 index 0000000..a742992 Binary files /dev/null and b/replace-colorthemes/images/janodabian-slate-theme.png differ diff --git a/replace-colorthemes/images/jb-simple-theme.png b/replace-colorthemes/images/jb-simple-theme.png new file mode 100644 index 0000000..e2793b1 Binary files /dev/null and b/replace-colorthemes/images/jb-simple-theme.png differ diff --git a/replace-colorthemes/images/jedit-grey-theme.png b/replace-colorthemes/images/jedit-grey-theme.png new file mode 100644 index 0000000..f5d85a8 Binary files /dev/null and b/replace-colorthemes/images/jedit-grey-theme.png differ diff --git a/replace-colorthemes/images/jonadabian-slate-theme.png b/replace-colorthemes/images/jonadabian-slate-theme.png new file mode 100644 index 0000000..ae0751c Binary files /dev/null and b/replace-colorthemes/images/jonadabian-slate-theme.png differ diff --git a/replace-colorthemes/images/jonadabian-theme.png b/replace-colorthemes/images/jonadabian-theme.png new file mode 100644 index 0000000..c0b6e96 Binary files /dev/null and b/replace-colorthemes/images/jonadabian-theme.png differ diff --git a/replace-colorthemes/images/jsc-dark-theme.png b/replace-colorthemes/images/jsc-dark-theme.png new file mode 100644 index 0000000..b93e723 Binary files /dev/null and b/replace-colorthemes/images/jsc-dark-theme.png differ diff --git a/replace-colorthemes/images/jsc-light-theme.png b/replace-colorthemes/images/jsc-light-theme.png new file mode 100644 index 0000000..1b90244 Binary files /dev/null and b/replace-colorthemes/images/jsc-light-theme.png differ diff --git a/replace-colorthemes/images/jsc-light2-theme.png b/replace-colorthemes/images/jsc-light2-theme.png new file mode 100644 index 0000000..79918c9 Binary files /dev/null and b/replace-colorthemes/images/jsc-light2-theme.png differ diff --git a/replace-colorthemes/images/julie-theme.png b/replace-colorthemes/images/julie-theme.png new file mode 100644 index 0000000..2ad4885 Binary files /dev/null and b/replace-colorthemes/images/julie-theme.png differ diff --git a/replace-colorthemes/images/katester-theme.png b/replace-colorthemes/images/katester-theme.png new file mode 100644 index 0000000..9c710ea Binary files /dev/null and b/replace-colorthemes/images/katester-theme.png differ diff --git a/replace-colorthemes/images/kingsajz-theme.png b/replace-colorthemes/images/kingsajz-theme.png new file mode 100644 index 0000000..3f9688e Binary files /dev/null and b/replace-colorthemes/images/kingsajz-theme.png differ diff --git a/replace-colorthemes/images/late-night-theme.png b/replace-colorthemes/images/late-night-theme.png new file mode 100644 index 0000000..77f5b4f Binary files /dev/null and b/replace-colorthemes/images/late-night-theme.png differ diff --git a/replace-colorthemes/images/lawrence-theme.png b/replace-colorthemes/images/lawrence-theme.png new file mode 100644 index 0000000..6422593 Binary files /dev/null and b/replace-colorthemes/images/lawrence-theme.png differ diff --git a/replace-colorthemes/images/ld-dark-theme.png b/replace-colorthemes/images/ld-dark-theme.png new file mode 100644 index 0000000..98f27fe Binary files /dev/null and b/replace-colorthemes/images/ld-dark-theme.png differ diff --git a/replace-colorthemes/images/lethe-theme.png b/replace-colorthemes/images/lethe-theme.png new file mode 100644 index 0000000..cfcb456 Binary files /dev/null and b/replace-colorthemes/images/lethe-theme.png differ diff --git a/replace-colorthemes/images/marine-theme.png b/replace-colorthemes/images/marine-theme.png new file mode 100644 index 0000000..ac3b934 Binary files /dev/null and b/replace-colorthemes/images/marine-theme.png differ diff --git a/replace-colorthemes/images/marquardt-theme.png b/replace-colorthemes/images/marquardt-theme.png new file mode 100644 index 0000000..96810d8 Binary files /dev/null and b/replace-colorthemes/images/marquardt-theme.png differ diff --git a/replace-colorthemes/images/matrix-theme.png b/replace-colorthemes/images/matrix-theme.png new file mode 100644 index 0000000..e260ae0 Binary files /dev/null and b/replace-colorthemes/images/matrix-theme.png differ diff --git a/replace-colorthemes/images/midnight-theme.png b/replace-colorthemes/images/midnight-theme.png new file mode 100644 index 0000000..2103b67 Binary files /dev/null and b/replace-colorthemes/images/midnight-theme.png differ diff --git a/replace-colorthemes/images/mistyday-theme.png b/replace-colorthemes/images/mistyday-theme.png new file mode 100644 index 0000000..8e449e1 Binary files /dev/null and b/replace-colorthemes/images/mistyday-theme.png differ diff --git a/replace-colorthemes/images/montz-theme.png b/replace-colorthemes/images/montz-theme.png new file mode 100644 index 0000000..e4530c2 Binary files /dev/null and b/replace-colorthemes/images/montz-theme.png differ diff --git a/replace-colorthemes/images/oswald-theme.png b/replace-colorthemes/images/oswald-theme.png new file mode 100644 index 0000000..60b8288 Binary files /dev/null and b/replace-colorthemes/images/oswald-theme.png differ diff --git a/replace-colorthemes/images/parus-theme.png b/replace-colorthemes/images/parus-theme.png new file mode 100644 index 0000000..d982ec6 Binary files /dev/null and b/replace-colorthemes/images/parus-theme.png differ diff --git a/replace-colorthemes/images/pierson-theme.png b/replace-colorthemes/images/pierson-theme.png new file mode 100644 index 0000000..b986c01 Binary files /dev/null and b/replace-colorthemes/images/pierson-theme.png differ diff --git a/replace-colorthemes/images/pok-wob-theme.png b/replace-colorthemes/images/pok-wob-theme.png new file mode 100644 index 0000000..2be543c Binary files /dev/null and b/replace-colorthemes/images/pok-wob-theme.png differ diff --git a/replace-colorthemes/images/pok-wog-theme.png b/replace-colorthemes/images/pok-wog-theme.png new file mode 100644 index 0000000..c0617ec Binary files /dev/null and b/replace-colorthemes/images/pok-wog-theme.png differ diff --git a/replace-colorthemes/images/railscast-theme.png b/replace-colorthemes/images/railscast-theme.png new file mode 100644 index 0000000..ebf0fd5 Binary files /dev/null and b/replace-colorthemes/images/railscast-theme.png differ diff --git a/replace-colorthemes/images/ramangalahy-theme.png b/replace-colorthemes/images/ramangalahy-theme.png new file mode 100644 index 0000000..6e1456d Binary files /dev/null and b/replace-colorthemes/images/ramangalahy-theme.png differ diff --git a/replace-colorthemes/images/raspopovic-theme.png b/replace-colorthemes/images/raspopovic-theme.png new file mode 100644 index 0000000..c60b7c7 Binary files /dev/null and b/replace-colorthemes/images/raspopovic-theme.png differ diff --git a/replace-colorthemes/images/renegade-theme.png b/replace-colorthemes/images/renegade-theme.png new file mode 100644 index 0000000..7024f8a Binary files /dev/null and b/replace-colorthemes/images/renegade-theme.png differ diff --git a/replace-colorthemes/images/resolve-theme.png b/replace-colorthemes/images/resolve-theme.png new file mode 100644 index 0000000..b0aeb99 Binary files /dev/null and b/replace-colorthemes/images/resolve-theme.png differ diff --git a/replace-colorthemes/images/retro-green-theme.png b/replace-colorthemes/images/retro-green-theme.png new file mode 100644 index 0000000..5f3a710 Binary files /dev/null and b/replace-colorthemes/images/retro-green-theme.png differ diff --git a/replace-colorthemes/images/retro-orange-theme.png b/replace-colorthemes/images/retro-orange-theme.png new file mode 100644 index 0000000..8e4f1f0 Binary files /dev/null and b/replace-colorthemes/images/retro-orange-theme.png differ diff --git a/replace-colorthemes/images/robin-hood-theme.png b/replace-colorthemes/images/robin-hood-theme.png new file mode 100644 index 0000000..a61b6f2 Binary files /dev/null and b/replace-colorthemes/images/robin-hood-theme.png differ diff --git a/replace-colorthemes/images/rotor-theme.png b/replace-colorthemes/images/rotor-theme.png new file mode 100644 index 0000000..47a73ee Binary files /dev/null and b/replace-colorthemes/images/rotor-theme.png differ diff --git a/replace-colorthemes/images/ryerson-theme.png b/replace-colorthemes/images/ryerson-theme.png new file mode 100644 index 0000000..f20de91 Binary files /dev/null and b/replace-colorthemes/images/ryerson-theme.png differ diff --git a/replace-colorthemes/images/salmon-diff-theme.png b/replace-colorthemes/images/salmon-diff-theme.png new file mode 100644 index 0000000..20ffb9c Binary files /dev/null and b/replace-colorthemes/images/salmon-diff-theme.png differ diff --git a/replace-colorthemes/images/salmon-font-lock-theme.png b/replace-colorthemes/images/salmon-font-lock-theme.png new file mode 100644 index 0000000..ee10266 Binary files /dev/null and b/replace-colorthemes/images/salmon-font-lock-theme.png differ diff --git a/replace-colorthemes/images/scintilla-theme.png b/replace-colorthemes/images/scintilla-theme.png new file mode 100644 index 0000000..c45a554 Binary files /dev/null and b/replace-colorthemes/images/scintilla-theme.png differ diff --git a/replace-colorthemes/images/shaman-theme.png b/replace-colorthemes/images/shaman-theme.png new file mode 100644 index 0000000..796f758 Binary files /dev/null and b/replace-colorthemes/images/shaman-theme.png differ diff --git a/replace-colorthemes/images/simple-1-theme.png b/replace-colorthemes/images/simple-1-theme.png new file mode 100644 index 0000000..f546904 Binary files /dev/null and b/replace-colorthemes/images/simple-1-theme.png differ diff --git a/replace-colorthemes/images/sitaramv-nt-theme.png b/replace-colorthemes/images/sitaramv-nt-theme.png new file mode 100644 index 0000000..977ccee Binary files /dev/null and b/replace-colorthemes/images/sitaramv-nt-theme.png differ diff --git a/replace-colorthemes/images/sitaramv-solaris-theme.png b/replace-colorthemes/images/sitaramv-solaris-theme.png new file mode 100644 index 0000000..f4cfb71 Binary files /dev/null and b/replace-colorthemes/images/sitaramv-solaris-theme.png differ diff --git a/replace-colorthemes/images/snow-theme.png b/replace-colorthemes/images/snow-theme.png new file mode 100644 index 0000000..9d8a55f Binary files /dev/null and b/replace-colorthemes/images/snow-theme.png differ diff --git a/replace-colorthemes/images/snowish-theme.png b/replace-colorthemes/images/snowish-theme.png new file mode 100644 index 0000000..52d6631 Binary files /dev/null and b/replace-colorthemes/images/snowish-theme.png differ diff --git a/replace-colorthemes/images/standard-ediff-theme.png b/replace-colorthemes/images/standard-ediff-theme.png new file mode 100644 index 0000000..3c4d56f Binary files /dev/null and b/replace-colorthemes/images/standard-ediff-theme.png differ diff --git a/replace-colorthemes/images/standard-theme.png b/replace-colorthemes/images/standard-theme.png new file mode 100644 index 0000000..2cc74ab Binary files /dev/null and b/replace-colorthemes/images/standard-theme.png differ diff --git a/replace-colorthemes/images/subdued-theme.png b/replace-colorthemes/images/subdued-theme.png new file mode 100644 index 0000000..ad988fe Binary files /dev/null and b/replace-colorthemes/images/subdued-theme.png differ diff --git a/replace-colorthemes/images/subtle-blue-theme.png b/replace-colorthemes/images/subtle-blue-theme.png new file mode 100644 index 0000000..bccc2be Binary files /dev/null and b/replace-colorthemes/images/subtle-blue-theme.png differ diff --git a/replace-colorthemes/images/subtle-hacker-theme.png b/replace-colorthemes/images/subtle-hacker-theme.png new file mode 100644 index 0000000..545dcd8 Binary files /dev/null and b/replace-colorthemes/images/subtle-hacker-theme.png differ diff --git a/replace-colorthemes/images/taming-mr-arneson-theme.png b/replace-colorthemes/images/taming-mr-arneson-theme.png new file mode 100644 index 0000000..d9926e1 Binary files /dev/null and b/replace-colorthemes/images/taming-mr-arneson-theme.png differ diff --git a/replace-colorthemes/images/taylor-theme.png b/replace-colorthemes/images/taylor-theme.png new file mode 100644 index 0000000..f36991f Binary files /dev/null and b/replace-colorthemes/images/taylor-theme.png differ diff --git a/replace-colorthemes/images/tty-dark-theme.png b/replace-colorthemes/images/tty-dark-theme.png new file mode 100644 index 0000000..2bd3e62 Binary files /dev/null and b/replace-colorthemes/images/tty-dark-theme.png differ diff --git a/replace-colorthemes/images/vim-colors-theme.png b/replace-colorthemes/images/vim-colors-theme.png new file mode 100644 index 0000000..84fa2bb Binary files /dev/null and b/replace-colorthemes/images/vim-colors-theme.png differ diff --git a/replace-colorthemes/images/whateveryouwant-theme.png b/replace-colorthemes/images/whateveryouwant-theme.png new file mode 100644 index 0000000..718a872 Binary files /dev/null and b/replace-colorthemes/images/whateveryouwant-theme.png differ diff --git a/replace-colorthemes/images/wheat-theme.png b/replace-colorthemes/images/wheat-theme.png new file mode 100644 index 0000000..bf5bcad Binary files /dev/null and b/replace-colorthemes/images/wheat-theme.png differ diff --git a/replace-colorthemes/images/word-perfect-theme.png b/replace-colorthemes/images/word-perfect-theme.png new file mode 100644 index 0000000..c8ede0d Binary files /dev/null and b/replace-colorthemes/images/word-perfect-theme.png differ diff --git a/replace-colorthemes/images/xemacs-theme.png b/replace-colorthemes/images/xemacs-theme.png new file mode 100644 index 0000000..3222ca1 Binary files /dev/null and b/replace-colorthemes/images/xemacs-theme.png differ diff --git a/replace-colorthemes/images/xp-theme.png b/replace-colorthemes/images/xp-theme.png new file mode 100644 index 0000000..7834c1d Binary files /dev/null and b/replace-colorthemes/images/xp-theme.png differ diff --git a/replace-colorthemes/infodoc-theme.el b/replace-colorthemes/infodoc-theme.el new file mode 100644 index 0000000..93fe800 --- /dev/null +++ b/replace-colorthemes/infodoc-theme.el @@ -0,0 +1,126 @@ +;;; infodoc-theme.el --- infodoc theme + +;; Copyright (C) 2000 by Frederic Giroud +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of infodoc theme from `color-themes' + +;;; Code: + +(deftheme infodoc + "infodoc theme") + +(custom-theme-set-faces + 'infodoc + + '(default ((t (:background "wheat" :foreground "black")))) + '(cursor ((t (:background "red")))) + '(border ((t (:foreground "black")))) + + '(blue ((t (:bold t :foreground "blue")))) + '(bold ((t (:background "wheat" :foreground "black")))) + '(bold-italic ((t (:bold t :background "wheat" :foreground "black")))) + '(border-glyph ((t (:bold t)))) + '(calendar-today-face ((t (:underline t :bold t)))) + '(custom-button-face ((t (nil)))) + '(custom-changed-face ((t (:bold t :background "blue" :foreground "white")))) + '(custom-documentation-face ((t (:bold t :background "wheat" :foreground "purple4")))) + '(custom-face-tag-face ((t (:underline t :bold t)))) + '(custom-group-tag-face ((t (:underline t :bold t :background "wheat" :foreground "blue")))) + '(custom-group-tag-face-1 ((t (:underline t :bold t :background "wheat" :foreground "red")))) + '(custom-invalid-face ((t (:bold t :background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:bold t :background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:bold t :background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t :bold t)))) + '(custom-set-face ((t (:bold t :background "white" :foreground "blue")))) + '(custom-state-face ((t (:bold t :background "wheat" :foreground "dark green")))) + '(custom-variable-button-face ((t (:underline t)))) + '(custom-variable-tag-face ((t (:underline t :bold t :background "wheat" :foreground "blue")))) + '(diary-face ((t (:bold t :foreground "red")))) + '(display-time-mail-balloon-enhance-face ((t (:bold t :background "wheat" :foreground "black")))) + '(display-time-mail-balloon-gnus-group-face ((t (:bold t :background "wheat" :foreground "blue")))) + '(display-time-time-balloon-face ((t (:bold t :background "light salmon" :foreground "dark green")))) + '(font-lock-comment-face ((t (:bold t :background "wheat" :foreground "turquoise4")))) + '(font-lock-doc-string-face ((t (:bold t :background "wheat" :foreground "purple4")))) + '(font-lock-function-name-face ((t (:bold t :background "wheat" :foreground "blue4")))) + '(font-lock-keyword-face ((t (:bold t :background "wheat" :foreground "dark orchid")))) + '(font-lock-preprocessor-face ((t (:bold t :background "wheat" :foreground "orchid4")))) + '(font-lock-reference-face ((t (:bold t :background "wheat" :foreground "red3")))) + '(font-lock-string-face ((t (:bold t :background "wheat" :foreground "dark goldenrod")))) + '(font-lock-type-face ((t (:bold t :background "wheat" :foreground "brown")))) + '(font-lock-variable-name-face ((t (:bold t :background "wheat" :foreground "chocolate")))) + '(font-lock-warning-face ((t (:bold t :background "wheat" :foreground "black")))) + '(gdb-arrow-face ((t (:bold t :background "LightGreen" :foreground "black")))) + '(green ((t (:bold t :foreground "green")))) + '(gui-button-face ((t (:bold t :background "wheat" :foreground "red")))) + '(gui-element ((t (:bold t :background "wheat" :foreground "black")))) + '(highlight ((t (:bold t :background "darkseagreen2" :foreground "dark green")))) + '(holiday-face ((t (:bold t :background "pink" :foreground "black")))) + '(hproperty:but-face ((t (:bold t :background "wheat" :foreground "medium violet red")))) + '(hproperty:flash-face ((t (:bold t :background "wheat" :foreground "gray80")))) + '(hproperty:highlight-face ((t (:bold t :background "wheat" :foreground "red")))) + '(hproperty:item-face ((t (:bold t)))) + '(isearch ((t (:bold t :background "pale turquoise" :foreground "blue")))) + '(italic ((t (:bold t :background "wheat" :foreground "black")))) + '(left-margin ((t (:bold t :background "wheat" :foreground "black")))) + '(list-mode-item-selected ((t (:bold t :background "gray68" :foreground "black")))) + '(message-cited-text ((t (:bold t :background "wheat" :foreground "brown")))) + '(message-header-contents ((t (:bold t :background "wheat" :foreground "black")))) + '(message-headers ((t (:bold t :background "wheat" :foreground "black")))) + '(message-highlighted-header-contents ((t (:bold t :background "wheat" :foreground "blue")))) + '(message-url ((t (nil)))) + '(mode-line ((t (:bold t :background "light salmon" :foreground "dark green")))) + '(mode-line-buffer-id ((t (:bold t :background "light salmon" :foreground "blue4")))) + '(mode-line-mousable ((t (:bold t :background "light salmon" :foreground "firebrick")))) + '(mode-line-mousable-minor-mode ((t (:bold t :background "light salmon" :foreground "green4")))) + '(pointer ((t (:bold t :background "wheat" :foreground "red")))) + '(primary-selection ((t (:bold t :background "medium sea green")))) + '(red ((t (:bold t :foreground "red")))) + '(right-margin ((t (:bold t :background "wheat" :foreground "black")))) + '(secondary-selection ((t (:bold t :background "paleturquoise" :foreground "black")))) + '(shell-input-face ((t (:bold t :background "wheat" :foreground "blue")))) + '(shell-option-face ((t (:bold t :background "wheat" :foreground "turquoise4")))) + '(shell-output-2-face ((t (:bold t :background "wheat" :foreground "dark goldenrod")))) + '(shell-output-3-face ((t (:bold t :background "wheat" :foreground "dark goldenrod")))) + '(shell-output-face ((t (:bold t :background "wheat" :foreground "black")))) + '(shell-prompt-face ((t (:bold t :background "wheat" :foreground "dark orchid")))) + '(text-cursor ((t (:bold t :background "red" :foreground "wheat")))) + '(toolbar ((t (:bold t :background "wheat" :foreground "black")))) + '(underline ((t (:underline t :bold t :background "wheat" :foreground "black")))) + '(vertical-divider ((t (:bold t)))) + '(widget-button-face ((t (nil)))) + '(widget-button-pressed-face ((t (:bold t :background "wheat" :foreground "red")))) + '(widget-documentation-face ((t (:bold t :background "wheat" :foreground "dark green")))) + '(widget-field-face ((t (:bold t :background "gray85")))) + '(widget-inactive-face ((t (:bold t :background "wheat" :foreground "dim gray")))) + '(x-face ((t (:bold t :background "wheat" :foreground "black")))) + '(yellow ((t (:bold t :foreground "yellow")))) + '(zmacs-region ((t (:bold t :background "lightyellow" :foreground "darkgreen"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'infodoc) + +;;; infodoc-theme.el ends here diff --git a/replace-colorthemes/jb-simple-theme.el b/replace-colorthemes/jb-simple-theme.el new file mode 100644 index 0000000..231cf36 --- /dev/null +++ b/replace-colorthemes/jb-simple-theme.el @@ -0,0 +1,329 @@ +;;; jb-simple-theme.el --- jb-simple theme + +;; Copyright (C) 2000 by jeff +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of jb-simple theme from `color-themes' + +;;; Code: + +(deftheme jb-simple + "jb-simple theme") + +(custom-theme-set-faces + 'jb-simple + + '(default ((t (:background "white" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:foreground "black")))) + + '(gnus-mouse-face ((t (:background "darkseagreen2")))) + '(list-matching-lines-face ((t (:bold t)))) + '(rmail-highlight-face ((t (:bold t :foreground "brown4")))) + '(view-highlight-face ((t (:background "darkseagreen2")))) + + '(blank-space-face ((t (nil)))) + '(blank-tab-face ((t (nil)))) + '(blue ((t (nil)))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(border-glyph ((t (nil)))) + '(calendar-today-face ((t (:underline t)))) + '(cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue")))) + '(cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red")))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(custom-button-face ((t (:bold t)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :bold t :foreground "blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "red")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :bold t :foreground "blue")))) + '(diary-face ((t (:bold t :foreground "red")))) + '(ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick")))) + '(ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black")))) + '(ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid")))) + '(ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy")))) + '(ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black")))) + '(ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-B ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black")))) + '(ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy")))) + '(ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black")))) + '(ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black")))) + '(ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black")))) + '(ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White")))) + '(ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White")))) + '(erc-action-face ((t (:bold t)))) + '(erc-bold-face ((t (:bold t)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (nil)))) + '(erc-error-face ((t (:bold t)))) + '(erc-input-face ((t (nil)))) + '(erc-inverse-face ((t (nil)))) + '(erc-notice-face ((t (nil)))) + '(erc-pal-face ((t (nil)))) + '(erc-prompt-face ((t (nil)))) + '(erc-underline-face ((t (nil)))) + '(eshell-ls-archive-face ((t (:bold t :foreground "Orchid")))) + '(eshell-ls-backup-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "Blue")))) + '(eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen")))) + '(eshell-ls-missing-face ((t (:bold t :foreground "Red")))) + '(eshell-ls-picture-face ((t (nil)))) + '(eshell-ls-product-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-readonly-face ((t (:foreground "Brown")))) + '(eshell-ls-special-face ((t (:bold t :foreground "Magenta")))) + '(eshell-ls-symlink-face ((t (:bold t :foreground "DarkCyan")))) + '(eshell-ls-unreadable-face ((t (:foreground "Grey30")))) + '(eshell-prompt-face ((t (:bold t :foreground "Red")))) + '(eshell-test-failed-face ((t (:bold t :foreground "OrangeRed")))) + '(eshell-test-ok-face ((t (:bold t :foreground "Green")))) + '(excerpt ((t (:italic t)))) + '(ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue")))) + '(fixed ((t (:bold t)))) + '(flyspell-duplicate-face ((t (:underline t :bold t :foreground "Gold3")))) + '(flyspell-incorrect-face ((t (:underline t :bold t :foreground "OrangeRed")))) + '(font-latex-bold-face ((t (nil)))) + '(font-latex-italic-face ((t (nil)))) + '(font-latex-math-face ((t (nil)))) + '(font-latex-sedate-face ((t (nil)))) + '(font-latex-string-face ((t (nil)))) + '(font-latex-warning-face ((t (nil)))) + '(font-lock-builtin-face ((t (:bold t :foreground "Orchid")))) + '(font-lock-comment-face ((t (:italic t :bold t :foreground "blue4")))) + '(font-lock-constant-face ((t (:bold t :foreground "CadetBlue")))) + '(font-lock-doc-string-face ((t (:italic t :bold t :foreground "blue4")))) + '(font-lock-exit-face ((t (nil)))) + '(font-lock-function-name-face ((t (:bold t :foreground "brown4")))) + '(font-lock-keyword-face ((t (:bold t :foreground "black")))) + '(font-lock-preprocessor-face ((t (:foreground "blue3")))) + '(font-lock-reference-face ((t (:foreground "red3")))) + '(font-lock-string-face ((t (:italic t :bold t :foreground "green4")))) + '(font-lock-type-face ((t (:bold t :foreground "steelblue")))) + '(font-lock-variable-name-face ((t (:italic t :bold t :foreground "magenta4")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(gnus-cite-attribution-face ((t (:italic t :bold t)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (nil)))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t)))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t)))) + '(gnus-filterhist-face-1 ((t (nil)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen")))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-header-content-face ((t (:italic t :foreground "indianred4")))) + '(gnus-header-from-face ((t (:bold t :foreground "red3")))) + '(gnus-header-name-face ((t (:bold t :foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "MidnightBlue")))) + '(gnus-header-subject-face ((t (:bold t :foreground "red4")))) + '(gnus-signature-face ((t (:italic t)))) + '(gnus-splash ((t (nil)))) + '(gnus-splash-face ((t (:foreground "ForestGreen")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-high-unread-face ((t (:italic t :bold t)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :bold t :foreground "firebrick")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (:bold t)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(green ((t (nil)))) + '(gui-button-face ((t (:background "grey75")))) + '(gui-element ((t (:background "Gray80")))) + '(highlight ((t (:background "darkseagreen2")))) + '(highlight-changes-delete-face ((t (:underline t :foreground "red")))) + '(highlight-changes-face ((t (:foreground "red")))) + '(highline-face ((t (:background "paleturquoise")))) + '(holiday-face ((t (:background "pink")))) + '(html-helper-italic-face ((t (:italic t)))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:italic t :bold t)))) + '(info-xref ((t (:bold t)))) + '(isearch ((t (nil)))) + '(italic ((t (:italic t)))) + '(lazy-highlight-face ((t (:bold t :foreground "dark magenta")))) + '(left-margin ((t (nil)))) + '(linemenu-face ((t (nil)))) + '(list-mode-item-selected ((t (nil)))) + '(makefile-space-face ((t (:background "hotpink")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4")))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:bold t)))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "darkblue" :foreground "yellow")))) + '(mode-line-buffer-id ((t (:background "black" :foreground "white")))) + '(mode-line-mousable ((t (:background "black" :foreground "white")))) + '(mode-line-mousable-minor-mode ((t (:background "black" :foreground "white")))) + '(nil ((t (nil)))) + '(paren-mismatch-face ((t (:bold t)))) + '(paren-no-match-face ((t (:bold t)))) + '(pointer ((t (nil)))) + '(primary-selection ((t (nil)))) + '(red ((t (nil)))) + '(region ((t (:background "gray")))) + '(right-margin ((t (nil)))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(sgml-doctype-face ((t (nil)))) + '(sgml-end-tag-face ((t (nil)))) + '(sgml-entity-face ((t (nil)))) + '(sgml-ignored-face ((t (nil)))) + '(sgml-sgml-face ((t (nil)))) + '(sgml-start-tag-face ((t (nil)))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:bold t :background "purple" :foreground "white")))) + '(speedbar-button-face ((t (:bold t :foreground "green4")))) + '(speedbar-directory-face ((t (:bold t :foreground "blue4")))) + '(speedbar-file-face ((t (:bold t :foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:underline t :foreground "red")))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(swbuff-current-buffer-face ((t (:bold t)))) + '(term-black ((t (:foreground "black")))) + '(term-blackbg ((t (:background "black")))) + '(term-blue ((t (:foreground "blue")))) + '(term-bluebg ((t (:background "blue")))) + '(term-bold ((t (:bold t)))) + '(term-cyan ((t (:foreground "cyan")))) + '(term-cyanbg ((t (:background "cyan")))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-green ((t (:foreground "green")))) + '(term-greenbg ((t (:background "green")))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (:foreground "magenta")))) + '(term-magentabg ((t (:background "magenta")))) + '(term-red ((t (:foreground "red")))) + '(term-redbg ((t (:background "red")))) + '(term-underline ((t (:underline t)))) + '(term-white ((t (:foreground "white")))) + '(term-whitebg ((t (:background "white")))) + '(term-yellow ((t (:foreground "yellow")))) + '(term-yellowbg ((t (:background "yellow")))) + '(text-cursor ((t (nil)))) + '(toolbar ((t (nil)))) + '(underline ((t (:underline t)))) + '(vc-annotate-face-0046FF ((t (nil)))) + '(vcursor ((t (:underline t :background "cyan" :foreground "blue")))) + '(vertical-divider ((t (nil)))) + '(vhdl-font-lock-attribute-face ((t (:foreground "Orchid")))) + '(vhdl-font-lock-directive-face ((t (:foreground "CadetBlue")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4")))) + '(vhdl-font-lock-function-face ((t (:foreground "Orchid4")))) + '(vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red")))) + '(vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange")))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-speedbar-architecture-face ((t (:foreground "Blue")))) + '(vhdl-speedbar-architecture-selected-face ((t (:underline t :foreground "Blue")))) + '(vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod")))) + '(vhdl-speedbar-configuration-selected-face ((t (:underline t :foreground "DarkGoldenrod")))) + '(vhdl-speedbar-entity-face ((t (:foreground "ForestGreen")))) + '(vhdl-speedbar-entity-selected-face ((t (:underline t :foreground "ForestGreen")))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "Brown")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:underline t :foreground "Brown")))) + '(vhdl-speedbar-package-face ((t (:foreground "Grey50")))) + '(vhdl-speedbar-package-selected-face ((t (:underline t :foreground "Grey50")))) + '(viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black")))) + '(viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen")))) + '(viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-search-face ((t (:background "khaki" :foreground "Black")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85")))) + '(woman-bold-face ((t (:bold t)))) + '(woman-italic-face ((t (nil)))) + '(woman-unknown-face ((t (nil)))) + '(yellow ((t (nil)))) + '(zmacs-region ((t (nil))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'jb-simple) + +;;; jb-simple-theme.el ends here diff --git a/replace-colorthemes/jedit-grey-theme.el b/replace-colorthemes/jedit-grey-theme.el new file mode 100644 index 0000000..5d2e176 --- /dev/null +++ b/replace-colorthemes/jedit-grey-theme.el @@ -0,0 +1,64 @@ +;;; jedit-grey-theme.el --- jedit-grey theme + +;; Copyright (C) 2000 by Gordon Messmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of jedit-grey theme from `color-themes' + +;;; Code: + +(deftheme jedit-grey + "jedit-grey theme") + +(custom-theme-set-faces + 'jedit-grey + + '(default ((t (:background "grey77" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:foreground "black")))) + + '(font-lock-comment-face ((t (:italic t :foreground "RoyalBlue4")))) + '(font-lock-string-face ((t (:foreground "Gold4")))) + '(font-lock-keyword-face ((t (:bold t :foreground "DarkRed")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink")))) + '(font-lock-constant-face ((t (:foreground "DarkCyan")))) + '(font-lock-type-face ((t (:foreground "DarkRed")))) + '(font-lock-function-name-face ((t (:foreground "Green4")))) + '(font-lock-builtin-face ((t (:bold t :foreground "DarkRed")))) + '(highline-face ((t (:background "grey84")))) + '(setnu-line-number-face ((t (:background "White" :foreground "MediumPurple3" :italic t)))) + '(show-paren-match-face ((t (:background "grey60")))) + '(region ((t (:background "grey70")))) + '(highlight ((t (:background "grey90")))) + '(secondary-selection ((t (:background "white")))) + '(widget-field-face ((t (:background "royalblue")))) + '(widget-single-line-field-face ((t (:background "royalblue"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'jedit-grey) + +;;; jedit-grey-theme.el ends here diff --git a/replace-colorthemes/jonadabian-slate-theme.el b/replace-colorthemes/jonadabian-slate-theme.el new file mode 100644 index 0000000..1b36084 --- /dev/null +++ b/replace-colorthemes/jonadabian-slate-theme.el @@ -0,0 +1,158 @@ +;;; jonadabian-slate-theme.el --- jonadabian-slate theme + +;; Copyright (C) 2001 by Jonadab the Unsightly One +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of jonadabian-slate theme from `color-themes' + +;;; Code: + +(deftheme jonadabian-slate + "jonadabian-slate theme") + +(custom-theme-set-faces + 'jonadabian-slate + + '(default ((t (:background "#305050" :foreground "#CCBB77")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "medium turquoise")))) + '(border ((t (:foreground "black")))) + + '(list-matching-lines-face ((t (:bold t :foreground "#EEDDAA")))) + '(ued-mode-keyname-face ((t (:background "#007080" :foreground "cyan")))) + '(view-highlight-face ((t (:background "#226644")))) + + '(fringe ((t (:background "#007080")))) + '(bold ((t (:bold t :foreground "#EEDDAA")))) + '(gnus-emphasis-bold ((t (:bold t :foreground "#EEDDAA")))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t :foreground "#EEDDAA")))) + '(bold-italic ((t (:italic t :bold t :foreground "#AA0000")))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t :foreground "#AA0000")))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t :foreground "#AA0000")))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t :bold t :foreground "#AA0000")))) + '(calendar-today-face ((t (:underline t :background "darkslategrey")))) + '(cperl-array-face ((t (:background "#004060")))) + '(cperl-hash-face ((t (:background "#004400")))) + '(custom-button-face ((t (:background "dark blue" :foreground "rgbi:1.00/1.00/0.00")))) + '(custom-documentation-face ((t (:foreground "#10D010")))) + '(custom-face-tag-face ((t (:underline t :foreground "goldenrod")))) + '(custom-group-tag-face ((t (:underline t :foreground "light blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "pink")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:foreground "#6666dd")))) + '(custom-state-face ((t (:foreground "mediumaquamarine")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :foreground "light blue")))) + '(diary-face ((t (:foreground "red")))) + '(eshell-ls-archive-face ((t (:foreground "green")))) + '(eshell-ls-backup-face ((t (:foreground "grey60")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "SkyBlue")))) + '(eshell-ls-executable-face ((t (:foreground "white")))) + '(eshell-ls-missing-face ((t (:foreground "red")))) + '(eshell-ls-product-face ((t (:foreground "LightSalmon")))) + '(eshell-ls-readonly-face ((t (:foreground "indian red")))) + '(eshell-ls-special-face ((t (:foreground "yellow")))) + '(eshell-ls-symlink-face ((t (:foreground "#6666dd")))) + '(eshell-ls-unreadable-face ((t (:foreground "red")))) + '(eshell-prompt-face ((t (:bold t :background "#305050" :foreground "#EEDD99")))) + '(font-lock-builtin-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-comment-face ((t (:italic t :bold t :foreground "grey66")))) + '(font-lock-constant-face ((t (:foreground "indian red")))) + '(font-lock-function-name-face ((t (:foreground "#D0D000")))) + '(font-lock-keyword-face ((t (:foreground "#00BBBB")))) + '(font-lock-string-face ((t (:foreground "#10D010")))) + '(font-lock-type-face ((t (:bold t :foreground "#ff7788")))) + '(font-lock-variable-name-face ((t (:foreground "#eeddaa")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink")))) + '(header-line ((t (:box (:line-width 1 :style released-button))))) + '(highlight ((t (:background "#226644")))) + '(highlight-changes-delete-face ((t (:background "navy" :foreground "red")))) + '(highlight-changes-face ((t (:background "navy")))) + '(holiday-face ((t (:foreground "#ff7744")))) + '(italic ((t (:italic t :foreground "#AA0000")))) + '(gnus-emphasis-italic ((t (:italic t :foreground "#AA0000")))) + '(mode-line ((t (:background "#007080" :foreground "cyan")))) + '(mode-line-buffer-id ((t (:background "#007080" :foreground "cyan")))) + '(mode-line-mousable ((t (:background "#007080" :foreground "cyan")))) + '(mode-line-mousable-minor-mode ((t (:background "#007080" :foreground "cyan")))) + '(region ((t (:background "#226644")))) + '(secondary-selection ((t (:background "darkslategrey")))) + '(sgml-comment-face ((t (:foreground "grey60")))) + '(sgml-doctype-face ((t (:foreground "red")))) + '(sgml-end-tag-face ((t (:foreground "#00D0D0")))) + '(sgml-entity-face ((t (:foreground "indian red")))) + '(sgml-ignored-face ((t (:background "gray60" :foreground "gray40")))) + '(sgml-ms-end-face ((t (:foreground "green")))) + '(sgml-ms-start-face ((t (:foreground "green")))) + '(sgml-pi-face ((t (:foreground "lime green")))) + '(sgml-sgml-face ((t (:foreground "brown")))) + '(sgml-short-ref-face ((t (:foreground "deep sky blue")))) + '(sgml-start-tag-face ((t (:foreground "#D0D000")))) + '(show-paren-match-face ((t (:background "#400055" :foreground "cyan")))) + '(show-paren-mismatch-face ((t (:background "red")))) + '(special-string-face ((t (:foreground "light green")))) + '(term-black ((t (:background "#000055" :foreground "black")))) + '(term-blackbg ((t (:background "black" :foreground "#CCBB77")))) + '(term-blue ((t (:background "#000055" :foreground "blue")))) + '(term-bluebg ((t (:background "blue" :foreground "#CCBB77")))) + '(term-bold ((t (:bold t :background "#000055" :foreground "#CCBB77")))) + '(term-cyan ((t (:background "#000055" :foreground "cyan")))) + '(term-cyanbg ((t (:background "darkcyan")))) + '(term-default-bg ((t (:foreground "#CCBB77")))) + '(term-default-bg-inv ((t (:foreground "#CCBB77")))) + '(term-default-fg ((t (:background "#000055")))) + '(term-default-fg-inv ((t (:background "#000055")))) + '(term-green ((t (:background "#000055" :foreground "green")))) + '(term-greenbg ((t (:background "darkgreen")))) + '(term-invisible ((t (:foreground "#CCBB77")))) + '(term-invisible-inv ((t (:foreground "#CCBB77")))) + '(term-magenta ((t (:background "#000055" :foreground "magenta")))) + '(term-magentabg ((t (:background "darkmagenta")))) + '(term-red ((t (:background "#000055" :foreground "red")))) + '(term-redbg ((t (:background "darkred")))) + '(term-underline ((t (:underline t :background "#000055" :foreground "#CCBB77")))) + '(term-white ((t (:background "#000055" :foreground "white")))) + '(term-whitebg ((t (:background "grey50")))) + '(term-yellow ((t (:background "#000055" :foreground "yellow")))) + '(term-yellowbg ((t (:background "#997700")))) + '(trailing-whitespace ((t (:background "#23415A")))) + '(underline ((t (:underline t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "green")))) + '(widget-field-face ((t (:background "grey35" :foreground "black")))) + '(widget-inactive-face ((t (:foreground "gray")))) + '(widget-single-line-field-face ((t (:background "dim gray"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'jonadabian-slate) + +;;; jonadabian-slate-theme.el ends here diff --git a/replace-colorthemes/jonadabian-theme.el b/replace-colorthemes/jonadabian-theme.el new file mode 100644 index 0000000..aec9534 --- /dev/null +++ b/replace-colorthemes/jonadabian-theme.el @@ -0,0 +1,66 @@ +;;; jonadabian-theme.el --- jonadabian theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of jonadabian theme from `color-themes' + +;;; Code: + +(deftheme jonadabian + "jonadabian theme") + +(custom-theme-set-faces + 'jonadabian + + '(default ((t (:background "#000055" :foreground "#CCBB77")))) + '(cursor ((t (:background "medium turquoise")))) + + '(mode-line ((t (:foreground "cyan" :background "#007080")))) + '(mode-line-buffer-id ((t (:foreground "cyan" :background "#007080")))) + '(mode-line-mousable ((t (:foreground "cyan" :background "#007080")))) + '(mode-line-mousable-minor-mode ((t (:foreground "cyan" :background "#007080")))) + '(underline ((t (:underline t)))) + '(region ((t (:background "#004080")))) + '(font-lock-keyword-face ((t (:foreground "#00BBBB")))) + '(font-lock-comment-face ((t (:foreground "grey50" :bold t :italic t)))) + '(font-lock-string-face ((t (:foreground "#10D010")))) + '(font-lock-constant-face ((t (:foreground "indian red")))) + '(highlight-changes-face ((t (:background "navy")))) + '(highlight-changes-delete-face ((t (:foreground "red" :background "navy")))) + '(widget-field-face ((t (:foreground "black" :background "grey35")))) + '(widget-inactive-face ((t (:foreground "gray")))) + '(custom-button-face ((t (:foreground "yellow" :background "dark blue")))) + '(custom-state-face ((t (:foreground "mediumaquamarine")))) + '(custom-face-tag-face ((t (:foreground "goldenrod" :underline t)))) + '(custom-documentation-face ((t (:foreground "#10D010")))) + '(custom-set-face ((t (:foreground "#2020D0"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'jonadabian) + +;;; jonadabian-theme.el ends here diff --git a/replace-colorthemes/jsc-dark-theme.el b/replace-colorthemes/jsc-dark-theme.el new file mode 100644 index 0000000..e45d356 --- /dev/null +++ b/replace-colorthemes/jsc-dark-theme.el @@ -0,0 +1,208 @@ +;;; jsc-dark-theme.el --- jsc-dark theme + +;; Copyright (C) 2000 by John S Cooper +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of jsc-dark theme from `color-themes' + +;;; Code: + +(deftheme jsc-dark + "jsc-dark theme") + +(custom-theme-set-faces + 'jsc-dark + + '(default ((t (:background "black" :foreground "cornsilk")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "white")))) + '(border ((t (:foreground "black")))) + + '(gnus-mouse-face ((t (:background "darkslategray" :foreground "wheat")))) + '(goto-address-mail-face ((t (:italic t)))) + '(goto-address-mail-mouse-face ((t (:background "deepskyblue4")))) + '(goto-address-url-face ((t (:bold t :foreground "white")))) + '(goto-address-url-mouse-face ((t (:background "darkslategray" :foreground "wheat")))) + '(list-matching-lines-face ((t (:bold t :foreground "white")))) + '(view-highlight-face ((t (:background "darkslategray" :foreground "wheat")))) + + '(blank-space-face ((t (:background "LightGray")))) + '(blank-tab-face ((t (:background "cornsilk" :foreground "black")))) + '(default ((t (nil)))) + '(bold ((t (:bold t :foreground "white")))) + '(bold-italic ((t (:italic t :bold t)))) + '(calendar-today-face ((t (:underline t)))) + '(cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue")))) + '(cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red")))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(custom-button-face ((t (:foreground "white")))) + '(custom-changed-face ((t (:background "skyblue" :foreground "wheat")))) + '(custom-documentation-face ((t (:foreground "white")))) + '(custom-face-tag-face ((t (:underline t :foreground "white")))) + '(custom-group-tag-face ((t (:underline t :foreground "skyblue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "pink")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:foreground "blue")))) + '(custom-state-face ((t (:foreground "light green")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :foreground "skyblue")))) + '(diary-face ((t (:bold t :foreground "orange")))) + '(font-lock-builtin-face ((t (:bold t :foreground "LightSteelBlue")))) + '(font-lock-comment-face ((t (:italic t :foreground "red")))) + '(font-lock-constant-face ((t (:bold t :foreground "salmon")))) + '(font-lock-function-name-face ((t (:bold t :foreground "orange")))) + '(font-lock-keyword-face ((t (:bold t :foreground "gold")))) + '(font-lock-string-face ((t (:italic t :foreground "orange")))) + '(font-lock-type-face ((t (:bold t :foreground "gold")))) + '(font-lock-variable-name-face ((t (:italic t :bold t :foreground "light salmon")))) + '(font-lock-warning-face ((t (:bold t :foreground "gold")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "light cyan")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "light blue")))) + '(gnus-cite-face-3 ((t (:foreground "light yellow")))) + '(gnus-cite-face-4 ((t (:foreground "light pink")))) + '(gnus-cite-face-5 ((t (:foreground "pale green")))) + '(gnus-cite-face-6 ((t (:foreground "beige")))) + '(gnus-cite-face-7 ((t (:foreground "orange")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:background "goldenrod4" :foreground "white")))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t :background "yellow" :foreground "black")))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t :background "yellow" :foreground "black")))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t :background "yellow" :foreground "black")))) + '(gnus-filterhist-face-1 ((t (nil)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "gray80")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "white")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "lightcyan")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "lightcyan")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "tan")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "tan")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "white")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "white")))) + '(gnus-group-news-2-empty-face ((t (:foreground "lightcyan")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "lightcyan")))) + '(gnus-group-news-3-empty-face ((t (:foreground "tan")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "tan")))) + '(gnus-group-news-4-empty-face ((t (:foreground "white")))) + '(gnus-group-news-4-face ((t (:bold t :foreground "white")))) + '(gnus-group-news-5-empty-face ((t (:foreground "wheat")))) + '(gnus-group-news-5-face ((t (:bold t :foreground "wheat")))) + '(gnus-group-news-6-empty-face ((t (:foreground "tan")))) + '(gnus-group-news-6-face ((t (:bold t :foreground "tan")))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise")))) + '(gnus-header-content-face ((t (:italic t :foreground "plum1")))) + '(gnus-header-from-face ((t (:bold t :foreground "wheat")))) + '(gnus-header-name-face ((t (:bold t :foreground "gold")))) + '(gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "wheat")))) + '(gnus-header-subject-face ((t (:bold t :foreground "red")))) + '(gnus-signature-face ((t (:italic t :foreground "maroon")))) + '(gnus-splash ((t (:foreground "Brown")))) + '(gnus-splash-face ((t (:foreground "gold")))) + '(gnus-summary-cancelled-face ((t (:background "gray" :foreground "black")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "gray70")))) + '(gnus-summary-high-unread-face ((t (:italic t :bold t)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :bold t :foreground "gray70")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "PaleGreen")))) + '(gnus-summary-normal-ticked-face ((t (:bold t :foreground "gray70")))) + '(gnus-summary-normal-unread-face ((t (:bold t)))) + '(gnus-summary-selected-face ((t (:underline t :background "deepskyblue4")))) + '(highlight ((t (:background "darkslategray" :foreground "wheat")))) + '(highlight-changes-delete-face ((t (:underline t :foreground "red")))) + '(highlight-changes-face ((t (:foreground "red")))) + '(highline-face ((t (:background "gray35")))) + '(holiday-face ((t (:background "red")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:italic t :bold t :foreground "yellow")))) + '(info-xref ((t (:bold t :foreground "plum")))) + '(italic ((t (:italic t)))) + '(lazy-highlight-face ((t (:bold t :foreground "dark magenta")))) + '(linemenu-face ((t (:background "gray30")))) + '(makefile-space-face ((t (:background "hotpink")))) + '(message-cited-text-face ((t (:foreground "plum1")))) + '(message-header-cc-face ((t (:bold t :foreground "ivory")))) + '(message-header-name-face ((t (:foreground "light sky blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "lavender blush")))) + '(message-header-other-face ((t (:foreground "pale turquoise")))) + '(message-header-subject-face ((t (:bold t :foreground "papaya whip")))) + '(message-header-to-face ((t (:bold t :foreground "floral white")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:bold t :foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "sandy brown")))) + '(mode-line ((t (:background "tan" :foreground "black")))) + '(mode-line-buffer-id ((t (:background "tan" :foreground "black")))) + '(mode-line-mousable ((t (:background "tan" :foreground "black")))) + '(mode-line-mousable-minor-mode ((t (:background "tan" :foreground "black")))) + '(paren-mismatch-face ((t (:bold t :background "white" :foreground "red")))) + '(paren-no-match-face ((t (:bold t :background "white" :foreground "red")))) + '(region ((t (:background "slategrey")))) + '(secondary-selection ((t (:background "deepskyblue4")))) + '(sgml-doctype-face ((t (:foreground "orange")))) + '(sgml-end-tag-face ((t (:foreground "greenyellow")))) + '(sgml-entity-face ((t (:foreground "gold")))) + '(sgml-ignored-face ((t (:background "gray60" :foreground "gray20")))) + '(sgml-sgml-face ((t (:foreground "yellow")))) + '(sgml-start-tag-face ((t (:foreground "mediumspringgreen")))) + '(show-paren-match-face ((t (:background "deepskyblue4")))) + '(show-paren-mismatch-face ((t (:bold t :background "red" :foreground "white")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:bold t :foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:underline t :foreground "red")))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(underline ((t (:underline t)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:background "gray20")))) + '(widget-inactive-face ((t (:foreground "wheat")))) + '(widget-single-line-field-face ((t (:background "gray20")))) + '(woman-bold-face ((t (:bold t)))) + '(woman-italic-face ((t (:foreground "beige")))) + '(woman-unknown-face ((t (:foreground "LightSalmon"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'jsc-dark) + +;;; jsc-dark-theme.el ends here diff --git a/replace-colorthemes/jsc-light-theme.el b/replace-colorthemes/jsc-light-theme.el new file mode 100644 index 0000000..67d28a5 --- /dev/null +++ b/replace-colorthemes/jsc-light-theme.el @@ -0,0 +1,175 @@ +;;; jsc-light-theme.el --- jsc-light theme + +;; Copyright (C) 2000 by John S Cooper +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of jsc-light theme from `color-themes' + +;;; Code: + +(deftheme jsc-light + "jsc-light theme") + +(custom-theme-set-faces + 'jsc-light + + '(default ((t (:background "white" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "Red")))) + '(border ((t (:foreground "black")))) + + '(gnus-mouse-face ((t (:background "antiquewhite" :foreground "blue")))) + '(list-matching-lines-face ((t (:bold t :foreground "red3")))) + '(view-highlight-face ((t (:background "antiquewhite" :foreground "blue")))) + + '(default ((t (nil)))) + '(bold ((t (:bold t :foreground "red3")))) + '(bold-italic ((t (:italic t :bold t :foreground "red")))) + '(custom-button-face ((t (nil)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :foreground "blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "red")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :foreground "blue")))) + '(font-lock-builtin-face ((t (:foreground "Orchid")))) + '(font-lock-comment-face ((t (:italic t :bold t :foreground "Red3")))) + '(font-lock-constant-face ((t (:foreground "navy")))) + '(font-lock-function-name-face ((t (:bold t :foreground "Blue")))) + '(font-lock-keyword-face ((t (:bold t :foreground "Purple")))) + '(font-lock-string-face ((t (:foreground "Green4")))) + '(font-lock-type-face ((t (:foreground "Navy")))) + '(font-lock-variable-name-face ((t (:foreground "Tan4")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t)))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "blue2")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "blue2")))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-header-content-face ((t (:italic t :foreground "blue")))) + '(gnus-header-from-face ((t (:foreground "red3")))) + '(gnus-header-name-face ((t (:foreground "red3")))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue")))) + '(gnus-header-subject-face ((t (:bold t :foreground "red")))) + '(gnus-signature-face ((t (:foreground "pink")))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "navy")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-high-unread-face ((t (:bold t :foreground "blue")))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "red3")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "black")))) + '(gnus-summary-normal-unread-face ((t (:bold t :foreground "red3")))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(highlight ((t (:background "antiquewhite" :foreground "blue")))) + '(italic ((t (:italic t)))) + '(makefile-space-face ((t (:background "hotpink")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4")))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "plum" :foreground "black")))) + '(mode-line-buffer-id ((t (:background "plum" :foreground "black")))) + '(mode-line-mousable ((t (:background "plum" :foreground "black")))) + '(mode-line-mousable-minor-mode ((t (:background "plum" :foreground "black")))) + '(region ((t (:background "plum")))) + '(secondary-selection ((t (:background "palegreen")))) + '(show-paren-match-face ((t (:background "plum")))) + '(show-paren-mismatch-face ((t (:background "navy" :foreground "white")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:underline t :foreground "red")))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(underline ((t (:underline t)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'jsc-light) + +;;; jsc-light-theme.el ends here diff --git a/replace-colorthemes/jsc-light2-theme.el b/replace-colorthemes/jsc-light2-theme.el new file mode 100644 index 0000000..914a133 --- /dev/null +++ b/replace-colorthemes/jsc-light2-theme.el @@ -0,0 +1,185 @@ +;;; jsc-light2-theme.el --- jsc-light2 theme + +;; Copyright (C) 2001 by John S Cooper +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of jsc-light2 theme from `color-themes' + +;;; Code: + +(deftheme jsc-light2 + "jsc-light2 theme") + +(custom-theme-set-faces + 'jsc-light2 + + '(default ((t (:background "white" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "Red")))) + '(border ((t (:foreground "black")))) + + '(gnus-mouse-face ((t (:background "antiquewhite" :foreground "blue")))) + '(list-matching-lines-face ((t (:bold t :foreground "red3")))) + '(view-highlight-face ((t (:background "antiquewhite" :foreground "blue")))) + '(default ((t (nil)))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :weight bold)))) + '(custom-button-face ((t (:background "lightgrey" :foreground "black" + :box (:line-width 2 :style released-button))))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:bold t :weight bold :height 1.2)))) + '(custom-group-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2)))) + '(custom-group-tag-face-1 ((t (:bold t :foreground "red" :weight bold :height 1.2)))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2)))) + '(font-lock-builtin-face ((t (:foreground "Orchid")))) + '(font-lock-comment-face ((t (:italic t :bold t :foreground "Red3")))) + '(font-lock-constant-face ((t (:foreground "Maroon")))) + '(font-lock-function-name-face ((t (:foreground "Blue")))) + '(font-lock-keyword-face ((t (:bold t :foreground "Purple")))) + '(font-lock-string-face ((t (:foreground "Green4")))) + '(font-lock-type-face ((t (:italic t :foreground "Navy" :slant italic)))) + '(font-lock-variable-name-face ((t (:foreground "Tan4")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t)))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "Blue2")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "blue2")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen" :weight bold)))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-header-content-face ((t (:italic t :foreground "indianred4" :slant italic)))) + '(gnus-header-from-face ((t (:foreground "red3")))) + '(gnus-header-name-face ((t (:bold t :foreground "maroon" :weight bold)))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue")))) + '(gnus-header-subject-face ((t (:foreground "red4")))) + '(gnus-signature-face ((t (:italic t :slant italic)))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen" :weight bold)))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-high-unread-face ((t (:bold t :weight bold)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "Navy")))) + '(gnus-summary-normal-unread-face ((t (:bold t :foreground "DarkGreen" :weight bold)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(highlight ((t (:background "darkseagreen2")))) + '(italic ((t (:italic t)))) + '(makefile-space-face ((t (:background "hotpink")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4")))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "plum" :foreground "black")))) + '(mode-line-buffer-id ((t (:background "plum" :foreground "black")))) + '(mode-line-mousable ((t (:background "plum" :foreground "black")))) + '(mode-line-mousable-minor-mode ((t (:background "plum" :foreground "black")))) + '(region ((t (:background "lightgoldenrod2")))) + '(secondary-selection ((t (:background "yellow")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:underline t :foreground "red")))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(underline ((t (:underline t)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85")))) + '(change-log-file-face ((t (:foreground "Blue")))) + '(change-log-name-face ((t (:foreground "Maroon")))) + '(comint-highlight-prompt ((t (:foreground "dark blue")))) + '(fringe ((t (:background "grey88")))) + '(header-line ((t (:background "grey90" :foreground "grey20" :box nil)))) + '(ido-subdir-face ((t (:foreground "red")))) + '(isearch ((t (:background "magenta4" :foreground "lightskyblue1")))) + '(mode-line ((t (:background "grey88" :foreground "black" :box (:line-width -1 :style released-button))))) + '(scroll-bar ((t (nil)))) + '(tooltip ((t (:background "lightyellow" :foreground "black"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'jsc-light2) + +;;; jsc-light2-theme.el ends here diff --git a/replace-colorthemes/julie-theme.el b/replace-colorthemes/julie-theme.el new file mode 100644 index 0000000..c571539 --- /dev/null +++ b/replace-colorthemes/julie-theme.el @@ -0,0 +1,432 @@ +;;; julie-theme.el --- julie theme + +;; Copyright (C) 2011 Christian Brassat, Bozhidar Batsov +;; Copyright (C) 2014 by Syohei YOSHIDA + +;; Author: Christian Brassat +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of julie theme from `color-themes' + +;;; Code: + +(deftheme julie + "julie theme") + +(let ((julie-fg "#c6a57b") + (julie-bg-1 "#101010") + (julie-bg "#151515") + (julie-bg+1 "#202020") + (julie-bg+2 "#505050") + (julie-red+1 "#8d4a4a") + (julie-red "#953331") + (julie-red-1 "#953331") + (julie-orange "#ff8939") + (julie-yellow "#909737") + (julie-yellow-1 "#909737") + (julie-green-1 "#546a29") + (julie-green "#546a29") + (julie-green+1 "#7e9960") + (julie-cyan "#34676f") + (julie-blue+1 "#5c737c") + (julie-blue "#385e6b") + (julie-blue-1 "#385e6b") + (julie-magenta "#7f355e")) + + (custom-theme-set-faces + 'julie + + ;;; color-theme mapping + `(default ((t (:background ,julie-bg :foreground ,julie-fg)))) + `(cursor ((t (:background ,julie-orange)))) + + ;;; define some reusable julie faces that we can inherit from afterwards + `(julie-strong-1-face ((t (:foreground ,julie-yellow :weight bold)))) + `(julie-strong-2-face ((t (:foreground ,julie-orange :weight bold)))) + `(julie-warning-face ((t (:foreground ,julie-yellow-1 :weight bold :underline t)))) + `(julie-error-face ((t (:foreground ,julie-red-1 :weight bold :underline t)))) + + ;;; custom faces + `(linum ((t (:foreground "#505050" :background ,julie-bg-1 :weight normal)))) + `(tooltip ((t (:foreground ,julie-bg :background ,julie-fg)))) + `(fixed-pitch ((t (:family "Anka/Coder" :height 75)))) + `(variable-pitch ((t (:family "Helvetica Neue LT Std")))) + + ;;; whitespace + `(whitespace-space ((t (:foreground ,julie-bg+1)))) + `(whitespace-tab ((t (:foreground ,julie-bg+1)))) + `(whitespace-trailing ((t (:background ,julie-yellow :weight bold)))) + `(whitespace-newline ((t (:foreground ,julie-bg+1)))) + `(whitespace-empty ((t (:foreground ,julie-fg :background ,julie-bg)))) + + ;;; basic coloring + `(fringe ((t (:foreground "#303030" :background ,julie-bg)))) + `(escape-glyph-face ((t (:foreground ,julie-red)))) + `(header-line ((t (:foreground ,julie-yellow :background ,julie-bg-1 + :box (:line-width 5 :color ,julie-bg-1))))) + `(highlight ((t (:background ,julie-bg+1)))) + + ;; faces used by isearch + `(isearch ((t (:foreground ,julie-yellow :background ,julie-bg-1)))) + `(isearch-fail ((t (:foreground ,julie-fg :background ,julie-red-1)))) + `(lazy-highlight ((t (:foreground ,julie-yellow :background ,julie-bg+2)))) + + `(menu ((t (:foreground ,julie-fg :background ,julie-bg)))) + `(minibuffer-prompt ((t (:foreground ,julie-yellow)))) + `(mode-line + ((t (:foreground ,julie-fg :background ,julie-bg+1 + :box (:line-width 5 :color ,julie-bg+1))))) + `(mode-line-highlight ((t (:inverse-video t)))) + `(mode-line-inactive ((t (:inherit mode-line :background ,julie-bg-1 + :box (:line-width 5 :color ,julie-bg-1))))) + `(mode-line-buffer-id ((t (:inherit julie-strong-1-face)))) + `(mode-line-inactive + ((t (:foreground ,julie-green-1 :background ,julie-bg-1)))) + `(mode-line-folder-face ((t (:foreground ,julie-bg+2)))) + `(mode-line-modified-face ((t (:foreground ,julie-red)))) + `(mode-line-buffer-name ((t (:foreground ,julie-yellow :weight bold)))) + `(mode-line-mode-name ((t (:foreground ,julie-blue)))) + `(mode-line-mode-string ((t (:foreground ,julie-yellow)))) + `(region ((t (:background ,julie-magenta)))) + `(secondary-selection ((t (:background ,julie-bg+2)))) + `(trailing-whitespace ((t (:background ,julie-red)))) + `(vertical-border ((t (:foreground ,julie-fg)))) + + ;;; font lock + `(font-lock-builtin-face ((t (:foreground ,julie-blue)))) + `(font-lock-comment-face ((t (:foreground ,julie-bg+2)))) + `(font-lock-comment-delimiter-face ((t (:foreground ,julie-bg+2)))) + `(font-lock-constant-face ((t (:foreground ,julie-fg)))) + `(font-lock-doc-face ((t (:foreground ,julie-green+1)))) + `(font-lock-doc-string-face ((t (:foreground ,julie-blue+1)))) + `(font-lock-function-name-face ((t (:foreground ,julie-blue)))) + `(font-lock-keyword-face ((t (:inherit julie-strong-1-face)))) + `(font-lock-negation-char-face ((t (:foreground ,julie-fg)))) + `(font-lock-preprocessor-face ((t (:foreground ,julie-blue)))) + `(font-lock-string-face ((t (:foreground ,julie-red)))) + `(font-lock-type-face ((t (:foreground ,julie-yellow)))) + `(font-lock-variable-name-face ((t (:foreground ,julie-yellow)))) + `(font-lock-warning-face ((t (:inherit julie-warning-face)))) + + ;;; external + + ;; diff + `(diff-added ((t (:foreground ,julie-green+1)))) + `(diff-changed ((t (:foreground ,julie-yellow)))) + `(diff-removed ((t (:foreground ,julie-red)))) + `(diff-header ((t (:background ,julie-bg+1)))) + `(diff-file-header + ((t (:background ,julie-bg+2 :foreground ,julie-fg :bold t)))) + + ;; eshell + `(eshell-prompt ((t (:inherit julie-strong-1-face)))) + `(eshell-ls-archive ((t (:foreground ,julie-red-1 :weight bold)))) + `(eshell-ls-backup ((t (:inherit font-lock-comment)))) + `(eshell-ls-clutter ((t (:inherit font-lock-comment)))) + `(eshell-ls-directory ((t (:foreground ,julie-blue+1 :weight bold)))) + `(eshell-ls-executable ((t (:foreground ,julie-red+1 :weight bold)))) + `(eshell-ls-unreadable ((t (:foreground ,julie-fg)))) + `(eshell-ls-missing ((t (:inherit font-lock-warning)))) + `(eshell-ls-product ((t (:inherit font-lock-doc)))) + `(eshell-ls-special ((t (:inherit julie-strong-1-face)))) + `(eshell-ls-symlink ((t (:foreground ,julie-cyan :weight bold)))) + + ;; flymake + `(flymake-errline ((t (:inherit julie-error-face)))) + `(flymake-warnline ((t (:inherit julie-warning-face)))) + + ;; flyspell + `(flyspell-duplicate ((t (:inherit julie-warning-face)))) + `(flyspell-incorrect ((t (:inherit julie-error-face)))) + + ;; erc + `(erc-action-face ((t (:inherit erc-default-face)))) + `(erc-bold-face ((t (:weight bold)))) + `(erc-current-nick-face ((t (:inherit julie-strong-1-face)))) + `(erc-dangerous-host-face ((t (:inherit font-lock-warning)))) + `(erc-default-face ((t (:foreground ,julie-fg)))) + `(erc-direct-msg-face ((t (:inherit erc-default)))) + `(erc-error-face ((t (:inherit font-lock-warning)))) + `(erc-fool-face ((t (:inherit erc-default)))) + `(erc-highlight-face ((t (:inherit hover-highlight)))) + `(erc-input-face ((t (:foreground ,julie-yellow)))) + `(erc-keyword-face ((t (:inherit julie-strong-1-face)))) + `(erc-nick-default-face ((t (:weigth bold)))) + `(erc-nick-msg-face ((t (:inherit erc-default)))) + `(erc-notice-face ((t (:foreground ,julie-green)))) + `(erc-pal-face ((t (:foreground ,julie-orange :weight bold)))) + `(erc-prompt-face ((t (:inherit julie-strong-2-face)))) + `(erc-timestamp-face ((t (:foreground ,julie-green+1)))) + `(erc-underline-face ((t (:underline t)))) + + ;; gnus + `(gnus-group-mail-1-face ((t (:bold t :inherit gnus-group-mail-1-empty)))) + `(gnus-group-mail-1-empty-face ((t (:inherit gnus-group-news-1-empty)))) + `(gnus-group-mail-2-face ((t (:bold t :inherit gnus-group-mail-2-empty)))) + `(gnus-group-mail-2-empty-face ((t (:inherit gnus-group-news-2-empty)))) + `(gnus-group-mail-3-face ((t (:bold t :inherit gnus-group-mail-3-empty)))) + `(gnus-group-mail-3-empty-face ((t (:inherit gnus-group-news-3-empty)))) + `(gnus-group-mail-4-face ((t (:bold t :inherit gnus-group-mail-4-empty)))) + `(gnus-group-mail-4-empty-face ((t (:inherit gnus-group-news-4-empty)))) + `(gnus-group-mail-5-face ((t (:bold t :inherit gnus-group-mail-5-empty)))) + `(gnus-group-mail-5-empty-face ((t (:inherit gnus-group-news-5-empty)))) + `(gnus-group-mail-6-face ((t (:bold t :inherit gnus-group-mail-6-empty)))) + `(gnus-group-mail-6-empty-face ((t (:inherit gnus-group-news-6-empty)))) + `(gnus-group-mail-low-face ((t (:bold t :inherit gnus-group-mail-low-empty)))) + `(gnus-group-mail-low-empty-face ((t (:inherit gnus-group-news-low-empty)))) + `(gnus-group-news-1-face ((t (:bold t :inherit gnus-group-news-1-empty)))) + `(gnus-group-news-2-face ((t (:bold t :inherit gnus-group-news-2-empty)))) + `(gnus-group-news-3-face ((t (:bold t :inherit gnus-group-news-3-empty)))) + `(gnus-group-news-4-face ((t (:bold t :inherit gnus-group-news-4-empty)))) + `(gnus-group-news-5-face ((t (:bold t :inherit gnus-group-news-5-empty)))) + `(gnus-group-news-6-face ((t (:bold t :inherit gnus-group-news-6-empty)))) + `(gnus-group-news-low-face ((t (:bold t :inherit gnus-group-news-low-empty)))) + `(gnus-header-content-face ((t (:inherit message-header-other)))) + `(gnus-header-from-face ((t (:inherit message-header-from)))) + `(gnus-header-name-face ((t (:inherit message-header-name)))) + `(gnus-header-newsgroups-face ((t (:inherit message-header-other)))) + `(gnus-header-subject-face ((t (:inherit message-header-subject)))) + `(gnus-summary-cancelled-face ((t (:foreground ,julie-orange)))) + `(gnus-summary-high-ancient-face ((t (:foreground ,julie-blue)))) + `(gnus-summary-high-read-face ((t (:foreground ,julie-green :weight bold)))) + `(gnus-summary-high-ticked-face ((t (:inherit julie-strong-2-face)))) + `(gnus-summary-high-unread-face ((t (:foreground ,julie-fg :weight bold)))) + `(gnus-summary-low-ancient-face ((t (:foreground ,julie-blue)))) + `(gnus-summary-low-read-face ((t (:foreground ,julie-green)))) + `(gnus-summary-low-ticked-face ((t (:inherit julie-strong-2-face)))) + `(gnus-summary-low-unread-face ((t (:foreground ,julie-fg)))) + `(gnus-summary-normal-ancient-face ((t (:foreground ,julie-blue)))) + `(gnus-summary-normal-read-face ((t (:foreground ,julie-green)))) + `(gnus-summary-normal-ticked-face ((t (:inherit julie-strong-2-face)))) + `(gnus-summary-normal-unread-face ((t (:foreground ,julie-fg)))) + `(gnus-summary-selected-face ((t (:inherit julie-strong-1-face)))) + `(gnus-cite-1-face ((t (:foreground ,julie-blue)))) + `(gnus-cite-10-face ((t (:foreground ,julie-yellow-1)))) + `(gnus-cite-11-face ((t (:foreground ,julie-yellow)))) + `(gnus-cite-2-face ((t (:foreground ,julie-blue-1)))) + `(gnus-cite-3-face ((t (:foreground ,julie-blue-1)))) + `(gnus-cite-4-face ((t (:foreground ,julie-green+1)))) + `(gnus-cite-5-face ((t (:foreground ,julie-green+1)))) + `(gnus-cite-6-face ((t (:foreground ,julie-green)))) + `(gnus-cite-7-face ((t (:foreground ,julie-red)))) + `(gnus-cite-8-face ((t (:foreground ,julie-red-1)))) + `(gnus-cite-9-face ((t (:foreground ,julie-red-1)))) + `(gnus-group-news-1-empty-face ((t (:foreground ,julie-yellow)))) + `(gnus-group-news-2-empty-face ((t (:foreground ,julie-green+1)))) + `(gnus-group-news-3-empty-face ((t (:foreground ,julie-green+1)))) + `(gnus-group-news-4-empty-face ((t (:foreground ,julie-blue-1)))) + `(gnus-group-news-5-empty-face ((t (:foreground ,julie-blue-1)))) + `(gnus-group-news-6-empty-face ((t (:foreground ,julie-bg+2)))) + `(gnus-group-news-low-empty-face ((t (:foreground ,julie-bg+2)))) + `(gnus-signature-face ((t (:foreground ,julie-yellow)))) + `(gnus-x-face ((t (:background ,julie-fg :foreground ,julie-bg)))) + + ;; hl-line-mode + `(hl-line-face ((t (:background ,julie-bg-1)))) + + ;; ido-mode + `(ido-first-match ((t (:inherit julie-strong-1-face)))) + `(ido-only-match ((t (:inherit julie-strong-2-face)))) + `(ido-subdir ((t (:foreground ,julie-yellow)))) + + ;; magit + `(magit-section-title ((t (:inherit julie-strong-1-face)))) + `(magit-branch ((t (:inherit julie-strong-2-face)))) + + ;; markdown + `(markdown-header-face ((t (:inherit variable-pitch)))) + `(markdown-header-face-1 ((t (:height 200 :inherit markdown-header-face)))) + `(markdown-header-face-2 ((t (:height 150 :inherit markdown-header-face)))) + `(markdown-header-face-3 ((t (:height 100 :inherit markdown-header-face)))) + `(markdown-header-face-4 ((t (:height 90 :inherit markdown-header-face)))) + + ;; message-mode + `(message-cited-text-face ((t (:inherit font-lock-comment)))) + `(message-header-name-face ((t (:foreground ,julie-green+1)))) + `(message-header-other-face ((t (:foreground ,julie-green)))) + `(message-header-to-face ((t (:inherit julie-strong-1-face)))) + `(message-header-from-face ((t (:inherit julie-strong-1-face)))) + `(message-header-cc-face ((t (:inherit julie-strong-1-face)))) + `(message-header-newsgroups-face ((t (:inherit julie-strong-1-face)))) + `(message-header-subject-face ((t (:inherit julie-strong-2-face)))) + `(message-header-xheader-face ((t (:foreground ,julie-green)))) + `(message-mml-face ((t (:inherit julie-strong-1-face)))) + `(message-separator-face ((t (:inherit font-lock-comment)))) + + ;; mew + `(mew-face-header-subject ((t (:foreground ,julie-orange)))) + `(mew-face-header-from ((t (:foreground ,julie-yellow)))) + `(mew-face-header-date ((t (:foreground ,julie-green)))) + `(mew-face-header-to ((t (:foreground ,julie-red)))) + `(mew-face-header-key ((t (:foreground ,julie-green)))) + `(mew-face-header-private ((t (:foreground ,julie-green)))) + `(mew-face-header-important ((t (:foreground ,julie-blue)))) + `(mew-face-header-marginal ((t (:foreground ,julie-fg :weight bold)))) + `(mew-face-header-warning ((t (:foreground ,julie-red)))) + `(mew-face-header-xmew ((t (:foreground ,julie-green)))) + `(mew-face-header-xmew-bad ((t (:foreground ,julie-red)))) + `(mew-face-body-url ((t (:foreground ,julie-orange)))) + `(mew-face-body-comment ((t (:foreground ,julie-fg :slant italic)))) + `(mew-face-body-cite1 ((t (:foreground ,julie-green)))) + `(mew-face-body-cite2 ((t (:foreground ,julie-blue)))) + `(mew-face-body-cite3 ((t (:foreground ,julie-orange)))) + `(mew-face-body-cite4 ((t (:foreground ,julie-yellow)))) + `(mew-face-body-cite5 ((t (:foreground ,julie-red)))) + `(mew-face-mark-review ((t (:foreground ,julie-blue)))) + `(mew-face-mark-escape ((t (:foreground ,julie-green)))) + `(mew-face-mark-delete ((t (:foreground ,julie-red)))) + `(mew-face-mark-unlink ((t (:foreground ,julie-yellow)))) + `(mew-face-mark-refile ((t (:foreground ,julie-green)))) + `(mew-face-mark-unread ((t (:foreground ,julie-red-1)))) + `(mew-face-eof-message ((t (:foreground ,julie-green)))) + `(mew-face-eof-part ((t (:foreground ,julie-yellow)))) + + ;; minimap + `(minimap-font-face ((default (:height 30 :family "Anka/Coder")) (nil nil))) + `(minimap-semantic-function-face ((((background dark)) (:inherit (font-lock-function-name-face minimap-font-face) :background "gray10")))) + `(minimap-semantic-type-face ((t (:inherit (font-lock-type-face minimap-font-face) :background "gray10")))) + `(minimap-semantic-variable-face ((t (:inherit (font-lock-variable-name-face minimap-font-face) :background "gray10")))) + + ;; nav + `(nav-face-heading ((t (:foreground ,julie-yellow)))) + `(nav-face-button-num ((t (:foreground ,julie-cyan)))) + `(nav-face-dir ((t (:foreground ,julie-green)))) + `(nav-face-hdir ((t (:foreground ,julie-red)))) + `(nav-face-file ((t (:foreground ,julie-fg)))) + `(nav-face-hfile ((t (:foreground ,julie-red-1)))) + + ;; org-mode + `(org-agenda-date-today + ((t (:foreground "white" :slant italic :weight bold))) t) + `(org-agenda-structure + ((t (:inherit font-lock-comment-face)))) + `(org-archived ((t (:foreground ,julie-fg :weight bold)))) + `(org-checkbox ((t (:background ,julie-bg+2 :foreground "white" + :box (:line-width 1 :style released-button))))) + `(org-date ((t (:foreground ,julie-blue :underline t)))) + `(org-deadline-announce ((t (:foreground ,julie-red-1)))) + `(org-done ((t (:bold t :weight bold :foreground ,julie-green+1)))) + `(org-formula ((t (:foreground ,julie-yellow-1)))) + `(org-headline-done ((t (:foreground ,julie-green+1)))) + `(org-hide ((t (:foreground ,julie-bg-1)))) + `(org-level-1 ((t (:foreground ,julie-orange)))) + `(org-level-2 ((t (:foreground ,julie-green+1)))) + `(org-level-3 ((t (:foreground ,julie-blue-1)))) + `(org-level-4 ((t (:foreground ,julie-yellow-1)))) + `(org-level-5 ((t (:foreground ,julie-cyan)))) + `(org-level-6 ((t (:foreground ,julie-green-1)))) + `(org-level-7 ((t (:foreground ,julie-red-1)))) + `(org-level-8 ((t (:foreground ,julie-blue-1)))) + `(org-link ((t (:foreground ,julie-yellow-1 :underline t)))) + `(org-scheduled ((t (:foreground ,julie-green+1)))) + `(org-scheduled-previously ((t (:foreground ,julie-red-1)))) + `(org-scheduled-today ((t (:foreground ,julie-blue+1)))) + `(org-special-keyword ((t (:foreground ,julie-yellow-1)))) + `(org-table ((t (:foreground ,julie-green+1)))) + `(org-tag ((t (:bold t :weight bold)))) + `(org-time-grid ((t (:foreground ,julie-orange)))) + `(org-todo ((t (:bold t :foreground ,julie-red :weight bold)))) + `(org-upcoming-deadline ((t (:inherit font-lock-keyword-face)))) + `(org-warning ((t (:bold t :foreground ,julie-red :weight bold)))) + + ;; outline + '(outline-8 ((t (:inherit default)))) + '(outline-7 ((t (:inherit outline-8 :height 1.0)))) + '(outline-6 ((t (:inherit outline-7 :height 1.0)))) + '(outline-5 ((t (:inherit outline-6 :height 1.0)))) + '(outline-4 ((t (:inherit outline-5 :height 1.0)))) + '(outline-3 ((t (:inherit outline-4 :height 1.0)))) + '(outline-2 ((t (:inherit outline-3 :height 1.0)))) + '(outline-1 ((t (:inherit outline-2 :height 1.0)))) + + ;; rainbow-delimiters + `(rainbow-delimiters-depth-1-face ((t (:foreground ,julie-cyan)))) + `(rainbow-delimiters-depth-2-face ((t (:foreground ,julie-yellow)))) + `(rainbow-delimiters-depth-3-face ((t (:foreground ,julie-blue+1)))) + `(rainbow-delimiters-depth-4-face ((t (:foreground ,julie-red+1)))) + `(rainbow-delimiters-depth-5-face ((t (:foreground ,julie-orange)))) + `(rainbow-delimiters-depth-6-face ((t (:foreground ,julie-blue-1)))) + `(rainbow-delimiters-depth-7-face ((t (:foreground ,julie-green+1)))) + `(rainbow-delimiters-depth-8-face ((t (:foreground ,julie-red-1)))) + `(rainbow-delimiters-depth-9-face ((t (:foreground ,julie-yellow-1)))) + `(rainbow-delimiters-depth-10-face ((t (:foreground ,julie-green+1)))) + `(rainbow-delimiters-depth-11-face ((t (:foreground ,julie-blue+1)))) + `(rainbow-delimiters-depth-12-face ((t (:foreground ,julie-red-1)))) + + ;; rpm-mode + `(rpm-spec-dir-face ((t (:foreground ,julie-green)))) + `(rpm-spec-doc-face ((t (:foreground ,julie-green)))) + `(rpm-spec-ghost-face ((t (:foreground ,julie-red)))) + `(rpm-spec-macro-face ((t (:foreground ,julie-yellow)))) + `(rpm-spec-obsolete-tag-face ((t (:foreground ,julie-red)))) + `(rpm-spec-package-face ((t (:foreground ,julie-red)))) + `(rpm-spec-section-face ((t (:foreground ,julie-yellow)))) + `(rpm-spec-tag-face ((t (:foreground ,julie-blue)))) + `(rpm-spec-var-face ((t (:foreground ,julie-red)))) + + ;; show-paren + `(show-paren-mismatch ((t (:background ,julie-red-1 :weight bold)))) + `(show-paren-match ((t (:background ,julie-blue-1 :weight bold)))) + + ;; wanderlust + `(wl-highlight-folder-few-face ((t (:foreground ,julie-red-1)))) + `(wl-highlight-folder-many-face ((t (:foreground ,julie-red-1)))) + `(wl-highlight-folder-path-face ((t (:foreground ,julie-orange)))) + `(wl-highlight-folder-unread-face ((t (:foreground ,julie-blue)))) + `(wl-highlight-folder-zero-face ((t (:foreground ,julie-fg)))) + `(wl-highlight-folder-unknown-face ((t (:foreground ,julie-blue)))) + `(wl-highlight-message-citation-header ((t (:foreground ,julie-red-1)))) + `(wl-highlight-message-cited-text-1 ((t (:foreground ,julie-red)))) + `(wl-highlight-message-cited-text-2 ((t (:foreground ,julie-green+1)))) + `(wl-highlight-message-cited-text-3 ((t (:foreground ,julie-blue)))) + `(wl-highlight-message-cited-text-4 ((t (:foreground ,julie-blue+1)))) + `(wl-highlight-message-header-contents-face ((t (:foreground ,julie-green)))) + `(wl-highlight-message-headers-face ((t (:foreground ,julie-red+1)))) + `(wl-highlight-message-important-header-contents ((t (:foreground ,julie-green+1)))) + `(wl-highlight-message-header-contents ((t (:foreground ,julie-green+1)))) + `(wl-highlight-message-important-header-contents2 ((t (:foreground ,julie-green+1)))) + `(wl-highlight-message-signature ((t (:foreground ,julie-green)))) + `(wl-highlight-message-unimportant-header-contents ((t (:foreground ,julie-fg)))) + `(wl-highlight-summary-answered-face ((t (:foreground ,julie-blue)))) + `(wl-highlight-summary-disposed-face ((t (:foreground ,julie-fg + :slant italic)))) + `(wl-highlight-summary-new-face ((t (:foreground ,julie-blue)))) + `(wl-highlight-summary-normal-face ((t (:foreground ,julie-fg)))) + `(wl-highlight-summary-thread-top-face ((t (:foreground ,julie-yellow)))) + `(wl-highlight-thread-indent-face ((t (:foreground ,julie-magenta)))) + `(wl-highlight-summary-refiled-face ((t (:foreground ,julie-fg)))) + `(wl-highlight-summary-displaying-face ((t (:underline t :weight bold)))) + + (eval-after-load 'term + `(setq ansi-term-color-vector + (vector 'unspecified ,julie-bg + ,julie-red ,julie-green + ,julie-yellow ,julie-blue+1 + ,julie-magenta ,julie-cyan + ;; dirty fix + "white"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'julie) + +;;; julie-theme.el ends here diff --git a/replace-colorthemes/katester-theme.el b/replace-colorthemes/katester-theme.el new file mode 100644 index 0000000..de86e9b --- /dev/null +++ b/replace-colorthemes/katester-theme.el @@ -0,0 +1,271 @@ +;;; katester-theme.el --- katester theme + +;; Copyright (C) 2001 by walterh@rocketmail.com +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of katester theme from `color-themes' + +;;; Code: + +(deftheme katester + "katester theme") + +(custom-theme-set-faces + 'katester + + '(default ((t (:background "ivory" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "slateblue")))) + '(border ((t (:foreground "slateblue")))) + + '(Man-overstrike-face ((t (:bold t)))) + '(Man-underline-face ((t (:underline t)))) + '(apropos-keybinding-face ((t (:underline t)))) + '(apropos-label-face ((t (:italic t)))) + '(apropos-match-face ((t (:background "paleturquoise")))) + '(apropos-property-face ((t (:bold t :italic t)))) + '(apropos-symbol-face ((t (:bold t)))) + '(goto-address-mail-face ((t (:italic t)))) + '(goto-address-mail-mouse-face ((t (:background "paleturquoise")))) + '(goto-address-url-face ((t (:bold t)))) + '(goto-address-url-mouse-face ((t (:background "darkseagreen2")))) + '(help-highlight-face ((t (:underline t)))) + '(list-matching-lines-face ((t (:bold t)))) + '(view-highlight-face ((t (:background "darkseagreen2")))) + + '(bold ((t (:bold t)))) + '(bold-italic ((t (:bold t :italic t)))) + '(calendar-today-face ((t (:underline t)))) + '(cperl-array-face ((t (:foreground "Blue" :background "lightyellow2" :bold t)))) + '(cperl-hash-face ((t (:foreground "Red" :background "lightyellow2" :bold t :italic t)))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(custom-button-face ((t (nil)))) + '(custom-changed-face ((t (:foreground "white" :background "blue")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:foreground "blue" :underline t)))) + '(custom-group-tag-face-1 ((t (:foreground "red" :underline t)))) + '(custom-invalid-face ((t (:foreground "yellow" :background "red")))) + '(custom-modified-face ((t (:foreground "white" :background "blue")))) + '(custom-rogue-face ((t (:foreground "pink" :background "black")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:foreground "blue" :background "white")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:bold t :underline t)))) + '(custom-variable-tag-face ((t (:foreground "blue" :underline t)))) + '(diary-face ((t (:foreground "red")))) + '(ediff-current-diff-face-A ((t (:foreground "firebrick" :background "pale green")))) + '(ediff-current-diff-face-Ancestor ((t (:foreground "Black" :background "VioletRed")))) + '(ediff-current-diff-face-B ((t (:foreground "DarkOrchid" :background "Yellow")))) + '(ediff-current-diff-face-C ((t (:foreground "Navy" :background "Pink")))) + '(ediff-even-diff-face-A ((t (:foreground "Black" :background "light grey")))) + '(ediff-even-diff-face-Ancestor ((t (:foreground "White" :background "Grey")))) + '(ediff-even-diff-face-B ((t (:foreground "White" :background "Grey")))) + '(ediff-even-diff-face-C ((t (:foreground "Black" :background "light grey")))) + '(ediff-fine-diff-face-A ((t (:foreground "Navy" :background "sky blue")))) + '(ediff-fine-diff-face-Ancestor ((t (:foreground "Black" :background "Green")))) + '(ediff-fine-diff-face-B ((t (:foreground "Black" :background "cyan")))) + '(ediff-fine-diff-face-C ((t (:foreground "Black" :background "Turquoise")))) + '(ediff-odd-diff-face-A ((t (:foreground "White" :background "Grey")))) + '(ediff-odd-diff-face-Ancestor ((t (:foreground "Black" :background "light grey")))) + '(ediff-odd-diff-face-B ((t (:foreground "Black" :background "light grey")))) + '(ediff-odd-diff-face-C ((t (:foreground "White" :background "Grey")))) + '(eshell-ls-archive-face ((t (:foreground "Orchid" :bold t)))) + '(eshell-ls-backup-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-clutter-face ((t (:foreground "OrangeRed" :bold t)))) + '(eshell-ls-directory-face ((t (:foreground "Blue" :bold t)))) + '(eshell-ls-executable-face ((t (:foreground "ForestGreen" :bold t)))) + '(eshell-ls-missing-face ((t (:foreground "Red" :bold t)))) + '(eshell-ls-product-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-readonly-face ((t (:foreground "Brown")))) + '(eshell-ls-special-face ((t (:foreground "Magenta" :bold t)))) + '(eshell-ls-symlink-face ((t (:foreground "DarkCyan" :bold t)))) + '(eshell-ls-unreadable-face ((t (:foreground "Grey30")))) + '(eshell-prompt-face ((t (:foreground "Red" :bold t)))) + '(eshell-test-failed-face ((t (:foreground "OrangeRed" :bold t)))) + '(eshell-test-ok-face ((t (:foreground "Green" :bold t)))) + '(excerpt ((t (:italic t)))) + '(fixed ((t (:bold t)))) + '(flyspell-duplicate-face ((t (:foreground "Gold3" :bold t :underline t)))) + '(flyspell-incorrect-face ((t (:foreground "OrangeRed" :bold t :underline t)))) + '(font-lock-builtin-face ((t (:foreground "Orchid")))) + '(font-lock-comment-face ((t (:background "seashell")))) + '(font-lock-constant-face ((t (:foreground "darkblue")))) + '(font-lock-function-name-face ((t (:bold t :underline t)))) + '(font-lock-keyword-face ((t (:foreground "blue")))) + '(font-lock-string-face ((t (:foreground "maroon")))) + '(font-lock-type-face ((t (:foreground "black")))) + '(font-lock-variable-name-face ((t (:foreground "black")))) + '(font-lock-warning-face ((t (:foreground "Red" :bold t)))) + '(fringe ((t (:background "grey95")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:bold t :italic t)))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t)))) + '(gnus-emphasis-underline-bold-italic ((t (:bold t :italic t :underline t)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:foreground "DeepPink3" :bold t)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:foreground "HotPink3" :bold t)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:foreground "magenta4" :bold t)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:foreground "DeepPink4" :bold t)))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:foreground "ForestGreen" :bold t)))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:foreground "CadetBlue4" :bold t)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:foreground "DarkGreen" :bold t)))) + '(gnus-header-content-face ((t (:foreground "indianred4" :italic t)))) + '(gnus-header-from-face ((t (:foreground "red3")))) + '(gnus-header-name-face ((t (:foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:foreground "MidnightBlue" :italic t)))) + '(gnus-header-subject-face ((t (:foreground "red4")))) + '(gnus-signature-face ((t (:italic t)))) + '(gnus-splash-face ((t (:foreground "ForestGreen")))) + '(gnus-summary-cancelled-face ((t (:foreground "yellow" :background "black")))) + '(gnus-summary-high-ancient-face ((t (:foreground "RoyalBlue" :bold t)))) + '(gnus-summary-high-read-face ((t (:foreground "DarkGreen" :bold t)))) + '(gnus-summary-high-ticked-face ((t (:foreground "firebrick" :bold t)))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:foreground "RoyalBlue" :italic t)))) + '(gnus-summary-low-read-face ((t (:foreground "DarkGreen" :italic t)))) + '(gnus-summary-low-ticked-face ((t (:foreground "firebrick" :italic t)))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(highlight ((t (:background "lavender")))) + '(highlight-changes-delete-face ((t (:foreground "red" :underline t)))) + '(highlight-changes-face ((t (:foreground "red")))) + '(highline-face ((t (:background "paleturquoise")))) + '(holiday-face ((t (:background "pink")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:bold t :italic t)))) + '(info-xref ((t (:bold t)))) + '(italic ((t (:italic t)))) + '(makefile-space-face ((t (:background "hotpink")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:foreground "blue4" :bold t :italic t)))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:foreground "navy blue" :bold t)))) + '(message-header-to-face ((t (:foreground "MidnightBlue" :bold t)))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "moccasin" :foreground "black")))) + '(mode-line-buffer-id ((t (:foreground "white" :background "black")))) + '(mode-line-mousable ((t (:foreground "white" :background "black")))) + '(mode-line-mousable-minor-mode ((t (:foreground "white" :background "black")))) + '(region ((t (:background "lavender")))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:foreground "white" :background "purple")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(term-black ((t (:foreground "black")))) + '(term-blackbg ((t (:background "black")))) + '(term-blue ((t (:foreground "blue")))) + '(term-bluebg ((t (:background "blue")))) + '(term-bold ((t (:bold t)))) + '(term-cyan ((t (:foreground "cyan")))) + '(term-cyanbg ((t (:background "cyan")))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-green ((t (:foreground "green")))) + '(term-greenbg ((t (:background "green")))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (:foreground "magenta")))) + '(term-magentabg ((t (:background "magenta")))) + '(term-red ((t (:foreground "red")))) + '(term-redbg ((t (:background "red")))) + '(term-underline ((t (:underline t)))) + '(term-white ((t (:foreground "white")))) + '(term-whitebg ((t (:background "white")))) + '(term-yellow ((t (:foreground "yellow")))) + '(term-yellowbg ((t (:background "yellow")))) + '(underline ((t (:underline t)))) + '(vcursor ((t (:foreground "blue" :background "cyan" :underline t)))) + '(vhdl-font-lock-attribute-face ((t (:foreground "Orchid")))) + '(vhdl-font-lock-directive-face ((t (:foreground "CadetBlue")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4")))) + '(vhdl-font-lock-function-face ((t (:foreground "Orchid4")))) + '(vhdl-font-lock-prompt-face ((t (:foreground "Red" :bold t)))) + '(vhdl-font-lock-reserved-words-face ((t (:foreground "Orange" :bold t)))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-speedbar-architecture-face ((t (:foreground "Blue")))) + '(vhdl-speedbar-architecture-selected-face ((t (:foreground "Blue" :underline t)))) + '(vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod")))) + '(vhdl-speedbar-configuration-selected-face ((t (:foreground "DarkGoldenrod" :underline t)))) + '(vhdl-speedbar-entity-face ((t (:foreground "ForestGreen")))) + '(vhdl-speedbar-entity-selected-face ((t (:foreground "ForestGreen" :underline t)))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "Brown")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:foreground "Brown" :underline t)))) + '(vhdl-speedbar-package-face ((t (:foreground "Grey50")))) + '(vhdl-speedbar-package-selected-face ((t (:foreground "Grey50" :underline t)))) + '(viper-minibuffer-emacs-face ((t (:foreground "Black" :background "darkseagreen2")))) + '(viper-minibuffer-insert-face ((t (:foreground "Black" :background "pink")))) + '(viper-minibuffer-vi-face ((t (:foreground "DarkGreen" :background "grey")))) + '(viper-replace-overlay-face ((t (:foreground "Black" :background "darkseagreen2")))) + '(viper-search-face ((t (:foreground "Black" :background "khaki")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'katester) + +;;; katester-theme.el ends here diff --git a/replace-colorthemes/kingsajz-theme.el b/replace-colorthemes/kingsajz-theme.el new file mode 100644 index 0000000..4a1aba6 --- /dev/null +++ b/replace-colorthemes/kingsajz-theme.el @@ -0,0 +1,281 @@ +;;; kingsajz-theme.el --- kingsajz theme + +;; Copyright (C) 2001 by Olgierd "Kingsajz" Ziolko +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of kingsajz theme from `color-themes' + +;;; Code: + +(deftheme kingsajz + "kingsajz theme") + +(custom-theme-set-faces + 'kingsajz + + '(default ((t (:background "darkslategrey" :foreground "wheat")))) + '(mouse ((t (:background "Grey")))) + '(cursor ((t (:background "LightGray")))) + '(border ((t (:background "black")))) + + '(bbdb-field-name ((t (:foreground "green")))) + '(bg:erc-color-face0 ((t (:background "White")))) + '(bg:erc-color-face1 ((t (:background "black")))) + '(bg:erc-color-face10 ((t (:background "lightblue1")))) + '(bg:erc-color-face11 ((t (:background "cyan")))) + '(bg:erc-color-face12 ((t (:background "blue")))) + '(bg:erc-color-face13 ((t (:background "deeppink")))) + '(bg:erc-color-face14 ((t (:background "gray50")))) + '(bg:erc-color-face15 ((t (:background "gray90")))) + '(bg:erc-color-face2 ((t (:background "blue4")))) + '(bg:erc-color-face3 ((t (:background "green4")))) + '(bg:erc-color-face4 ((t (:background "red")))) + '(bg:erc-color-face5 ((t (:background "brown")))) + '(bg:erc-color-face6 ((t (:background "purple")))) + '(bg:erc-color-face7 ((t (:background "orange")))) + '(bg:erc-color-face8 ((t (:background "yellow")))) + '(bg:erc-color-face9 ((t (:background "green")))) + '(blue ((t (:foreground "cyan")))) + '(bold ((t (:bold t :foreground "OrangeRed" :weight bold)))) + '(bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(calendar-today-face ((t (:underline t)))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(cperl-array-face ((t (:foreground "Yellow")))) + '(cperl-hash-face ((t (:foreground "White")))) + '(cperl-nonoverridable-face ((t (:foreground "SkyBlue")))) + '(custom-button-face ((t (:foreground "MediumSlateBlue" :underline t)))) + '(custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button))))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "dim gray")))) + '(custom-comment-tag-face ((t (:foreground "gray80")))) + '(custom-documentation-face ((t (:foreground "Grey")))) + '(custom-face-tag-face ((t (:bold t :weight bold :height 1.2)))) + '(custom-group-tag-face ((t (:foreground "MediumAquamarine")))) + '(custom-group-tag-face-1 ((t (:bold t :foreground "pink" :weight bold :height 1.2)))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "Coral")))) + '(custom-variable-button-face ((t (:underline t)))) + '(custom-variable-tag-face ((t (:foreground "Aquamarine")))) + '(date ((t (:foreground "green")))) + '(diary-face ((t (:bold t :foreground "IndianRed" :weight bold)))) + '(dired-face-directory ((t (:bold t :foreground "sky blue" :weight bold)))) + '(dired-face-executable ((t (:foreground "green yellow")))) + '(dired-face-flagged ((t (:foreground "tomato")))) + '(dired-face-marked ((t (:foreground "light salmon")))) + '(dired-face-permissions ((t (:foreground "aquamarine")))) + '(erc-action-face ((t (:bold t :weight bold)))) + '(erc-bold-face ((t (:bold t :weight bold)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "pale green")))) + '(erc-error-face ((t (:bold t :foreground "IndianRed" :weight bold)))) + '(erc-highlight-face ((t (:bold t :foreground "pale green" :weight bold)))) + '(erc-host-danger-face ((t (:foreground "red")))) + '(erc-input-face ((t (:foreground "light blue")))) + '(erc-inverse-face ((t (:background "steel blue")))) + '(erc-notice-face ((t (:foreground "light salmon")))) + '(erc-pal-face ((t (:foreground "pale green")))) + '(erc-prompt-face ((t (:bold t :foreground "light blue" :weight bold)))) + '(erc-underline-face ((t (:underline t)))) + '(eshell-ls-archive-face ((t (:bold t :foreground "IndianRed" :weight bold)))) + '(eshell-ls-backup-face ((t (:foreground "Grey")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "DimGray" :weight bold)))) + '(eshell-ls-directory-face ((t (:bold t :foreground "MediumSlateBlue" :weight bold)))) + '(eshell-ls-executable-face ((t (:bold t :foreground "Coral" :weight bold)))) + '(eshell-ls-missing-face ((t (:bold t :foreground "black" :weight bold)))) + '(eshell-ls-picture-face ((t (:foreground "Violet")))) + '(eshell-ls-product-face ((t (:foreground "LightSalmon")))) + '(eshell-ls-readonly-face ((t (:foreground "Aquamarine")))) + '(eshell-ls-special-face ((t (:bold t :foreground "Gold" :weight bold)))) + '(eshell-ls-symlink-face ((t (:bold t :foreground "White" :weight bold)))) + '(eshell-ls-text-face ((t (:foreground "medium aquamarine")))) + '(eshell-ls-todo-face ((t (:bold t :foreground "aquamarine" :weight bold)))) + '(eshell-ls-unreadable-face ((t (:foreground "DimGray")))) + '(eshell-prompt-face ((t (:foreground "powder blue")))) + '(face-1 ((t (:stipple nil :foreground "royal blue")))) + '(face-2 ((t (:stipple nil :foreground "DeepSkyBlue1")))) + '(face-3 ((t (:stipple nil :foreground "NavajoWhite3")))) + '(fg:erc-color-face0 ((t (:foreground "white")))) + '(fg:erc-color-face1 ((t (:foreground "beige")))) + '(fg:erc-color-face10 ((t (:foreground "pale goldenrod")))) + '(fg:erc-color-face11 ((t (:foreground "light goldenrod yellow")))) + '(fg:erc-color-face12 ((t (:foreground "light yellow")))) + '(fg:erc-color-face13 ((t (:foreground "yellow")))) + '(fg:erc-color-face14 ((t (:foreground "light goldenrod")))) + '(fg:erc-color-face15 ((t (:foreground "lime green")))) + '(fg:erc-color-face2 ((t (:foreground "lemon chiffon")))) + '(fg:erc-color-face3 ((t (:foreground "light cyan")))) + '(fg:erc-color-face4 ((t (:foreground "powder blue")))) + '(fg:erc-color-face5 ((t (:foreground "sky blue")))) + '(fg:erc-color-face6 ((t (:foreground "dark sea green")))) + '(fg:erc-color-face7 ((t (:foreground "pale green")))) + '(fg:erc-color-face8 ((t (:foreground "medium spring green")))) + '(fg:erc-color-face9 ((t (:foreground "khaki")))) + + '(font-lock-builtin-face ((t (:bold t :foreground "PaleGreen" :weight bold)))) + '(font-lock-comment-face ((t (:foreground "White")))) + '(font-lock-constant-face ((t (:bold t :foreground "Aquamarine" :weight bold)))) + '(font-lock-doc-face ((t (:italic t :slant italic :foreground "LightSalmon")))) + '(font-lock-doc-string-face ((t (:foreground "LightSalmon")))) + '(font-lock-function-name-face ((t (:bold t :foreground "MediumSlateBlue" :weight bold)))) + '(font-lock-keyword-face ((t (:foreground "Salmon")))) + '(font-lock-preprocessor-face ((t (:foreground "Salmon")))) + '(font-lock-reference-face ((t (:foreground "pale green")))) + '(font-lock-string-face ((t (:italic t :foreground "LightSalmon" :slant italic)))) + '(font-lock-type-face ((t (:bold t :foreground "YellowGreen" :weight bold)))) + '(font-lock-variable-name-face ((t (:italic t :bold t :foreground "Aquamarine" :slant italic :weight bold)))) + '(font-lock-warning-face ((t (:bold t :foreground "IndianRed" :weight bold)))) + '(fringe ((t (:background "darkslategrey")))) + '(gnus-cite-face-1 ((t (:foreground "DarkGoldenrod3")))) + '(gnus-cite-face-10 ((t (nil)))) + '(gnus-cite-face-11 ((t (nil)))) + '(gnus-cite-face-2 ((t (:foreground "IndianRed3")))) + '(gnus-cite-face-3 ((t (:foreground "tomato")))) + '(gnus-cite-face-4 ((t (:foreground "yellow green")))) + '(gnus-cite-face-5 ((t (:foreground "SteelBlue3")))) + '(gnus-cite-face-6 ((t (:foreground "Azure3")))) + '(gnus-cite-face-7 ((t (:foreground "Azure4")))) + '(gnus-cite-face-8 ((t (:foreground "SpringGreen4")))) + '(gnus-cite-face-9 ((t (:foreground "SlateGray4")))) + '(gnus-emphasis-bold ((t (:bold t :foreground "greenyellow" :weight bold)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t :foreground "OrangeRed1" :slant italic :weight bold)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "khaki")))) + '(gnus-emphasis-italic ((t (:italic t :bold t :foreground "orange" :slant italic :weight bold)))) + '(gnus-emphasis-underline ((t (:foreground "greenyellow" :underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :foreground "khaki" :underline t :weight bold)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold)))) + '(gnus-emphasis-underline-italic ((t (:italic t :foreground "orange" :underline t :slant italic)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "Salmon4")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "firebrick1" :weight bold)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "turquoise4")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "turquoise" :weight bold)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "LightCyan4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "LightCyan1" :weight bold)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "SteelBlue4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "SteelBlue2" :weight bold)))) + '(gnus-group-news-1-empty-face ((t (:foreground "Salmon4")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "FireBrick1" :weight bold)))) + '(gnus-group-news-2-empty-face ((t (:foreground "darkorange3")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "dark orange" :weight bold)))) + '(gnus-group-news-3-empty-face ((t (:foreground "turquoise4")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "Aquamarine" :weight bold)))) + '(gnus-group-news-4-empty-face ((t (:foreground "SpringGreen4")))) + '(gnus-group-news-4-face ((t (:bold t :foreground "SpringGreen2" :weight bold)))) + '(gnus-group-news-5-empty-face ((t (:foreground "OliveDrab4")))) + '(gnus-group-news-5-face ((t (:bold t :foreground "OliveDrab2" :weight bold)))) + '(gnus-group-news-6-empty-face ((t (:foreground "DarkGoldenrod4")))) + '(gnus-group-news-6-face ((t (:bold t :foreground "DarkGoldenrod3" :weight bold)))) + '(gnus-group-news-low-empty-face ((t (:foreground "wheat4")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "tan4" :weight bold)))) + '(gnus-header-content-face ((t (:foreground "LightSkyBlue3")))) + '(gnus-header-from-face ((t (:bold t :foreground "light cyan" :weight bold)))) + '(gnus-header-name-face ((t (:bold t :foreground "DodgerBlue1" :weight bold)))) + '(gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3" :slant italic :weight bold)))) + '(gnus-header-subject-face ((t (:bold t :foreground "light cyan" :weight bold)))) + '(gnus-signature-face ((t (:italic t :foreground "salmon" :slant italic)))) + '(gnus-splash-face ((t (:foreground "Firebrick1")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "MistyRose4" :weight bold)))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "tomato3" :weight bold)))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "coral" :weight bold)))) + '(gnus-summary-high-unread-face ((t (:italic t :bold t :foreground "red1" :slant italic :weight bold)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "DarkSeaGreen4" :slant italic)))) + '(gnus-summary-low-read-face ((t (:foreground "SeaGreen4")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "Green4" :slant italic)))) + '(gnus-summary-low-unread-face ((t (:italic t :foreground "green3" :slant italic)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "khaki4")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "khaki3")))) + '(gnus-summary-normal-unread-face ((t (:foreground "khaki")))) + '(gnus-summary-selected-face ((t (:foreground "gold" :underline t)))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:foreground "red" :background "black")))) + '(gui-element ((t (:bold t :background "#ffffff" :foreground "#000000" :weight bold)))) + '(header-line ((t (:box (:line-width -1 :style released-button) :background "grey20" :foreground "grey90" :box nil)))) + '(highlight ((t (:background "PaleGreen" :foreground "DarkGreen")))) + '(highline-face ((t (:background "SeaGreen")))) + '(holiday-face ((t (:background "DimGray")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:bold t :foreground "DodgerBlue1" :underline t :weight bold)))) + '(info-xref ((t (:bold t :foreground "DodgerBlue3" :weight bold)))) + '(isearch ((t (:background "sea green" :foreground "black")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise4")))) + '(italic ((t (:italic t :foreground "chocolate3" :slant italic)))) + '(menu ((t (nil)))) + '(message-cited-text-face ((t (:foreground "White")))) + '(message-header-cc-face ((t (:foreground "light cyan")))) + '(message-header-name-face ((t (:foreground "DodgerBlue1")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3" :slant italic :weight bold)))) + '(message-header-other-face ((t (:foreground "LightSkyBlue3")))) + '(message-header-subject-face ((t (:bold t :foreground "light cyan" :weight bold)))) + '(message-header-to-face ((t (:bold t :foreground "light cyan" :weight bold)))) + '(message-header-xheader-face ((t (:foreground "DodgerBlue3")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:background "cornflower blue" :foreground "chocolate")))) + '(mode-line ((t (:background "dark olive green" :foreground "wheat" :box (:line-width -1 :style released-button))))) + '(mode-line-buffer-id ((t (:bold t :background "dark olive green" :foreground "beige" :weight bold)))) + '(mode-line-mousable ((t (:bold t :background "dark olive green" :foreground "yellow green" :weight bold)))) + '(mode-line-mousable-minor-mode ((t (:bold t :background "dark olive green" :foreground "wheat" :weight bold)))) + '(paren-blink-off ((t (:foreground "brown")))) + '(region ((t (:background "dark cyan" :foreground "cyan")))) + '(ruler-mode-column-number-face ((t (:box (:color "grey76" :line-width 1 :style released-button) :background "grey76" :foreground "black")))) + '(ruler-mode-current-column-face ((t (:bold t :box (:color "grey76" :line-width 1 :style released-button) :background "grey76" :foreground "yellow" :weight bold)))) + '(ruler-mode-default-face ((t (:background "grey76" :foreground "grey64" :box (:color "grey76" :line-width 1 :style released-button))))) + '(ruler-mode-fill-column-face ((t (:box (:color "grey76" :line-width 1 :style released-button) :background "grey76" :foreground "red")))) + '(ruler-mode-margins-face ((t (:box (:color "grey76" :line-width 1 :style released-button) :foreground "grey64" :background "grey64")))) + '(ruler-mode-tab-stop-face ((t (:box (:color "grey76" :line-width 1 :style released-button) :background "grey76" :foreground "steelblue")))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "Aquamarine" :foreground "SlateBlue")))) + '(show-paren-match-face ((t (:bold t :background "Aquamarine" :foreground "steel blue" :weight bold)))) + '(show-paren-mismatch-face ((t (:background "Red" :foreground "White")))) + '(swbuff-current-buffer-face ((t (:bold t :foreground "red" :weight bold)))) + '(text-cursor ((t (:background "Red" :foreground "white")))) + '(tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button))))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(w3m-anchor-face ((t (:bold t :foreground "DodgerBlue1" :weight bold)))) + '(w3m-arrived-anchor-face ((t (:bold t :foreground "DodgerBlue3" :weight bold)))) + '(w3m-header-line-location-content-face ((t (:background "dark olive green" :foreground "wheat")))) + '(w3m-header-line-location-title-face ((t (:background "dark olive green" :foreground "beige")))) + '(widget-button-face ((t (:bold t :foreground "green" :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:foreground "LightBlue")))) + '(widget-inactive-face ((t (:foreground "DimGray")))) + '(widget-single-line-field-face ((t (:foreground "LightBlue")))) + '(woman-bold-face ((t (:bold t :weight bold)))) + '(woman-italic-face ((t (:italic t :foreground "beige" :slant italic)))) + '(woman-unknown-face ((t (:foreground "LightSalmon")))) + '(zmacs-region ((t (:background "dark cyan" :foreground "cyan"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'kingsajz) + +;;; kingsajz-theme.el ends here diff --git a/replace-colorthemes/late-night-theme.el b/replace-colorthemes/late-night-theme.el new file mode 100644 index 0000000..d3c024a --- /dev/null +++ b/replace-colorthemes/late-night-theme.el @@ -0,0 +1,214 @@ +;;; late-night-theme.el --- late-night theme + +;; Copyright (C) 2002 by Alex Schroeder +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of late-night theme from `color-themes' + +;;; Code: + +(deftheme late-night + "late-night theme") + +(custom-theme-set-faces + 'late-night + + '(default ((t (:background "#000" :foreground "#666")))) + '(cursor ((t (:background "#888")))) + '(border ((t (:foreground "#000")))) + + '(erc-action-face ((t (nil)))) + '(erc-bold-face ((t (:bold t)))) + '(erc-current-nick-face ((t (:bold t)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (nil)))) + '(erc-error-face ((t (:bold t :foreground "IndianRed")))) + '(erc-highlight-face ((t (:bold t :foreground "pale green")))) + '(erc-input-face ((t (:foreground "#555")))) + '(erc-inverse-face ((t (:background "steel blue")))) + '(erc-keyword-face ((t (:foreground "#999" :bold t)))) + '(erc-nick-msg-face ((t (:foreground "#888")))) + '(erc-notice-face ((t (:foreground "#444")))) + '(erc-pal-face ((t (:foreground "#888")))) + '(erc-prompt-face ((t (:foreground "#777" :bold t)))) + '(erc-timestamp-face ((t (:foreground "#777" :bold t)))) + '(fg:erc-color-face0 ((t (:foreground "white")))) + '(fg:erc-color-face1 ((t (:foreground "beige")))) + '(fg:erc-color-face2 ((t (:foreground "lemon chiffon")))) + '(fg:erc-color-face3 ((t (:foreground "light cyan")))) + '(fg:erc-color-face4 ((t (:foreground "powder blue")))) + '(fg:erc-color-face5 ((t (:foreground "sky blue")))) + '(fg:erc-color-face6 ((t (:foreground "dark sea green")))) + '(fg:erc-color-face7 ((t (:foreground "pale green")))) + '(fg:erc-color-face8 ((t (:foreground "medium spring green")))) + '(fg:erc-color-face9 ((t (:foreground "khaki")))) + '(fg:erc-color-face10 ((t (:foreground "pale goldenrod")))) + '(fg:erc-color-face11 ((t (:foreground "light goldenrod yellow")))) + '(fg:erc-color-face12 ((t (:foreground "light yellow")))) + '(fg:erc-color-face13 ((t (:foreground "yellow")))) + '(fg:erc-color-face14 ((t (:foreground "light goldenrod")))) + '(fg:erc-color-face15 ((t (:foreground "lime green")))) + '(bg:erc-color-face0 ((t (nil)))) + '(bg:erc-color-face1 ((t (nil)))) + '(bg:erc-color-face2 ((t (nil)))) + '(bg:erc-color-face3 ((t (nil)))) + '(bg:erc-color-face4 ((t (nil)))) + '(bg:erc-color-face5 ((t (nil)))) + '(bg:erc-color-face6 ((t (nil)))) + '(bg:erc-color-face7 ((t (nil)))) + '(bg:erc-color-face8 ((t (nil)))) + '(bg:erc-color-face9 ((t (nil)))) + '(bg:erc-color-face10 ((t (nil)))) + '(bg:erc-color-face11 ((t (nil)))) + '(bg:erc-color-face12 ((t (nil)))) + '(bg:erc-color-face13 ((t (nil)))) + '(bg:erc-color-face14 ((t (nil)))) + '(bg:erc-color-face15 ((t (nil)))) + + '(gnus-cite-attribution-face ((t (:foreground "#bbb")))) + '(gnus-cite-face-1 ((t (:foreground "#aaa")))) + '(gnus-cite-face-2 ((t (:foreground "#aaa")))) + '(gnus-cite-face-3 ((t (:foreground "#aaa")))) + '(gnus-cite-face-4 ((t (:foreground "#aaa")))) + '(gnus-cite-face-5 ((t (:foreground "#aaa")))) + '(gnus-cite-face-6 ((t (:foreground "#aaa")))) + '(gnus-cite-face-7 ((t (:foreground "#aaa")))) + '(gnus-cite-face-8 ((t (:foreground "#aaa")))) + '(gnus-cite-face-9 ((t (:foreground "#aaa")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:foreground "#ccc")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "#999")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "#999")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "#999")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "#999")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "#888")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "#888")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "#777")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "#777")))) + '(gnus-group-news-1-empty-face ((t (:foreground "#999")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "#999")))) + '(gnus-group-news-2-empty-face ((t (:foreground "#888")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "#888")))) + '(gnus-group-news-3-empty-face ((t (:foreground "#777")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "#777")))) + '(gnus-group-news-4-empty-face ((t (:foreground "#666")))) + '(gnus-group-news-4-face ((t (:bold t :foreground "#666")))) + '(gnus-group-news-5-empty-face ((t (:foreground "#666")))) + '(gnus-group-news-5-face ((t (:bold t :foreground "#666")))) + '(gnus-group-news-6-empty-face ((t (:foreground "#666")))) + '(gnus-group-news-6-face ((t (:bold t :foreground "#666")))) + '(gnus-group-news-low-empty-face ((t (:foreground "#666")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "#666")))) + '(gnus-header-content-face ((t (:foreground "#888")))) + '(gnus-header-from-face ((t (:bold t :foreground "#888")))) + '(gnus-header-name-face ((t (:bold t :foreground "#777")))) + '(gnus-header-newsgroups-face ((t (:bold t :foreground "#777")))) + '(gnus-header-subject-face ((t (:bold t :foreground "#999")))) + '(gnus-signature-face ((t (:foreground "#444")))) + '(gnus-splash-face ((t (:foreground "#ccc")))) + '(gnus-summary-cancelled-face ((t (:background "#555" :foreground "#000")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "#555")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "#666")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "#777")))) + '(gnus-summary-high-unread-face ((t (:bold t :foreground "#888")))) + '(gnus-summary-low-ancient-face ((t (:foreground "#444")))) + '(gnus-summary-low-read-face ((t (:foreground "#555")))) + '(gnus-summary-low-ticked-face ((t (:foreground "#666")))) + '(gnus-summary-low-unread-face ((t (:foreground "#777")))) + '(gnus-summary-normal-ancient-face ((t (:foreground "#555")))) + '(gnus-summary-normal-read-face ((t (:foreground "#666")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "#777")))) + '(gnus-summary-normal-unread-face ((t (:foreground "#888")))) + '(gnus-summary-selected-face ((t (:background "#333")))) + '(message-cited-text-face ((t (:foreground "#aaa")))) + '(message-header-cc-face ((t (:foreground "#888")))) + '(message-header-name-face ((t (:bold t :foreground "#777")))) + '(message-header-newsgroups-face ((t (:bold t :foreground "#777")))) + '(message-header-other-face ((t (:foreground "#666")))) + '(message-header-subject-face ((t (:bold t :foreground "#999")))) + '(message-header-to-face ((t (:bold t :foreground "#777")))) + '(message-header-xheader-face ((t (:foreground "#666")))) + '(message-separator-face ((t (:foreground "#999")))) + + '(info-header-node ((t (:foreground "#666")))) + '(info-header-xref ((t (:foreground "#666")))) + '(info-menu-5 ((t (:underline t)))) + '(info-menu-header ((t (:bold t :foreground "#666")))) + '(info-node ((t (:bold t :foreground "#888")))) + '(info-xref ((t (:bold t :foreground "#777")))) + + '(font-lock-builtin-face ((t (:bold t :foreground "#777")))) + '(font-lock-comment-face ((t (:foreground "#555")))) + '(font-lock-constant-face ((t (:foreground "#777")))) + '(font-lock-doc-string-face ((t (:foreground "#777")))) + '(font-lock-doc-face ((t (:foreground "#777")))) + '(font-lock-function-name-face ((t (:bold t :foreground "#777")))) + '(font-lock-keyword-face ((t (:foreground "#777")))) + '(font-lock-preprocessor-face ((t (:foreground "#777")))) + '(font-lock-reference-face ((t (:foreground "#777")))) + '(font-lock-string-face ((t (:foreground "#777")))) + '(font-lock-type-face ((t (:bold t)))) + '(font-lock-variable-name-face ((t (:bold t :foreground "#888")))) + '(font-lock-warning-face ((t (:bold t :foreground "#999")))) + + '(bold ((t (:bold t)))) + '(button ((t (:bold t)))) + '(custom-button-face ((t (:bold t :foreground "#999")))) + '(fringe ((t (:background "#111" :foreground "#444")))) + '(header-line ((t (:background "#333" :foreground "#000")))) + '(highlight ((t (:background "dark slate blue" :foreground "light blue")))) + '(holiday-face ((t (:background "#000" :foreground "#777")))) + '(isearch ((t (:foreground "pink" :background "red")))) + '(isearch-lazy-highlight-face ((t (:foreground "red")))) + '(italic ((t (:bold t)))) + '(menu ((t (:background "#111" :foreground "#444")))) + '(minibuffer-prompt ((t (:foreground "555")))) + '(mode-line ((t (:background "#111" :foreground "#444")))) + '(mode-line-inactive ((t (:background "#000" :foreground "#444")))) + '(mode-line-buffer-id ((t (:background "#000" :foreground "#555")))) + '(mode-line-mousable ((t (:background "#000" :foreground "#555")))) + '(mode-line-mousable-minor-mode ((t (:background "#000" :foreground "#555")))) + '(region ((t (:background "dark cyan" :foreground "cyan")))) + '(secondary-selection ((t (:background "Aquamarine" :foreground "SlateBlue")))) + '(show-paren-match-face ((t (:foreground "white" :background "light slate blue")))) + '(show-paren-mismatch-face ((t (:foreground "white" :background "red")))) + '(tool-bar ((t (:background "#111" :foreground "#777")))) + '(tooltip ((t (:background "#333" :foreground "#777")))) + '(underline ((t (:bold t)))) + '(variable-pitch ((t (nil)))) + '(widget-button-face ((t (:bold t :foreground "#888")))) + '(widget-field-face ((t (:bold t :foreground "#999")))) ) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'late-night) + +;;; late-night-theme.el ends here diff --git a/replace-colorthemes/lawrence-theme.el b/replace-colorthemes/lawrence-theme.el new file mode 100644 index 0000000..39ea45c --- /dev/null +++ b/replace-colorthemes/lawrence-theme.el @@ -0,0 +1,278 @@ +;;; lawrence-theme.el --- lawrence theme + +;; Copyright (C) 2003 by lawrence mitchell +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of lawrence theme from `color-themes' + +;;; Code: + +(deftheme lawrence + "lawrence theme") + +(custom-theme-set-faces + 'lawrence + + '(default ((t (:background "black" :foreground "#00CC00")))) + '(mouse ((t (:background "black")))) + '(cursor ((t (:background "green")))) + '(border ((t (:background "black")))) + + '(erc-button-face ((t (:bold t :foreground "#00CC00" :background "black")))) + '(erc-button-mouse-face ((t (:foreground "#00CC00" :background "darkgreen")))) + '(gnus-article-button-face ((t (:bold t :foreground "#00CC00" :background "black")))) + '(gnus-article-mouse-face ((t (:foreground "#00CC00" :background "darkgreen")))) + '(gnus-mouse-face ((t (:foreground "#00CC00" :background "darkgreen")))) + '(list-matching-lines-buffer-name-face ((t (:foreground "#00CC00" :background "black" :underline t)))) + '(list-matching-lines-face ((t (:bold t :foreground "#00CC00" :background "black")))) + '(paren-match-face ((t (:background "black" :foreground "darkgreen")))) + '(paren-mismatch-face ((t (:foreground "#00CC00" :background "black" :strike-through t)))) + '(paren-no-match-face ((t (:background "black" :foreground "red")))) + '(view-highlight-face ((t (:bold t :foreground "#00CC00" :background "black")))) + '(widget-mouse-face ((t (:bold t :foreground "#00CC00" :background "black")))) + + '(Buffer-menu-buffer-face ((t (:bold t :weight bold)))) + '(bg:erc-color-face0 ((t (:background "White")))) + '(bg:erc-color-face1 ((t (:background "black")))) + '(bg:erc-color-face10 ((t (:background "lightblue1")))) + '(bg:erc-color-face11 ((t (:background "cyan")))) + '(bg:erc-color-face12 ((t (:background "blue")))) + '(bg:erc-color-face13 ((t (:background "deeppink")))) + '(bg:erc-color-face14 ((t (:background "gray50")))) + '(bg:erc-color-face15 ((t (:background "gray90")))) + '(bg:erc-color-face2 ((t (:background "blue4")))) + '(bg:erc-color-face3 ((t (:background "green4")))) + '(bg:erc-color-face4 ((t (:background "red")))) + '(bg:erc-color-face5 ((t (:background "brown")))) + '(bg:erc-color-face6 ((t (:background "purple")))) + '(bg:erc-color-face7 ((t (:background "orange")))) + '(bg:erc-color-face8 ((t (:background "yellow")))) + '(bg:erc-color-face9 ((t (:background "green")))) + '(bold ((t (:bold t :foreground "#00CC00" :background "black")))) + '(bold-italic ((t (:italic t :bold t :slant oblique :weight semi-bold)))) + '(button ((t (:underline t)))) + '(comint-highlight-input ((t (nil)))) + '(comint-highlight-prompt ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(custom-button-face ((t (:bold t :foreground "#00CC00" :background "black")))) + '(custom-button-pressed-face ((t (nil)))) + '(custom-changed-face ((t (:italic t :foreground "#00CC00" :background "black" :slant oblique)))) + '(custom-comment-face ((t (nil)))) + '(custom-comment-tag-face ((t (nil)))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (nil)))) + '(custom-group-tag-face ((t (nil)))) + '(custom-group-tag-face-1 ((t (nil)))) + '(custom-invalid-face ((t (:foreground "#00CC00" :background "black" :strike-through t)))) + '(custom-modified-face ((t (nil)))) + '(custom-rogue-face ((t (nil)))) + '(custom-saved-face ((t (nil)))) + '(custom-set-face ((t (nil)))) + '(custom-state-face ((t (nil)))) + '(custom-variable-button-face ((t (nil)))) + '(custom-variable-tag-face ((t (nil)))) + '(erc-action-face ((t (:bold t :weight semi-bold)))) + '(erc-bold-face ((t (:bold t :weight bold)))) + '(erc-current-nick-face ((t (:bold t :foreground "LightSeaGreen" :weight semi-bold)))) + '(erc-dangerous-host-face ((t (:foreground "red")))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "IndianRed")))) + '(erc-error-face ((t (:bold t :weight semi-bold :background "darkblue" :foreground "#00CC00")))) + '(erc-fool-face ((t (:foreground "dim gray")))) + '(erc-input-face ((t (:foreground "springgreen")))) + '(erc-inverse-face ((t (:bold t :background "Darkgreen" :foreground "Black" :weight semi-bold)))) + '(erc-keyword-face ((t (:bold t :foreground "pale green" :weight bold)))) + '(erc-nick-default-face ((t (:bold t :weight semi-bold)))) + '(erc-nick-msg-face ((t (:bold t :foreground "springgreen" :weight semi-bold)))) + '(erc-notice-face ((t (:foreground "seagreen" :weight normal)))) + '(erc-pal-face ((t (:bold t :foreground "Magenta" :weight bold)))) + '(erc-prompt-face ((t (:bold t :background "lightBlue2" :foreground "Black" :weight semi-bold)))) + '(erc-timestamp-face ((t (:foreground "seagreen" :weight normal)))) + '(erc-underline-face ((t (:underline t)))) + '(fg:erc-color-face0 ((t (:foreground "White")))) + '(fg:erc-color-face1 ((t (:foreground "black")))) + '(fg:erc-color-face10 ((t (:foreground "lightblue1")))) + '(fg:erc-color-face11 ((t (:foreground "cyan")))) + '(fg:erc-color-face12 ((t (:foreground "blue")))) + '(fg:erc-color-face13 ((t (:foreground "deeppink")))) + '(fg:erc-color-face14 ((t (:foreground "gray50")))) + '(fg:erc-color-face15 ((t (:foreground "gray90")))) + '(fg:erc-color-face2 ((t (:foreground "blue4")))) + '(fg:erc-color-face3 ((t (:foreground "green4")))) + '(fg:erc-color-face4 ((t (:foreground "red")))) + '(fg:erc-color-face5 ((t (:foreground "brown")))) + '(fg:erc-color-face6 ((t (:foreground "purple")))) + '(fg:erc-color-face7 ((t (:foreground "orange")))) + '(fg:erc-color-face8 ((t (:foreground "yellow")))) + '(fg:erc-color-face9 ((t (:foreground "green")))) + '(fixed-pitch ((t (nil)))) + '(font-latex-string-face ((t (:bold t :weight semi-bold :foreground "seagreen" :background "black")))) + '(font-latex-warning-face ((t (:bold t :weight semi-bold :background "darkblue" :foreground "#00CC00")))) + '(font-lock-builtin-face ((t (:foreground "seagreen1")))) + '(font-lock-comment-face ((t (:background "black" :foreground "medium spring green")))) + '(font-lock-constant-face ((t (nil)))) + '(font-lock-doc-face ((t (:bold t :background "black" :foreground "seagreen" :weight semi-bold)))) + '(font-lock-function-name-face ((t (:bold t :foreground "#00CC00" :background "black")))) + '(font-lock-keyword-face ((t (:bold t :background "black" :foreground "green" :underline t :weight semi-bold)))) + '(font-lock-preprocessor-face ((t (:foreground "#00ccdd")))) + '(font-lock-string-face ((t (:bold t :background "black" :foreground "seagreen" :weight semi-bold)))) + '(font-lock-type-face ((t (nil)))) + '(font-lock-variable-name-face ((t (nil)))) + '(font-lock-warning-face ((t (:bold t :foreground "#00CC00" :background "darkblue" :weight semi-bold)))) + '(fringe ((t (:foreground "#00CC00" :background "#151515")))) + '(gnus-cite-attribution-face ((t (:italic t :foreground "#00CC00" :background "black" :slant italic)))) + '(gnus-cite-face-1 ((t (:background "black" :foreground "springgreen")))) + '(gnus-cite-face-10 ((t (nil)))) + '(gnus-cite-face-11 ((t (nil)))) + '(gnus-cite-face-2 ((t (:background "black" :foreground "lightseagreen")))) + '(gnus-cite-face-3 ((t (:background "black" :foreground "darkseagreen")))) + '(gnus-cite-face-4 ((t (:background "black" :foreground "forestgreen")))) + '(gnus-cite-face-5 ((t (:background "black" :foreground "springgreen")))) + '(gnus-cite-face-6 ((t (:background "black" :foreground "springgreen")))) + '(gnus-cite-face-7 ((t (:background "black" :foreground "springgreen")))) + '(gnus-cite-face-8 ((t (:background "black" :foreground "springgreen")))) + '(gnus-cite-face-9 ((t (:background "black" :foreground "springgreen")))) + '(gnus-emphasis-bold ((t (:bold t :weight semi-bold)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight semi-bold)))) + '(gnus-emphasis-highlight-words ((t (:bold t :foreground "#00CC00" :background "black" :underline t :weight bold)))) + '(gnus-emphasis-italic ((t (:italic t :slant italic)))) + '(gnus-emphasis-strikethru ((t (nil)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t :weight semi-bold)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight semi-bold)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic)))) + '(gnus-group-mail-1-empty-face ((t (nil)))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(gnus-group-mail-2-empty-face ((t (nil)))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(gnus-group-mail-3-empty-face ((t (nil)))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(gnus-group-mail-low-empty-face ((t (nil)))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(gnus-group-news-1-empty-face ((t (nil)))) + '(gnus-group-news-1-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(gnus-group-news-2-empty-face ((t (nil)))) + '(gnus-group-news-2-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(gnus-group-news-low-empty-face ((t (nil)))) + '(gnus-group-news-low-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(gnus-header-content-face ((t (:background "black" :foreground "springgreen")))) + '(gnus-header-from-face ((t (nil)))) + '(gnus-header-name-face ((t (nil)))) + '(gnus-header-newsgroups-face ((t (nil)))) + '(gnus-header-subject-face ((t (nil)))) + '(gnus-server-agent-face ((t (:bold t :foreground "PaleTurquoise" :weight bold)))) + '(gnus-server-closed-face ((t (:italic t :foreground "Light Steel Blue" :slant italic)))) + '(gnus-server-denied-face ((t (:bold t :foreground "Pink" :weight semi-bold)))) + '(gnus-server-offline-face ((t (:bold t :foreground "Yellow" :weight bold)))) + '(gnus-server-opened-face ((t (:bold t :foreground "Green1" :weight semi-bold)))) + '(gnus-signature-face ((t (:background "black" :foreground "springgreen" :slant normal)))) + '(gnus-splash-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(gnus-summary-cancelled-face ((t (:foreground "#00CC00" :background "black" :strike-through t)))) + '(gnus-summary-high-ancient-face ((t (nil)))) + '(gnus-summary-high-read-face ((t (nil)))) + '(gnus-summary-high-ticked-face ((t (:background "black" :foreground "seagreen")))) + '(gnus-summary-high-undownloaded-face ((t (:bold t :foreground "LightGray" :weight bold)))) + '(gnus-summary-high-unread-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(gnus-summary-low-ancient-face ((t (nil)))) + '(gnus-summary-low-read-face ((t (nil)))) + '(gnus-summary-low-ticked-face ((t (nil)))) + '(gnus-summary-low-undownloaded-face ((t (:italic t :foreground "LightGray" :slant italic :weight normal)))) + '(gnus-summary-low-unread-face ((t (:bold t :foreground "#00CC00" :background "black" :weight bold)))) + '(gnus-summary-normal-ancient-face ((t (nil)))) + '(gnus-summary-normal-read-face ((t (nil)))) + '(gnus-summary-normal-ticked-face ((t (:bold t :foreground "#00CC00" :background "black")))) + '(gnus-summary-normal-undownloaded-face ((t (:foreground "LightGray" :weight normal)))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:background "#101010")))) + '(gnus-x-face ((t (:background "white" :foreground "black")))) + '(header-line ((t (nil)))) + '(highlight ((t (:foreground "#00CC00" :background "darkgreen")))) + '(ido-first-match-face ((t (:bold t :weight bold)))) + '(ido-indicator-face ((t (:background "red" :foreground "yellow" :width condensed)))) + '(ido-only-match-face ((t (:foreground "ForestGreen")))) + '(ido-subdir-face ((t (:foreground "red")))) + '(isearch ((t (:background "seagreen" :foreground "black")))) + '(isearch-lazy-highlight-face ((t (:background "darkseagreen" :foreground "black")))) + '(italic ((t (:italic t :foreground "#00CC00" :background "black" :slant oblique)))) + '(menu ((t (:bold t :background "black" :foreground "green" :weight semi-bold + :box (:line-width -1 :color "#606060"))))) + '(message-cited-text-face ((t (:italic t :foreground "#00CC00" :background "black" :slant oblique)))) + '(message-header-cc-face ((t (nil)))) + '(message-header-name-face ((t (nil)))) + '(message-header-newsgroups-face ((t (:bold t :foreground "#00CC00" :background "black")))) + '(message-header-other-face ((t (:bold t :foreground "#00CC00" :background "black")))) + '(message-header-subject-face ((t (:bold t :foreground "#00CC00" :background "black")))) + '(message-header-to-face ((t (:bold t :foreground "#00CC00" :background "black")))) + '(message-header-xheader-face ((t (nil)))) + '(message-mml-face ((t (:italic t :foreground "#00CC00" :background "black" :slant oblique)))) + '(message-separator-face ((t (nil)))) + '(minibuffer-prompt ((t (:background "black" :foreground "seagreen")))) + '(mode-line ((t (:bold t :background "#404040" :foreground "green" :weight semi-bold + :box (:line-width -1 :color "#606060"))))) + '(mode-line-inactive ((t (:bold t :weight semi-bold :foreground "green" + :box (:line-width -1 :color "#606060") :background "#101010")))) + '(paren-face ((t (:background "black" :foreground "darkgreen")))) + '(paren-face-match ((t (:background "black" :foreground "springgreen")))) + '(paren-face-mismatch ((t (:foreground "#00CC00" :background "black" :strike-through t)))) + '(paren-face-no-match ((t (:background "black" :foreground "red")))) + '(region ((t (:background "seagreen" :foreground "black")))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "darkseagreen" :foreground "black")))) + '(semantic-dirty-token-face ((t (:background "gray10")))) + '(semantic-unmatched-syntax-face ((t (:underline "red")))) + '(sgml-end-tag-face ((t (:foreground "seagreen")))) + '(sgml-start-tag-face ((t (:foreground "seagreen")))) + '(tabbar-button-face ((t (:background "black" :foreground "#00cc00" + :box (:line-width 2 :color "black" :style released-button))))) + '(tabbar-default-face ((t (:background "black" :foreground "#00cc00")))) + '(tabbar-selected-face ((t (:background "black" :foreground "springgreen" + :box (:line-width 2 :color "black" :style released-button))))) + '(tabbar-separator-face ((t (:foreground "#00cc00" :background "black" + :box (:line-width 2 :color "black" :style pressed-button))))) + '(tabbar-unselected-face ((t (:background "black" :foreground "seagreen")))) + '(tool-bar ((t (:box (:line-width 1 :style released-button))))) + '(tooltip ((t (nil)))) + '(trailing-whitespace ((t (:background "lightseagreen" :foreground "black")))) + '(underline ((t (:foreground "#00CC00" :background "black" :underline t)))) + '(variable-pitch ((t (:underline nil :foreground "#00CC00" :background "black")))) + '(widget-button-face ((t (:bold t :foreground "#00CC00" :background "black")))) + '(widget-button-pressed-face ((t (nil)))) + '(widget-documentation-face ((t (nil)))) + '(widget-field-face ((t (:italic t :foreground "#00CC00" :background "black" :slant oblique)))) + '(widget-inactive-face ((t (nil)))) + '(widget-single-line-field-face ((t (nil))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'lawrence) + +;;; lawrence-theme.el ends here diff --git a/replace-colorthemes/ld-dark-theme.el b/replace-colorthemes/ld-dark-theme.el new file mode 100644 index 0000000..4d20e6f --- /dev/null +++ b/replace-colorthemes/ld-dark-theme.el @@ -0,0 +1,353 @@ +;;; ld-dark-theme.el --- ld dark theme + +;; Copyright (C) 2001 by Linh Dang +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of `ld-dark' theme from `color-themes' + +;;; Code: + +(deftheme ld-dark + "ld-dark theme") + +(custom-theme-set-faces + 'ld-dark + '(default ((t (:background "black" :foreground "white")))) + '(Info-title-1-face ((t (:bold t :weight bold :height 1.728)))) + '(Info-title-2-face ((t (:bold t :weight bold :height 1.44)))) + '(Info-title-3-face ((t (:bold t :weight bold :height 1.2)))) + '(Info-title-4-face ((t (:bold t :weight bold)))) + + '(bbdb-company ((t (:italic t :slant italic)))) + '(bbdb-field-name ((t (:bold t :weight bold)))) + '(bbdb-field-value ((t (nil)))) + '(bbdb-name ((t (:underline t)))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(border ((t (:background "black")))) + '(buffer-menu-buffer ((t (:bold t :weight bold)))) + '(button ((t (:underline t :foreground "cyan1")))) + '(calendar-today-face ((t (:underline t)))) + + '(change-log-acknowledgement-face ((t (:italic t :foreground "AntiqueWhite3" :slant oblique)))) + '(change-log-conditionals-face ((t (:foreground "Aquamarine")))) + '(change-log-date-face ((t (:italic t :foreground "BurlyWood" :slant oblique)))) + '(change-log-email-face ((t (:foreground "Aquamarine")))) + '(change-log-file-face + ((t (:bold t :foreground "LightSkyBlue" :weight bold :height 0.9)))) + '(change-log-function-face ((t (:foreground "Aquamarine")))) + '(change-log-list-face ((t (:foreground "LightSkyBlue")))) + '(change-log-name-face ((t (:bold t :foreground "Gold" :weight bold)))) + + '(clear-case-mode-string-face + ((t (:bold t :background "grey" :foreground "black" + :box (:line-width 2 :color "grey" :style released-button) + :weight bold :height 0.9)))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(completions-annotations ((t (:italic t :slant italic)))) + '(completions-common-part ((t (::foreground "white" :background "black")))) + '(completions-first-difference ((t (:bold t :weight bold)))) + + '(cperl-array-face + ((t (:bold t :background "lightyellow2" :foreground "Blue" :weight bold)))) + '(cperl-hash-face + ((t (:italic t :bold t :background "lightyellow2" :foreground "Red" :slant italic :weight bold)))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + + '(cursor ((t (:background "yellow")))) + + '(custom-button-face + ((t (:background "lightgrey" :foreground "black" + :box (:line-width 2 :style released-button))))) + '(custom-button-pressed-face + ((t (:background "lightgrey" :foreground "black" + :box (:line-width 2 :style pressed-button))))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "dim gray")))) + '(custom-comment-tag-face ((t (:foreground "gray80")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:bold t :weight bold :height 1.1)))) + '(custom-group-tag-face + ((t (:bold t :foreground "light blue" :weight bold :height 1.1)))) + '(custom-group-tag-face-1 + ((t (:bold t :foreground "pink" :weight bold :height 1.1)))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "lime green")))) + '(custom-variable-button-face ((t (:bold t :underline t :weight bold)))) + '(custom-variable-tag-face + ((t (:bold t :foreground "light blue" :weight bold :height 1.2)))) + '(diary-face ((t (:foreground "red")))) + '(diff-added-face ((t (nil)))) + '(diff-changed-face ((t (nil)))) + '(diff-context-face ((t (:foreground "grey70")))) + '(diff-file-header-face ((t (:bold t :background "grey60" :weight bold)))) + '(diff-function-face ((t (:foreground "grey70")))) + '(diff-header-face ((t (:background "grey45")))) + '(diff-hunk-header-face ((t (:background "grey45")))) + '(diff-index-face ((t (:bold t :background "grey60" :weight bold)))) + '(diff-nonexistent-face ((t (:bold t :background "grey60" :weight bold)))) + '(diff-removed-face ((t (nil)))) + '(dired-directory ((t (:bold t :weight bold :foreground "LightSkyBlue" :height 0.9)))) + '(dired-flagged ((t (:bold t :weight bold :foreground "Pink")))) + '(dired-header ((t (:bold t :weight bold :foreground "PaleGreen" :height 0.9)))) + '(dired-ignored ((t (:foreground "grey70")))) + '(dired-mark ((t (:bold t :weight bold :foreground "Gold")))) + '(dired-marked ((t (:bold t :weight bold :foreground "DarkOrange")))) + '(dired-perm-write ((t (:italic t :foreground "AntiqueWhite3" :slant oblique)))) + '(dired-symlink ((t (:foreground "LightSkyBlue")))) + '(dired-warning ((t (:bold t :weight bold :foreground "chocolate")))) + '(error ((t (:bold t :foreground "Pink" :weight bold)))) + '(escape-glyph ((t (:foreground "cyan")))) + '(excerpt ((t (:italic t :slant italic)))) + '(file-name-shadow ((t (:foreground "grey70")))) + '(fixed ((t (:bold t :weight bold)))) + + '(flyspell-duplicate-face ((t (:bold t :foreground "Gold3" :underline t :weight bold)))) + '(flyspell-incorrect-face ((t (:bold t :foreground "OrangeRed" :underline t :weight bold)))) + + '(font-lock-builtin-face ((t (:foreground "SteelBlue")))) + '(font-lock-comment-delimiter-face ((t (:italic t :slant oblique :foreground "AntiqueWhite3")))) + '(font-lock-comment-face ((t (:italic t :foreground "AntiqueWhite3" :slant oblique)))) + '(font-lock-constant-face ((t (:bold t :foreground "Gold" :weight bold)))) + '(font-lock-doc-face ((t (:italic t :foreground "BurlyWood" :slant oblique)))) + '(font-lock-doc-string-face ((t (:italic t :foreground "BurlyWood" :slant oblique)))) + '(font-lock-function-name-face ((t (:bold t :foreground "LightSkyBlue" :weight bold :height 0.9)))) + '(font-lock-keyword-face ((t (:foreground "LightSkyBlue")))) + '(font-lock-negation-char-face ((t (nil)))) + '(font-lock-preprocessor-face ((t (:bold t :foreground "Gold" :weight bold)))) + '(font-lock-reference-face ((t (:foreground "SteelBlue")))) + '(font-lock-regexp-grouping-backslash ((t (:bold t :weight bold)))) + '(font-lock-regexp-grouping-construct ((t (:bold t :weight bold)))) + '(font-lock-string-face ((t (:italic t :foreground "BurlyWood" :slant oblique)))) + '(font-lock-type-face ((t (:bold t :foreground "PaleGreen" :weight bold :height 0.9)))) + '(font-lock-variable-name-face ((t (:bold t :foreground "Aquamarine" :weight bold)))) + '(font-lock-warning-face ((t (:bold t :foreground "chocolate" :weight bold)))) + '(fringe + ((t (:background "grey4" :foreground "Wheat" + :slant normal :weight normal :width normal + :foundry "outline")))) + '(glyphless-char ((t (:height 0.6)))) + + '(gnus-cite-attribution-face ((t (:italic t :slant italic)))) + '(gnus-cite-face-1 ((t (:foreground "light blue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "light cyan")))) + '(gnus-cite-face-3 ((t (:foreground "light yellow")))) + '(gnus-cite-face-4 ((t (:foreground "light pink")))) + '(gnus-cite-face-5 ((t (:foreground "pale green")))) + '(gnus-cite-face-6 ((t (:foreground "beige")))) + '(gnus-cite-face-7 ((t (:foreground "orange")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-cite-face-list ((t (:bold t :foreground "red" :weight bold)))) + '(gnus-emphasis-bold ((t (:bold t :weight bold)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t :slant italic)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1" :weight bold)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2" :weight bold)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3" :weight bold)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4" :weight bold)))) + '(gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise" :weight bold)))) + '(gnus-group-news-2-empty-face ((t (:foreground "turquoise")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "turquoise" :weight bold)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t :weight bold)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t :weight bold)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t :weight bold)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t :weight bold)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise" :weight bold)))) + '(gnus-header-content-face ((t (:italic t :foreground "forest green" :slant italic)))) + '(gnus-header-from-face ((t (:foreground "spring green")))) + '(gnus-header-name-face ((t (:foreground "SeaGreen")))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "yellow" :slant italic)))) + '(gnus-header-subject-face ((t (:foreground "SeaGreen3")))) + '(gnus-signature-face ((t (:italic t :foreground "white" :slant italic)))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue" :weight bold)))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen" :weight bold)))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "pink" :weight bold)))) + '(gnus-summary-high-unread-face ((t (:bold t :weight bold)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue" :slant italic)))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen" :slant italic)))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "pink" :slant italic)))) + '(gnus-summary-low-unread-face ((t (:italic t :slant italic)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "PaleGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "pink")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + + '(header-line + ((t (:background "grey20" :foreground "grey75" + :box (:line-width 3 :color "grey20" :style released-button) + :height 0.81)))) + '(help-argument-name ((t (nil)))) + '(highlight ((t (:background "darkolivegreen" :foreground "black")))) + '(highlight-changes-delete-face ((t (:foreground "red" :underline t)))) + '(highlight-changes-face ((t (:foreground "red")))) + '(holiday-face ((t (:background "pink")))) + '(info-header-node ((t (:italic t :bold t :foreground "white" :slant italic :weight bold)))) + '(info-header-xref ((t (:bold t :foreground "cyan" :weight bold)))) + '(info-menu-5 ((t (:foreground "red1")))) + '(info-menu-header ((t (:bold t :weight bold)))) + '(info-node ((t (:italic t :bold t :foreground "white" :slant italic :weight bold)))) + '(info-xref ((t (:bold t :foreground "cyan" :weight bold)))) + '(isearch ((t (:background "palevioletred2" :foreground "brown4")))) + '(isearch-fail ((t (:background "red4")))) + '(italic ((t (:italic t :slant italic)))) + '(lazy-highlight ((t (:background "paleturquoise4")))) + '(link ((t (:foreground "cyan1" :underline t)))) + '(link-visited ((t (:underline t :foreground "violet")))) + '(makefile-space-face ((t (:background "hotpink")))) + '(match ((t (:background "RoyalBlue3")))) + '(menu ((t (nil)))) + + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:bold t :foreground "green4" :weight bold)))) + '(message-header-name-face ((t (:foreground "DarkGreen")))) + '(message-header-newsgroups-face + ((t (:italic t :bold t :foreground "yellow" :slant italic :weight bold)))) + '(message-header-other-face ((t (:foreground "#b00000")))) + '(message-header-subject-face ((t (:bold t :foreground "green3" :weight bold)))) + '(message-header-to-face ((t (:bold t :foreground "green2" :weight bold)))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "blue3")))) + + '(minibuffer-prompt ((t (:foreground "cyan")))) + '(mode-line ((t (:background "grey" :foreground "black" + :box (:line-width 2 :color "grey" :style released-button) + :height 0.9)))) + '(mode-line-buffer-id + ((t (:background "grey" :foreground "black" + :box (:line-width 2 :color "grey" :style released-button) + :height 0.9)))) + '(mode-line-emphasis ((t (:bold t :weight bold)))) + '(mode-line-highlight + ((t (:box (:line-width 2 :color "grey40" :style released-button))))) + '(mode-line-inactive + ((t (:background "grey30" :foreground "grey80" + :box (:line-width -1 :color "grey40" :style nil) + :weight light :height 0.9)))) + '(mode-line-mousable + ((t (:background "grey" :foreground "black" + :box (:line-width 2 :color "grey" :style released-button) + :height 0.9)))) + '(mode-line-mousable-minor-mode + ((t (:background "grey" :foreground "black" + :box (:line-width 2 :color "grey" :style released-button) + :height 0.9)))) + + '(mouse ((t (:background "white")))) + '(next-error ((t (:foreground "white" :background "DarkSlateGray")))) + '(nobreak-space ((t (:foreground "cyan" :underline t)))) + '(primary-selection ((t (:background "DarkSlateGray")))) + '(query-replace ((t (:foreground "brown4" :background "palevioletred2")))) + '(region ((t (:background "DarkSlateGray" :foreground "white")))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "SkyBlue4")))) + + '(sgml-doctype-face ((t (:foreground "orange")))) + '(sgml-end-tag-face ((t (:foreground "greenyellow")))) + '(sgml-entity-face ((t (:foreground "gold")))) + '(sgml-ignored-face ((t (:background "gray60" :foreground "gray20")))) + '(sgml-sgml-face ((t (:foreground "yellow")))) + '(sgml-start-tag-face ((t (:foreground "mediumspringgreen")))) + + '(shadow ((t (:foreground "grey70")))) + '(show-paren-match-face ((t (:background "purple" :foreground "white")))) + '(show-paren-mismatch-face ((t (:background "red" :foreground "white")))) + '(success ((t (:bold t :foreground "Green1" :weight bold)))) + + '(term-black ((t (:foreground "black")))) + '(term-blackbg ((t (:background "black")))) + '(term-blue ((t (:foreground "#4186be")))) + '(term-bluebg ((t (:background "#4186be")))) + '(term-bold ((t (:bold t :weight bold)))) + '(term-cyan ((t (:foreground "#71bebe")))) + '(term-cyanbg ((t (:background "#71bebe")))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-green ((t (:foreground "#e5f779")))) + '(term-greenbg ((t (:background "#e5f779")))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (:foreground "#ef9ebe")))) + '(term-magentabg ((t (:background "#ef9ebe")))) + '(term-red ((t (:foreground "#ef8171")))) + '(term-redbg ((t (:background "#ef8171")))) + '(term-underline ((t (:underline t)))) + '(term-white ((t (:foreground "#c0c0c0")))) + '(term-whitebg ((t (:background "#c0c0c0")))) + '(term-yellow ((t (:foreground "#fff796")))) + '(term-yellowbg ((t (:background "#fff796")))) + + '(tool-bar + ((t (:background "grey75" :foreground "black" + :box (:line-width 1 :style released-button))))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "white")))) + '(underline ((t (:underline t)))) + + '(vertical-border ((t (nil)))) + '(warning ((t (:bold t :foreground "DarkOrange" :weight bold)))) + + '(widget-button ((t (:bold t :weight bold)))) + '(widget-button-pressed ((t (:background "black" :foreground "red")))) + '(widget-documentation ((t (:background "white" :foreground "lime green")))) + '(widget-field ((t (:background "dim gray" :foreground "black")))) + '(widget-inactive ((t (:background "red" :foreground "light gray")))) + '(widget-single-line-field ((t (:background "dim gray" :foreground "black")))) + + '(zmacs-region ((t (:background "DarkSlateGray" :foreground "white"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'ld-dark) + +;;; ld-dark-theme.el ends here diff --git a/replace-colorthemes/lethe-theme.el b/replace-colorthemes/lethe-theme.el new file mode 100644 index 0000000..557cc63 --- /dev/null +++ b/replace-colorthemes/lethe-theme.el @@ -0,0 +1,440 @@ +;;; lethe-theme.el --- lethe theme + +;; Copyright (C) 2002 by Ivica Loncar +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of lethe theme from `color-themes' + +;;; Code: + +(deftheme lethe + "lethe theme") + +(custom-theme-set-faces + 'lethe + + '(default ((t (:background "black" :foreground "peachpuff")))) + '(mouse ((t (:background "red")))) + '(cursor ((t (:background "red")))) + '(border ((t (:background "black")))) + + '(bg:erc-color-face0 ((t (:background "White")))) + '(bg:erc-color-face1 ((t (nil)))) + '(bg:erc-color-face10 ((t (:background "lightblue1")))) + '(bg:erc-color-face11 ((t (:background "cyan")))) + '(bg:erc-color-face12 ((t (:background "blue")))) + '(bg:erc-color-face13 ((t (:background "deeppink")))) + '(bg:erc-color-face14 ((t (:background "gray50")))) + '(bg:erc-color-face15 ((t (:background "gray90")))) + '(bg:erc-color-face2 ((t (:background "blue4")))) + '(bg:erc-color-face3 ((t (:background "green4")))) + '(bg:erc-color-face4 ((t (:background "red")))) + '(bg:erc-color-face5 ((t (:background "brown")))) + '(bg:erc-color-face6 ((t (:background "purple")))) + '(bg:erc-color-face7 ((t (:background "orange")))) + '(bg:erc-color-face8 ((t (:background "yellow")))) + '(bg:erc-color-face9 ((t (:background "green")))) + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(border-glyph ((t (nil)))) + '(buffers-tab ((t (:bold t :foreground "red")))) + '(button ((t (:underline t)))) + '(calendar-today-face ((t (:underline t)))) + '(comint-highlight-input ((t (:bold t)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue")))) + '(cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red")))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(cscope-file-face ((t (:foreground "blue")))) + '(cscope-function-face ((t (:foreground "magenta")))) + '(cscope-line-face ((t (:foreground "green")))) + '(cscope-line-number-face ((t (:foreground "red")))) + '(cscope-mouse-face ((t (:background "blue" :foreground "white")))) + '(custom-button-face ((t (nil)))) + '(custom-button-pressed-face ((t (:background "lightgrey" :foreground "black")))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "dim gray")))) + '(custom-comment-tag-face ((t (:foreground "gray80")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :foreground "blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "red")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :foreground "blue")))) + '(cyan ((t (:foreground "cyan")))) + '(diary-face ((t (:foreground "red")))) + '(dired-face-boring ((t (:foreground "Gray65")))) + '(dired-face-directory ((t (:bold t)))) + '(dired-face-executable ((t (:foreground "SeaGreen")))) + '(dired-face-flagged ((t (:background "LightSlateGray")))) + '(dired-face-marked ((t (:background "PaleVioletRed")))) + '(dired-face-permissions ((t (:background "grey75" :foreground "black")))) + '(dired-face-setuid ((t (:foreground "Red")))) + '(dired-face-socket ((t (:foreground "magenta")))) + '(dired-face-symlink ((t (:foreground "cyan")))) + '(display-time-mail-balloon-enhance-face ((t (:background "orange")))) + '(display-time-mail-balloon-gnus-group-face ((t (:foreground "blue")))) + '(display-time-time-balloon-face ((t (:foreground "red")))) + '(ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick")))) + '(ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black")))) + '(ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid")))) + '(ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy")))) + '(ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black")))) + '(ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-B ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black")))) + '(ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy")))) + '(ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black")))) + '(ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black")))) + '(ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black")))) + '(ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White")))) + '(ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White")))) + '(erc-action-face ((t (:bold t)))) + '(erc-bold-face ((t (:bold t)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "IndianRed")))) + '(erc-error-face ((t (:background "Red" :foreground "White")))) + '(erc-input-face ((t (:foreground "brown")))) + '(erc-inverse-face ((t (:background "Black" :foreground "White")))) + '(erc-notice-face ((t (:bold t :foreground "SlateBlue")))) + '(erc-prompt-face ((t (:bold t :background "lightBlue2" :foreground "Black")))) + '(erc-timestamp-face ((t (:bold t :foreground "green")))) + '(erc-underline-face ((t (:underline t)))) + '(eshell-ls-archive-face ((t (:bold t :foreground "Orchid")))) + '(eshell-ls-backup-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "Blue")))) + '(eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen")))) + '(eshell-ls-missing-face ((t (:bold t :foreground "Red")))) + '(eshell-ls-product-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-readonly-face ((t (:foreground "Brown")))) + '(eshell-ls-special-face ((t (:bold t :foreground "Magenta")))) + '(eshell-ls-symlink-face ((t (:bold t :foreground "DarkCyan")))) + '(eshell-ls-unreadable-face ((t (:foreground "Grey30")))) + '(eshell-prompt-face ((t (:bold t :foreground "Red")))) + '(eshell-test-failed-face ((t (:bold t :foreground "OrangeRed")))) + '(eshell-test-ok-face ((t (:bold t :foreground "Green")))) + '(excerpt ((t (:italic t)))) + '(fg:erc-color-face0 ((t (:foreground "White")))) + '(fg:erc-color-face1 ((t (:foreground "black")))) + '(fg:erc-color-face10 ((t (:foreground "lightblue1")))) + '(fg:erc-color-face11 ((t (:foreground "cyan")))) + '(fg:erc-color-face12 ((t (:foreground "blue")))) + '(fg:erc-color-face13 ((t (:foreground "deeppink")))) + '(fg:erc-color-face14 ((t (:foreground "gray50")))) + '(fg:erc-color-face15 ((t (:foreground "gray90")))) + '(fg:erc-color-face2 ((t (:foreground "blue4")))) + '(fg:erc-color-face3 ((t (:foreground "green4")))) + '(fg:erc-color-face4 ((t (:foreground "red")))) + '(fg:erc-color-face5 ((t (:foreground "brown")))) + '(fg:erc-color-face6 ((t (:foreground "purple")))) + '(fg:erc-color-face7 ((t (:foreground "orange")))) + '(fg:erc-color-face8 ((t (:foreground "yellow")))) + '(fg:erc-color-face9 ((t (:foreground "green")))) + '(fixed ((t (:bold t)))) + '(fixed-pitch ((t (:size "16")))) + '(flyspell-duplicate-face ((t (:underline t :bold t :foreground "Gold3")))) + '(flyspell-incorrect-face ((t (:underline t :bold t :foreground "OrangeRed")))) + '(font-lock-builtin-face ((t (:foreground "Orchid")))) + '(font-lock-comment-face ((t (:bold t :foreground "cyan")))) + '(font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(font-lock-doc-face ((t (:bold t :foreground "red")))) + '(font-lock-doc-string-face ((t (:bold t :foreground "red")))) + '(font-lock-function-name-face ((t (:bold t :foreground "white")))) + '(font-lock-keyword-face ((t (:bold t :foreground "yellow")))) + '(font-lock-preprocessor-face ((t (:bold t :foreground "blue")))) + '(font-lock-reference-face ((t (:foreground "red3")))) + '(font-lock-string-face ((t (:bold t :foreground "magenta")))) + '(font-lock-type-face ((t (:bold t :foreground "lightgreen")))) + '(font-lock-variable-name-face ((t (:bold t :foreground "white")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(fringe ((t (:background "grey95")))) + '(gdb-arrow-face ((t (:bold t :background "yellow" :foreground "red")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t)))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen")))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-header-content-face ((t (:italic t :foreground "indianred4")))) + '(gnus-header-from-face ((t (:foreground "red3")))) + '(gnus-header-name-face ((t (:foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue")))) + '(gnus-header-subject-face ((t (:foreground "red4")))) + '(gnus-picons-face ((t (:background "white" :foreground "black")))) + '(gnus-picons-xbm-face ((t (:background "white" :foreground "black")))) + '(gnus-signature-face ((t (:italic t)))) + '(gnus-splash-face ((t (:foreground "ForestGreen")))) + '(gnus-summary-cancelled-face ((t (:foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(gnus-x-face ((t (:background "white" :foreground "black")))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "grey75" :foreground "black")))) + '(gui-element ((t (:size "12" :background "Gray80" :foreground "black")))) + '(header-line ((t (:background "grey20" :foreground "grey90")))) + '(highlight ((t (:bold t :background "yellow" :foreground "red")))) + '(highlight-changes-delete-face ((t (:underline t :foreground "red")))) + '(highlight-changes-face ((t (:foreground "red")))) + '(highline-face ((t (:background "paleturquoise")))) + '(holiday-face ((t (:background "pink")))) + '(hyper-apropos-documentation ((t (:foreground "#aaaaaa")))) + '(hyper-apropos-heading ((t (:bold t :foreground "#999999")))) + '(hyper-apropos-hyperlink ((t (:foreground "Violet")))) + '(hyper-apropos-major-heading ((t (:bold t :foreground "#ff0000")))) + '(hyper-apropos-section-heading ((t (:italic t :bold t :foreground "#33aa55")))) + '(hyper-apropos-warning ((t (:bold t :foreground "red")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:italic t :bold t)))) + '(info-xref ((t (:bold t)))) + '(isearch ((t (:background "paleturquoise")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise4")))) + '(isearch-secondary ((t (:foreground "red3")))) + '(italic ((t (:italic t)))) + '(jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan")))) + '(jde-db-active-breakpoint-face ((t (:background "red" :foreground "black")))) + '(jde-db-requested-breakpoint-face ((t (:background "yellow" :foreground "black")))) + '(jde-db-spec-breakpoint-face ((t (:background "green" :foreground "black")))) + '(jde-java-font-lock-api-face ((t (:foreground "light goldenrod")))) + '(jde-java-font-lock-bold-face ((t (:bold t)))) + '(jde-java-font-lock-code-face ((t (nil)))) + '(jde-java-font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(jde-java-font-lock-doc-tag-face ((t (:foreground "light coral")))) + '(jde-java-font-lock-italic-face ((t (:italic t)))) + '(jde-java-font-lock-link-face ((t (:underline t :foreground "cadetblue")))) + '(jde-java-font-lock-modifier-face ((t (:foreground "LightSteelBlue")))) + '(jde-java-font-lock-number-face ((t (:foreground "LightSalmon")))) + '(jde-java-font-lock-operator-face ((t (:foreground "medium blue")))) + '(jde-java-font-lock-package-face ((t (:foreground "steelblue1")))) + '(jde-java-font-lock-pre-face ((t (nil)))) + '(jde-java-font-lock-underline-face ((t (:underline t)))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:background "gray68")))) + '(magenta ((t (:foreground "magenta")))) + '(makefile-space-face ((t (:background "hotpink")))) + '(menu ((t (nil)))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4")))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:bold t :foreground "cyan")))) + '(message-separator-face ((t (:foreground "brown")))) + '(minibuffer-prompt ((t (:foreground "cyan")))) + '(mode-line ((t (:background "grey75" :foreground "black")))) + '(mode-line-inactive ((t (:background "grey30" :foreground "grey80")))) + '(mode-line ((t (:bold t :background "red" :foreground "yellow")))) + '(mode-line-buffer-id ((t (:bold t :background "red" :foreground "yellow")))) + '(mode-line-mousable ((t (:background "red" :foreground "yellow")))) + '(mode-line-mousable-minor-mode ((t (:background "red" :foreground "green4")))) + '(paren-blink-off ((t (:foreground "black")))) + '(paren-match ((t (:bold t :background "yellow" :foreground "red")))) + '(paren-mismatch ((t (:background "DeepPink")))) + '(pointer ((t (nil)))) + '(primary-selection ((t (:background "gray65")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "gray75")))) + '(right-margin ((t (nil)))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(semantic-dirty-token-face ((t (:background "lightyellow")))) + '(semantic-unmatched-syntax-face ((t (nil)))) + '(senator-intangible-face ((t (:foreground "gray75")))) + '(senator-momentary-highlight-face ((t (:background "gray30")))) + '(senator-read-only-face ((t (:background "#664444")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:underline t :foreground "red")))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(template-message-face ((t (:bold t)))) + '(term-black ((t (:foreground "black")))) + '(term-blackbg ((t (nil)))) + '(term-blue ((t (:foreground "blue")))) + '(term-blue-bold-face ((t (:bold t :foreground "blue")))) + '(term-blue-face ((t (:foreground "blue")))) + '(term-blue-inv-face ((t (:background "blue")))) + '(term-blue-ul-face ((t (:underline t :foreground "blue")))) + '(term-bluebg ((t (:background "blue")))) + '(term-bold ((t (:bold t)))) + '(term-cyan ((t (:foreground "cyan")))) + '(term-cyan-bold-face ((t (:bold t :foreground "cyan")))) + '(term-cyan-face ((t (:foreground "cyan")))) + '(term-cyan-inv-face ((t (:background "cyan")))) + '(term-cyan-ul-face ((t (:underline t :foreground "cyan")))) + '(term-cyanbg ((t (:background "cyan")))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-bold-face ((t (:bold t)))) + '(term-default-face ((t (nil)))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-default-inv-face ((t (:background "peachpuff" :foreground "black")))) + '(term-default-ul-face ((t (:underline t)))) + '(term-green ((t (:foreground "green")))) + '(term-green-bold-face ((t (:bold t :foreground "green")))) + '(term-green-face ((t (:foreground "green")))) + '(term-green-inv-face ((t (:background "green")))) + '(term-green-ul-face ((t (:underline t :foreground "green")))) + '(term-greenbg ((t (:background "green")))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (:foreground "magenta")))) + '(term-magenta-bold-face ((t (:bold t :foreground "magenta")))) + '(term-magenta-face ((t (:foreground "magenta")))) + '(term-magenta-inv-face ((t (:background "magenta")))) + '(term-magenta-ul-face ((t (:underline t :foreground "magenta")))) + '(term-magentabg ((t (:background "magenta")))) + '(term-red ((t (:foreground "red")))) + '(term-red-bold-face ((t (:bold t :foreground "red")))) + '(term-red-face ((t (:foreground "red")))) + '(term-red-inv-face ((t (:background "red")))) + '(term-red-ul-face ((t (:underline t :foreground "red")))) + '(term-redbg ((t (:background "red")))) + '(term-underline ((t (:underline t)))) + '(term-white ((t (:foreground "white")))) + '(term-white-bold-face ((t (:bold t :foreground "white")))) + '(term-white-face ((t (:foreground "white")))) + '(term-white-inv-face ((t (nil)))) + '(term-white-ul-face ((t (:underline t :foreground "white")))) + '(term-whitebg ((t (:background "white")))) + '(term-yellow ((t (:foreground "yellow")))) + '(term-yellow-bold-face ((t (:bold t :foreground "yellow")))) + '(term-yellow-face ((t (:foreground "yellow")))) + '(term-yellow-inv-face ((t (:background "yellow")))) + '(term-yellow-ul-face ((t (:underline t :foreground "yellow")))) + '(term-yellowbg ((t (:background "yellow")))) + '(text-cursor ((t (:background "red" :foreground "black")))) + '(tool-bar ((t (:background "grey75" :foreground "black")))) + '(toolbar ((t (:background "Gray80" :foreground "black")))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(variable-pitch ((t (nil)))) + '(vcursor ((t (:underline t :background "cyan" :foreground "blue")))) + '(vertical-divider ((t (:background "Gray80" :foreground "black")))) + '(vhdl-font-lock-attribute-face ((t (:foreground "Orchid")))) + '(vhdl-font-lock-directive-face ((t (:foreground "CadetBlue")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4")))) + '(vhdl-font-lock-function-face ((t (:foreground "Orchid4")))) + '(vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red")))) + '(vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange")))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-speedbar-architecture-face ((t (:foreground "Blue")))) + '(vhdl-speedbar-architecture-selected-face ((t (:underline t :foreground "Blue")))) + '(vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod")))) + '(vhdl-speedbar-configuration-selected-face ((t (:underline t :foreground "DarkGoldenrod")))) + '(vhdl-speedbar-entity-face ((t (:foreground "ForestGreen")))) + '(vhdl-speedbar-entity-selected-face ((t (:underline t :foreground "ForestGreen")))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "Brown")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:underline t :foreground "Brown")))) + '(vhdl-speedbar-package-face ((t (:foreground "Grey50")))) + '(vhdl-speedbar-package-selected-face ((t (:underline t :foreground "Grey50")))) + '(viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black")))) + '(viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen")))) + '(viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-search-face ((t (:background "khaki" :foreground "Black")))) + '(white ((t (:foreground "white")))) + '(widget ((t (:size "12" :background "Gray80" :foreground "black")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (nil)))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85")))) + '(x-face ((t (:bold t :background "wheat" :foreground "black")))) + '(xrdb-option-name-face ((t (:bold t :foreground "yellow")))) + '(xrdb-option-value-face ((t (:bold t :foreground "magenta")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "white" :foreground "black"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'lethe) + +;;; lethe-theme.el ends here diff --git a/replace-colorthemes/marine-theme.el b/replace-colorthemes/marine-theme.el new file mode 100644 index 0000000..2779c40 --- /dev/null +++ b/replace-colorthemes/marine-theme.el @@ -0,0 +1,123 @@ +;;; marine-theme.el --- marine theme + +;; Copyright (C) 2001 by Girish Bharadwaj +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of marine theme from `color-themes' + +;;; Code: + +(deftheme marine + "marine theme") + +(custom-theme-set-faces + 'marine + + '(default ((t (:background "#9dcec9" :foreground "darkslategray")))) + '(mouse ((t (:foreground "sienna1")))) + '(cursor ((t (:background "yellow")))) + '(border ((t (:foreground "black")))) + + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (nil)))) + '(border-glyph ((t (nil)))) + '(buffers-tab ((t (:background "#9dcec9" :foreground "darkslategray")))) + '(buffers-tab-face ((t (:background "#9dcec9" :foreground "darkslategray")))) + '(custom-button-face ((t (nil)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "gray85")))) + '(custom-comment-tag-face ((t (:foreground "blue4")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :foreground "blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "deeppink")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "darkgreen")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :foreground "blue")))) + '(display-time-mail-balloon-enhance-face ((t (:background "orange")))) + '(display-time-mail-balloon-gnus-group-face ((t (:foreground "blue")))) + '(display-time-time-balloon-face ((t (:foreground "red")))) + '(font-lock-builtin-face ((t (:foreground "SteelBlue")))) + '(font-lock-comment-face ((t (:foreground "cadetblue")))) + '(font-lock-constant-face ((t (:foreground "OrangeRed")))) + '(font-lock-doc-string-face ((t (:foreground "Salmon")))) + '(font-lock-function-name-face ((t (:bold t :foreground "NavyBlue")))) + '(font-lock-keyword-face ((t (:bold t :foreground "purple")))) + '(font-lock-preprocessor-face ((t (:foreground "SteelBlue")))) + '(font-lock-reference-face ((t (:foreground "SteelBlue")))) + '(font-lock-string-face ((t (:foreground "royalblue")))) + '(font-lock-type-face ((t (:foreground "darkmagenta")))) + '(font-lock-variable-name-face ((t (:foreground "violetred")))) + '(font-lock-warning-face ((t (:bold t :foreground "red")))) + '(green ((t (:foreground "green")))) + '(gnus-mouse-face ((t (:background "darkolivegreen" :foreground "white")))) + '(gui-button-face ((t (:background "grey75" :foreground "black")))) + '(gui-element ((t (:background "#489088" :foreground "black")))) + '(highlight ((t (:background "darkolivegreen" :foreground "white")))) + '(isearch ((t (:background "blue")))) + '(isearch-secondary ((t (:foreground "red3")))) + '(italic ((t (nil)))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:background "gray68" :foreground "darkslategray")))) + '(mode-line ((t (:background "black" :foreground "white")))) + '(mode-line-buffer-id ((t (:background "black" :foreground "white")))) + '(mode-line-mousable ((t (:background "black" :foreground "white")))) + '(mode-line-mousable-minor-mode ((t (:background "black" :foreground "white")))) + '(paren-blink-off ((t (:foreground "black")))) + '(paren-match ((t (:background "darkolivegreen" :foreground "white")))) + '(paren-mismatch ((t (:background "#9dcec9" :foreground "darkslategray")))) + '(pointer ((t (nil)))) + '(primary-selection ((t (:background "blue")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "blue")))) + '(right-margin ((t (nil)))) + '(secondary-selection ((t (:background "darkslateblue" :foreground "white")))) + '(smiley-mouse-face ((t (:background "darkolivegreen" :foreground "white")))) + '(template-message-face ((t (:bold t)))) + '(text-cursor ((t (:background "yellow" :foreground "#9dcec9")))) + '(toolbar ((t (nil)))) + '(underline ((t (:underline t)))) + '(vertical-divider ((t (nil)))) + '(widget ((t (nil)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "forestgreen")))) + '(widget-field-face ((t (:background "gray")))) + '(widget-inactive-face ((t (:foreground "dimgray")))) + '(widget-single-line-field-face ((t (:background "dim gray" :foreground "white")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "blue"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'marine) + +;;; marine-theme.el ends here diff --git a/replace-colorthemes/marquardt-theme.el b/replace-colorthemes/marquardt-theme.el new file mode 100644 index 0000000..c22fdd4 --- /dev/null +++ b/replace-colorthemes/marquardt-theme.el @@ -0,0 +1,149 @@ +;;; marquardt-theme.el --- marquardt theme + +;; Copyright (C) 2000 by Colin Marquardt +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of marquardt theme from `color-themes' + +;;; Code: + +(deftheme marquardt + "marquardt theme") + +(custom-theme-set-faces + 'marquardt + + '(default ((t (:background "bisque" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "Red3")))) + '(border ((t (:foreground "black")))) + + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:bold t)))) + '(border-glyph ((t (nil)))) + '(calendar-today-face ((t (:underline t)))) + '(diary-face ((t (:foreground "red")))) + '(display-time-mail-balloon-enhance-face ((t (:background "orange")))) + '(display-time-mail-balloon-gnus-group-face ((t (:foreground "blue")))) + '(display-time-time-balloon-face ((t (:foreground "red")))) + '(ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue")))) + '(font-lock-comment-face ((t (:foreground "gray50")))) + '(font-lock-doc-string-face ((t (:foreground "green4")))) + '(font-lock-function-name-face ((t (:foreground "darkorange")))) + '(font-lock-keyword-face ((t (:foreground "blue3")))) + '(font-lock-preprocessor-face ((t (:foreground "blue3")))) + '(font-lock-reference-face ((t (:foreground "red3")))) + '(font-lock-special-comment-face ((t (:foreground "blue4")))) + '(font-lock-special-keyword-face ((t (:foreground "red4")))) + '(font-lock-string-face ((t (:foreground "green4")))) + '(font-lock-type-face ((t (:foreground "steelblue")))) + '(font-lock-variable-name-face ((t (:foreground "black")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "grey75" :foreground "black")))) + '(gui-element ((t (:background "azure1" :foreground "Black")))) + '(highlight ((t (:background "darkseagreen2" :foreground "blue")))) + '(holiday-face ((t (:background "pink" :foreground "black")))) + '(info-node ((t (:bold t)))) + '(info-xref ((t (:bold t)))) + '(isearch ((t (:background "yellow" :foreground "red")))) + '(italic ((t (:bold t)))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:background "gray68" :foreground "black")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:bold t :foreground "blue4")))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "bisque2" :foreground "steelblue4")))) + '(mode-line-buffer-id ((t (:background "bisque2" :foreground "blue4")))) + '(mode-line-mousable ((t (:background "bisque2" :foreground "firebrick")))) + '(mode-line-mousable-minor-mode ((t (:background "bisque2" :foreground "green4")))) + '(paren-blink-off ((t (:foreground "azure1")))) + '(paren-face ((t (:background "lightgoldenrod")))) + '(paren-match ((t (:background "bisque2")))) + '(paren-mismatch ((t (:background "DeepPink" :foreground "black")))) + '(paren-mismatch-face ((t (:background "DeepPink")))) + '(paren-no-match-face ((t (:background "yellow")))) + '(pointer ((t (:background "white" :foreground "blue")))) + '(primary-selection ((t (:background "gray65")))) + '(red ((t (:foreground "red")))) + '(right-margin ((t (nil)))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(shell-option-face ((t (:foreground "gray50")))) + '(shell-output-2-face ((t (:foreground "green4")))) + '(shell-output-3-face ((t (:foreground "green4")))) + '(shell-output-face ((t (:bold t)))) + '(shell-prompt-face ((t (:foreground "blue3")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:underline t :foreground "red")))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(text-cursor ((t (:background "Red3" :foreground "bisque")))) + '(toolbar ((t (:background "Gray80")))) + '(underline ((t (:underline t)))) + '(vertical-divider ((t (nil)))) + '(vhdl-font-lock-attribute-face ((t (:foreground "Orchid")))) + '(vhdl-font-lock-directive-face ((t (:foreground "CadetBlue")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "SaddleBrown")))) + '(vhdl-font-lock-function-face ((t (:foreground "DarkCyan")))) + '(vhdl-font-lock-generic-/constant-face ((t (:foreground "Gold3")))) + '(vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red")))) + '(vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange")))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-font-lock-type-face ((t (:foreground "ForestGreen")))) + '(vhdl-font-lock-variable-face ((t (:foreground "Grey50")))) + '(vhdl-speedbar-architecture-face ((t (:foreground "Blue")))) + '(vhdl-speedbar-architecture-selected-face ((t (:underline t :foreground "Blue")))) + '(vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod")))) + '(vhdl-speedbar-configuration-selected-face ((t (:underline t :foreground "DarkGoldenrod")))) + '(vhdl-speedbar-entity-face ((t (:foreground "ForestGreen")))) + '(vhdl-speedbar-entity-selected-face ((t (:underline t :foreground "ForestGreen")))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "Brown")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:underline t :foreground "Brown")))) + '(vhdl-speedbar-package-face ((t (:foreground "Grey50")))) + '(vhdl-speedbar-package-selected-face ((t (:underline t :foreground "Grey50")))) + '(vhdl-speedbar-subprogram-face ((t (:foreground "Orchid4")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "steelblue" :foreground "yellow"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'marquardt) + +;;; marquardt-theme.el ends here diff --git a/replace-colorthemes/matrix-theme.el b/replace-colorthemes/matrix-theme.el new file mode 100644 index 0000000..96d90d2 --- /dev/null +++ b/replace-colorthemes/matrix-theme.el @@ -0,0 +1,683 @@ +;;; matrix-theme.el --- matrix theme + +;; Copyright (C) 2003 by walterh@rocketmail.com +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of matrix theme from `color-themes' + +;;; Code: + +(deftheme matrix + "matrix theme") + +(custom-theme-set-faces + 'matrix + + '(default ((t (:background "black" :foreground "#7eff00")))) + '(mouse ((t (:background "#7eff00")))) + '(cursor ((t (:background "#7eff00" :foreground "black")))) + '(border ((t (:background "orange")))) + + '(Buffer-menu-buffer-face ((t (nil)))) + '(CUA-global-mark-face ((t (nil)))) + '(CUA-rectangle-face ((t (nil)))) + '(CUA-rectangle-noselect-face ((t (nil)))) + '(Info-title-1-face ((t (nil)))) + '(Info-title-2-face ((t (nil)))) + '(Info-title-3-face ((t (nil)))) + '(Info-title-4-face ((t (nil)))) + '(antlr-font-lock-keyword-face ((t (nil)))) + '(antlr-font-lock-literal-face ((t (nil)))) + '(antlr-font-lock-ruledef-face ((t (nil)))) + '(antlr-font-lock-ruleref-face ((t (nil)))) + '(antlr-font-lock-tokendef-face ((t (nil)))) + '(antlr-font-lock-tokenref-face ((t (nil)))) + '(bbdb-company ((t (nil)))) + '(bbdb-field-name ((t (nil)))) + '(bbdb-field-value ((t (nil)))) + '(bbdb-name ((t (nil)))) + '(bg:erc-color-face0 ((t (nil)))) + '(bg:erc-color-face1 ((t (nil)))) + '(bg:erc-color-face10 ((t (nil)))) + '(bg:erc-color-face11 ((t (nil)))) + '(bg:erc-color-face12 ((t (nil)))) + '(bg:erc-color-face13 ((t (nil)))) + '(bg:erc-color-face14 ((t (nil)))) + '(bg:erc-color-face15 ((t (nil)))) + '(bg:erc-color-face2 ((t (nil)))) + '(bg:erc-color-face3 ((t (nil)))) + '(bg:erc-color-face4 ((t (nil)))) + '(bg:erc-color-face5 ((t (nil)))) + '(bg:erc-color-face6 ((t (nil)))) + '(bg:erc-color-face7 ((t (nil)))) + '(bg:erc-color-face8 ((t (nil)))) + '(bg:erc-color-face9 ((t (nil)))) + '(blank-space-face ((t (nil)))) + '(blank-tab-face ((t (nil)))) + '(blue ((t (nil)))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:bold t :weight bold)))) + '(border-glyph ((t (nil)))) + '(buffers-tab ((t (nil)))) + '(button ((t (nil)))) + '(calendar-today-face ((t (nil)))) + '(change-log-acknowledgement-face ((t (nil)))) + '(change-log-conditionals-face ((t (nil)))) + '(change-log-date-face ((t (nil)))) + '(change-log-email-face ((t (nil)))) + '(change-log-file-face ((t (nil)))) + '(change-log-function-face ((t (nil)))) + '(change-log-list-face ((t (nil)))) + '(change-log-name-face ((t (nil)))) + '(clearcase-dired-checkedout-face ((t (nil)))) + '(comint-highlight-input ((t (nil)))) + '(comint-highlight-prompt ((t (nil)))) + '(cparen-around-andor-face ((t (nil)))) + '(cparen-around-begin-face ((t (nil)))) + '(cparen-around-conditional-face ((t (nil)))) + '(cparen-around-define-face ((t (nil)))) + '(cparen-around-lambda-face ((t (nil)))) + '(cparen-around-letdo-face ((t (nil)))) + '(cparen-around-quote-face ((t (nil)))) + '(cparen-around-set!-face ((t (nil)))) + '(cparen-around-syntax-rules-face ((t (nil)))) + '(cparen-around-vector-face ((t (nil)))) + '(cparen-binding-face ((t (nil)))) + '(cparen-binding-list-face ((t (nil)))) + '(cparen-conditional-clause-face ((t (nil)))) + '(cparen-normal-paren-face ((t (nil)))) + '(cperl-array-face ((t (nil)))) + '(cperl-hash-face ((t (nil)))) + '(cperl-invalid-face ((t (nil)))) + '(cperl-nonoverridable-face ((t (nil)))) + '(custom-button-face ((t (nil)))) + '(custom-button-pressed-face ((t (nil)))) + '(custom-changed-face ((t (nil)))) + '(custom-comment-face ((t (nil)))) + '(custom-comment-tag-face ((t (nil)))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (nil)))) + '(custom-group-tag-face ((t (nil)))) + '(custom-group-tag-face-1 ((t (nil)))) + '(custom-invalid-face ((t (nil)))) + '(custom-modified-face ((t (nil)))) + '(custom-rogue-face ((t (nil)))) + '(custom-saved-face ((t (nil)))) + '(custom-set-face ((t (nil)))) + '(custom-state-face ((t (nil)))) + '(custom-variable-button-face ((t (nil)))) + '(custom-variable-tag-face ((t (nil)))) + '(cvs-filename-face ((t (nil)))) + '(cvs-handled-face ((t (nil)))) + '(cvs-header-face ((t (nil)))) + '(cvs-marked-face ((t (nil)))) + '(cvs-msg-face ((t (nil)))) + '(cvs-need-action-face ((t (nil)))) + '(cvs-unknown-face ((t (nil)))) + '(cyan ((t (nil)))) + '(diary-face ((t (nil)))) + '(diff-added-face ((t (nil)))) + '(diff-changed-face ((t (nil)))) + '(diff-context-face ((t (nil)))) + '(diff-file-header-face ((t (nil)))) + '(diff-function-face ((t (nil)))) + '(diff-header-face ((t (nil)))) + '(diff-hunk-header-face ((t (nil)))) + '(diff-index-face ((t (nil)))) + '(diff-nonexistent-face ((t (nil)))) + '(diff-removed-face ((t (nil)))) + '(dired-face-boring ((t (nil)))) + '(dired-face-directory ((t (nil)))) + '(dired-face-executable ((t (nil)))) + '(dired-face-flagged ((t (nil)))) + '(dired-face-header ((t (nil)))) + '(dired-face-marked ((t (nil)))) + '(dired-face-permissions ((t (nil)))) + '(dired-face-setuid ((t (nil)))) + '(dired-face-socket ((t (nil)))) + '(dired-face-symlink ((t (nil)))) + '(display-time-mail-balloon-enhance-face ((t (nil)))) + '(display-time-mail-balloon-gnus-group-face ((t (nil)))) + '(display-time-time-balloon-face ((t (nil)))) + '(ebrowse-default-face ((t (nil)))) + '(ebrowse-file-name-face ((t (nil)))) + '(ebrowse-member-attribute-face ((t (nil)))) + '(ebrowse-member-class-face ((t (nil)))) + '(ebrowse-progress-face ((t (nil)))) + '(ebrowse-root-class-face ((t (nil)))) + '(ebrowse-tree-mark-face ((t (nil)))) + '(ecb-sources-face ((t (nil)))) + '(edb-inter-field-face ((t (nil)))) + '(edb-normal-summary-face ((t (nil)))) + '(ediff-current-diff-face-A ((t (nil)))) + '(ediff-current-diff-face-Ancestor ((t (nil)))) + '(ediff-current-diff-face-B ((t (nil)))) + '(ediff-current-diff-face-C ((t (nil)))) + '(ediff-even-diff-face-A ((t (nil)))) + '(ediff-even-diff-face-Ancestor ((t (nil)))) + '(ediff-even-diff-face-B ((t (nil)))) + '(ediff-even-diff-face-C ((t (nil)))) + '(ediff-fine-diff-face-A ((t (nil)))) + '(ediff-fine-diff-face-Ancestor ((t (nil)))) + '(ediff-fine-diff-face-B ((t (nil)))) + '(ediff-fine-diff-face-C ((t (nil)))) + '(ediff-odd-diff-face-A ((t (nil)))) + '(ediff-odd-diff-face-Ancestor ((t (nil)))) + '(ediff-odd-diff-face-B ((t (nil)))) + '(ediff-odd-diff-face-C ((t (nil)))) + '(eieio-custom-slot-tag-face ((t (nil)))) + '(emacs-wiki-bad-link-face ((t (nil)))) + '(emacs-wiki-link-face ((t (nil)))) + '(erc-action-face ((t (nil)))) + '(erc-bold-face ((t (nil)))) + '(erc-current-nick-face ((t (nil)))) + '(erc-dangerous-host-face ((t (nil)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (nil)))) + '(erc-error-face ((t (nil)))) + '(erc-fool-face ((t (nil)))) + '(erc-highlight-face ((t (nil)))) + '(erc-input-face ((t (nil)))) + '(erc-inverse-face ((t (nil)))) + '(erc-keyword-face ((t (nil)))) + '(erc-nick-default-face ((t (nil)))) + '(erc-nick-msg-face ((t (nil)))) + '(erc-notice-face ((t (nil)))) + '(erc-pal-face ((t (nil)))) + '(erc-prompt-face ((t (nil)))) + '(erc-timestamp-face ((t (nil)))) + '(erc-underline-face ((t (nil)))) + '(eshell-ls-archive-face ((t (nil)))) + '(eshell-ls-backup-face ((t (nil)))) + '(eshell-ls-clutter-face ((t (nil)))) + '(eshell-ls-directory-face ((t (nil)))) + '(eshell-ls-executable-face ((t (nil)))) + '(eshell-ls-missing-face ((t (nil)))) + '(eshell-ls-picture-face ((t (nil)))) + '(eshell-ls-product-face ((t (nil)))) + '(eshell-ls-readonly-face ((t (nil)))) + '(eshell-ls-special-face ((t (nil)))) + '(eshell-ls-symlink-face ((t (nil)))) + '(eshell-ls-text-face ((t (nil)))) + '(eshell-ls-todo-face ((t (nil)))) + '(eshell-ls-unreadable-face ((t (nil)))) + '(eshell-prompt-face ((t (nil)))) + '(eshell-test-failed-face ((t (nil)))) + '(eshell-test-ok-face ((t (nil)))) + '(excerpt ((t (nil)))) + '(extra-whitespace-face ((t (nil)))) + '(ff-paths-non-existant-file-face ((t (nil)))) + '(fg:black ((t (nil)))) + '(fg:erc-color-face0 ((t (nil)))) + '(fg:erc-color-face1 ((t (nil)))) + '(fg:erc-color-face10 ((t (nil)))) + '(fg:erc-color-face11 ((t (nil)))) + '(fg:erc-color-face12 ((t (nil)))) + '(fg:erc-color-face13 ((t (nil)))) + '(fg:erc-color-face14 ((t (nil)))) + '(fg:erc-color-face15 ((t (nil)))) + '(fg:erc-color-face2 ((t (nil)))) + '(fg:erc-color-face3 ((t (nil)))) + '(fg:erc-color-face4 ((t (nil)))) + '(fg:erc-color-face5 ((t (nil)))) + '(fg:erc-color-face6 ((t (nil)))) + '(fg:erc-color-face7 ((t (nil)))) + '(fg:erc-color-face8 ((t (nil)))) + '(fg:erc-color-face9 ((t (nil)))) + '(fixed ((t (nil)))) + '(fixed-pitch ((t (nil)))) + '(fl-comment-face ((t (nil)))) + '(fl-function-name-face ((t (nil)))) + '(fl-keyword-face ((t (nil)))) + '(fl-string-face ((t (nil)))) + '(fl-type-face ((t (nil)))) + '(flash-paren-face-off ((t (nil)))) + '(flash-paren-face-on ((t (nil)))) + '(flash-paren-face-region ((t (nil)))) + '(flyspell-duplicate-face ((t (nil)))) + '(flyspell-incorrect-face ((t (nil)))) + '(font-latex-bold-face ((t (nil)))) + '(font-latex-italic-face ((t (nil)))) + '(font-latex-math-face ((t (nil)))) + '(font-latex-sedate-face ((t (nil)))) + '(font-latex-string-face ((t (nil)))) + '(font-latex-warning-face ((t (nil)))) + '(font-lock-builtin-face ((t (:foreground "pink2")))) + '(font-lock-comment-face ((t (:italic t :background "black" :slant italic)))) + '(font-lock-constant-face ((t (:foreground "magenta")))) + '(font-lock-doc-face ((t (nil)))) + '(font-lock-doc-string-face ((t (nil)))) + '(font-lock-exit-face ((t (nil)))) + '(font-lock-function-name-face ((t (:bold t :underline t :weight bold)))) + '(font-lock-keyword-face ((t (:foreground "yellow1")))) + '(font-lock-other-emphasized-face ((t (nil)))) + '(font-lock-other-type-face ((t (nil)))) + '(font-lock-preprocessor-face ((t (nil)))) + '(font-lock-reference-face ((t (nil)))) + '(font-lock-special-comment-face ((t (nil)))) + '(font-lock-special-keyword-face ((t (nil)))) + '(font-lock-string-face ((t (:foreground "yellow2")))) + '(font-lock-type-face ((t (:foreground "LightYellow1")))) + '(font-lock-variable-name-face ((t (:foreground "light green")))) + '(font-lock-warning-face ((t (nil)))) + '(fringe ((t (nil)))) + '(gnus-cite-attribution-face ((t (nil)))) + '(gnus-cite-face-1 ((t (nil)))) + '(gnus-cite-face-10 ((t (nil)))) + '(gnus-cite-face-11 ((t (nil)))) + '(gnus-cite-face-2 ((t (nil)))) + '(gnus-cite-face-3 ((t (nil)))) + '(gnus-cite-face-4 ((t (nil)))) + '(gnus-cite-face-5 ((t (nil)))) + '(gnus-cite-face-6 ((t (nil)))) + '(gnus-cite-face-7 ((t (nil)))) + '(gnus-cite-face-8 ((t (nil)))) + '(gnus-cite-face-9 ((t (nil)))) + '(gnus-emphasis-bold ((t (nil)))) + '(gnus-emphasis-bold-italic ((t (nil)))) + '(gnus-emphasis-highlight-words ((t (nil)))) + '(gnus-emphasis-italic ((t (nil)))) + '(gnus-emphasis-strikethru ((t (nil)))) + '(gnus-emphasis-underline ((t (nil)))) + '(gnus-emphasis-underline-bold ((t (nil)))) + '(gnus-emphasis-underline-bold-italic ((t (nil)))) + '(gnus-emphasis-underline-italic ((t (nil)))) + '(gnus-filterhist-face-1 ((t (nil)))) + '(gnus-group-mail-1-empty-face ((t (nil)))) + '(gnus-group-mail-1-face ((t (nil)))) + '(gnus-group-mail-2-empty-face ((t (nil)))) + '(gnus-group-mail-2-face ((t (nil)))) + '(gnus-group-mail-3-empty-face ((t (nil)))) + '(gnus-group-mail-3-face ((t (nil)))) + '(gnus-group-mail-low-empty-face ((t (nil)))) + '(gnus-group-mail-low-face ((t (nil)))) + '(gnus-group-news-1-empty-face ((t (nil)))) + '(gnus-group-news-1-face ((t (nil)))) + '(gnus-group-news-2-empty-face ((t (nil)))) + '(gnus-group-news-2-face ((t (nil)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (nil)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (nil)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (nil)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (nil)))) + '(gnus-group-news-low-empty-face ((t (nil)))) + '(gnus-group-news-low-face ((t (nil)))) + '(gnus-header-content-face ((t (nil)))) + '(gnus-header-from-face ((t (nil)))) + '(gnus-header-name-face ((t (nil)))) + '(gnus-header-newsgroups-face ((t (nil)))) + '(gnus-header-subject-face ((t (nil)))) + '(gnus-picon-face ((t (nil)))) + '(gnus-picon-xbm-face ((t (nil)))) + '(gnus-picons-face ((t (nil)))) + '(gnus-picons-xbm-face ((t (nil)))) + '(gnus-server-agent-face ((t (nil)))) + '(gnus-server-closed-face ((t (nil)))) + '(gnus-server-denied-face ((t (nil)))) + '(gnus-server-offline-face ((t (nil)))) + '(gnus-server-opened-face ((t (nil)))) + '(gnus-signature-face ((t (nil)))) + '(gnus-splash ((t (nil)))) + '(gnus-splash-face ((t (nil)))) + '(gnus-summary-cancelled-face ((t (nil)))) + '(gnus-summary-high-ancient-face ((t (nil)))) + '(gnus-summary-high-read-face ((t (nil)))) + '(gnus-summary-high-ticked-face ((t (nil)))) + '(gnus-summary-high-undownloaded-face ((t (nil)))) + '(gnus-summary-high-unread-face ((t (nil)))) + '(gnus-summary-low-ancient-face ((t (nil)))) + '(gnus-summary-low-read-face ((t (nil)))) + '(gnus-summary-low-ticked-face ((t (nil)))) + '(gnus-summary-low-undownloaded-face ((t (nil)))) + '(gnus-summary-low-unread-face ((t (nil)))) + '(gnus-summary-normal-ancient-face ((t (nil)))) + '(gnus-summary-normal-read-face ((t (nil)))) + '(gnus-summary-normal-ticked-face ((t (nil)))) + '(gnus-summary-normal-undownloaded-face ((t (nil)))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (nil)))) + '(gnus-x-face ((t (nil)))) + '(green ((t (nil)))) + '(gui-button-face ((t (nil)))) + '(gui-element ((t (nil)))) + '(header-line ((t (nil)))) + '(hi-black-b ((t (nil)))) + '(hi-black-hb ((t (nil)))) + '(hi-blue ((t (nil)))) + '(hi-blue-b ((t (nil)))) + '(hi-green ((t (nil)))) + '(hi-green-b ((t (nil)))) + '(hi-pink ((t (nil)))) + '(hi-red-b ((t (nil)))) + '(hi-yellow ((t (nil)))) + '(highlight ((t (:background "#7eff00" :foreground "black")))) + '(highlight-changes-delete-face ((t (nil)))) + '(highlight-changes-face ((t (nil)))) + '(highline-face ((t (nil)))) + '(holiday-face ((t (nil)))) + '(html-helper-bold-face ((t (nil)))) + '(html-helper-bold-italic-face ((t (nil)))) + '(html-helper-builtin-face ((t (nil)))) + '(html-helper-italic-face ((t (nil)))) + '(html-helper-underline-face ((t (nil)))) + '(html-tag-face ((t (nil)))) + '(hyper-apropos-documentation ((t (nil)))) + '(hyper-apropos-heading ((t (nil)))) + '(hyper-apropos-hyperlink ((t (nil)))) + '(hyper-apropos-major-heading ((t (nil)))) + '(hyper-apropos-section-heading ((t (nil)))) + '(hyper-apropos-warning ((t (nil)))) + '(ibuffer-deletion-face ((t (nil)))) + '(ibuffer-marked-face ((t (nil)))) + '(idlwave-help-link-face ((t (nil)))) + '(idlwave-shell-bp-face ((t (nil)))) + '(ido-first-match-face ((t (nil)))) + '(ido-indicator-face ((t (nil)))) + '(ido-only-match-face ((t (nil)))) + '(ido-subdir-face ((t (nil)))) + '(info-header-node ((t (nil)))) + '(info-header-xref ((t (nil)))) + '(info-menu-5 ((t (nil)))) + '(info-menu-6 ((t (nil)))) + '(info-menu-header ((t (nil)))) + '(info-node ((t (nil)))) + '(info-xref ((t (nil)))) + '(isearch ((t (nil)))) + '(isearch-lazy-highlight-face ((t (nil)))) + '(isearch-secondary ((t (nil)))) + '(italic ((t (:underline t)))) + '(jde-bug-breakpoint-cursor ((t (nil)))) + '(jde-bug-breakpoint-marker ((t (nil)))) + '(jde-db-active-breakpoint-face ((t (nil)))) + '(jde-db-requested-breakpoint-face ((t (nil)))) + '(jde-db-spec-breakpoint-face ((t (nil)))) + '(jde-java-font-lock-api-face ((t (nil)))) + '(jde-java-font-lock-bold-face ((t (nil)))) + '(jde-java-font-lock-code-face ((t (nil)))) + '(jde-java-font-lock-constant-face ((t (nil)))) + '(jde-java-font-lock-doc-tag-face ((t (nil)))) + '(jde-java-font-lock-italic-face ((t (nil)))) + '(jde-java-font-lock-link-face ((t (nil)))) + '(jde-java-font-lock-modifier-face ((t (nil)))) + '(jde-java-font-lock-number-face ((t (nil)))) + '(jde-java-font-lock-operator-face ((t (nil)))) + '(jde-java-font-lock-package-face ((t (nil)))) + '(jde-java-font-lock-pre-face ((t (nil)))) + '(jde-java-font-lock-underline-face ((t (nil)))) + '(lazy-highlight-face ((t (nil)))) + '(left-margin ((t (nil)))) + '(linemenu-face ((t (nil)))) + '(list-mode-item-selected ((t (nil)))) + '(log-view-file-face ((t (nil)))) + '(log-view-message-face ((t (nil)))) + '(magenta ((t (nil)))) + '(makefile-space-face ((t (nil)))) + '(man-bold ((t (nil)))) + '(man-heading ((t (nil)))) + '(man-italic ((t (nil)))) + '(man-xref ((t (nil)))) + '(menu ((t (nil)))) + '(message-cited-text ((t (nil)))) + '(message-cited-text-face ((t (nil)))) + '(message-header-cc-face ((t (nil)))) + '(message-header-contents ((t (nil)))) + '(message-header-name-face ((t (nil)))) + '(message-header-newsgroups-face ((t (nil)))) + '(message-header-other-face ((t (nil)))) + '(message-header-subject-face ((t (nil)))) + '(message-header-to-face ((t (nil)))) + '(message-header-xheader-face ((t (nil)))) + '(message-headers ((t (nil)))) + '(message-highlighted-header-contents ((t (nil)))) + '(message-mml-face ((t (nil)))) + '(message-separator-face ((t (nil)))) + '(message-url ((t (nil)))) + '(minibuffer-prompt ((t (nil)))) + '(mmm-face ((t (nil)))) + '(mode-line ((t (:bold t :background "gray" :foreground "black" :weight bold)))) + '(mode-line-inactive ((t (nil)))) + '(mode-line-buffer-id ((t (:background "orange" :foreground "black")))) + '(mode-line-mousable ((t (:background "orange" :foreground "black")))) + '(mode-line-mousable-minor-mode ((t (:background "orange" :foreground "black")))) + '(mpg123-face-cur ((t (nil)))) + '(mpg123-face-slider ((t (nil)))) + '(my-tab-face ((t (nil)))) + '(nil ((t (nil)))) + '(overlay-empty-face ((t (nil)))) + '(p4-diff-del-face ((t (nil)))) + '(paren-blink-off ((t (nil)))) + '(paren-face ((t (nil)))) + '(paren-face-match ((t (nil)))) + '(paren-face-mismatch ((t (nil)))) + '(paren-face-no-match ((t (nil)))) + '(paren-match ((t (nil)))) + '(paren-mismatch ((t (nil)))) + '(paren-mismatch-face ((t (nil)))) + '(paren-no-match-face ((t (nil)))) + '(pointer ((t (nil)))) + '(primary-selection ((t (nil)))) + '(reb-match-0 ((t (nil)))) + '(reb-match-1 ((t (nil)))) + '(reb-match-2 ((t (nil)))) + '(reb-match-3 ((t (nil)))) + '(red ((t (nil)))) + '(region ((t (:background "#7eff00" :foreground "black")))) + '(right-margin ((t (nil)))) + '(rpm-spec-dir-face ((t (nil)))) + '(rpm-spec-doc-face ((t (nil)))) + '(rpm-spec-ghost-face ((t (nil)))) + '(rpm-spec-macro-face ((t (nil)))) + '(rpm-spec-package-face ((t (nil)))) + '(rpm-spec-tag-face ((t (nil)))) + '(rpm-spec-var-face ((t (nil)))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "orange" :foreground "black")))) + '(semantic-dirty-token-face ((t (nil)))) + '(semantic-intangible-face ((t (nil)))) + '(semantic-read-only-face ((t (nil)))) + '(semantic-unmatched-syntax-face ((t (nil)))) + '(senator-intangible-face ((t (nil)))) + '(senator-momentary-highlight-face ((t (nil)))) + '(senator-read-only-face ((t (nil)))) + '(sgml-comment-face ((t (nil)))) + '(sgml-doctype-face ((t (nil)))) + '(sgml-end-tag-face ((t (nil)))) + '(sgml-entity-face ((t (nil)))) + '(sgml-ignored-face ((t (nil)))) + '(sgml-ms-end-face ((t (nil)))) + '(sgml-ms-start-face ((t (nil)))) + '(sgml-pi-face ((t (nil)))) + '(sgml-sgml-face ((t (nil)))) + '(sgml-short-ref-face ((t (nil)))) + '(sgml-shortref-face ((t (nil)))) + '(sgml-start-tag-face ((t (nil)))) + '(sh-heredoc-face ((t (nil)))) + '(shell-option-face ((t (nil)))) + '(shell-output-2-face ((t (nil)))) + '(shell-output-3-face ((t (nil)))) + '(shell-output-face ((t (nil)))) + '(shell-prompt-face ((t (nil)))) + '(show-block-face1 ((t (nil)))) + '(show-block-face2 ((t (nil)))) + '(show-block-face3 ((t (nil)))) + '(show-block-face4 ((t (nil)))) + '(show-block-face5 ((t (nil)))) + '(show-block-face6 ((t (nil)))) + '(show-block-face7 ((t (nil)))) + '(show-block-face8 ((t (nil)))) + '(show-block-face9 ((t (nil)))) + '(show-paren-match-face ((t (:background "orange" :foreground "black")))) + '(show-paren-mismatch-face ((t (:underline t)))) + '(show-tabs-space-face ((t (nil)))) + '(show-tabs-tab-face ((t (nil)))) + '(smerge-base-face ((t (nil)))) + '(smerge-markers-face ((t (nil)))) + '(smerge-mine-face ((t (nil)))) + '(smerge-other-face ((t (nil)))) + '(speedbar-button-face ((t (nil)))) + '(speedbar-directory-face ((t (nil)))) + '(speedbar-file-face ((t (nil)))) + '(speedbar-highlight-face ((t (nil)))) + '(speedbar-selected-face ((t (nil)))) + '(speedbar-separator-face ((t (nil)))) + '(speedbar-tag-face ((t (nil)))) + '(strokes-char-face ((t (nil)))) + '(swbuff-current-buffer-face ((t (nil)))) + '(tabbar-button-face ((t (nil)))) + '(tabbar-default-face ((t (nil)))) + '(tabbar-selected-face ((t (nil)))) + '(tabbar-separator-face ((t (nil)))) + '(tabbar-unselected-face ((t (nil)))) + '(template-message-face ((t (nil)))) + '(term-black ((t (nil)))) + '(term-blackbg ((t (nil)))) + '(term-blue ((t (nil)))) + '(term-blue-bold-face ((t (nil)))) + '(term-blue-face ((t (nil)))) + '(term-blue-inv-face ((t (nil)))) + '(term-blue-ul-face ((t (nil)))) + '(term-bluebg ((t (nil)))) + '(term-bold ((t (nil)))) + '(term-cyan ((t (nil)))) + '(term-cyan-bold-face ((t (nil)))) + '(term-cyan-face ((t (nil)))) + '(term-cyan-inv-face ((t (nil)))) + '(term-cyan-ul-face ((t (nil)))) + '(term-cyanbg ((t (nil)))) + '(term-default ((t (nil)))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-bold-face ((t (nil)))) + '(term-default-face ((t (nil)))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-default-inv-face ((t (nil)))) + '(term-default-ul-face ((t (nil)))) + '(term-green ((t (nil)))) + '(term-green-bold-face ((t (nil)))) + '(term-green-face ((t (nil)))) + '(term-green-inv-face ((t (nil)))) + '(term-green-ul-face ((t (nil)))) + '(term-greenbg ((t (nil)))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (nil)))) + '(term-magenta-bold-face ((t (nil)))) + '(term-magenta-face ((t (nil)))) + '(term-magenta-inv-face ((t (nil)))) + '(term-magenta-ul-face ((t (nil)))) + '(term-magentabg ((t (nil)))) + '(term-red ((t (nil)))) + '(term-red-bold-face ((t (nil)))) + '(term-red-face ((t (nil)))) + '(term-red-inv-face ((t (nil)))) + '(term-red-ul-face ((t (nil)))) + '(term-redbg ((t (nil)))) + '(term-underline ((t (nil)))) + '(term-white ((t (nil)))) + '(term-white-bold-face ((t (nil)))) + '(term-white-face ((t (nil)))) + '(term-white-inv-face ((t (nil)))) + '(term-white-ul-face ((t (nil)))) + '(term-whitebg ((t (nil)))) + '(term-yellow ((t (nil)))) + '(term-yellow-bold-face ((t (nil)))) + '(term-yellow-face ((t (nil)))) + '(term-yellow-inv-face ((t (nil)))) + '(term-yellow-ul-face ((t (nil)))) + '(term-yellowbg ((t (nil)))) + '(tex-math-face ((t (nil)))) + '(texinfo-heading-face ((t (nil)))) + '(text-cursor ((t (nil)))) + '(tool-bar ((t (nil)))) + '(tooltip ((t (nil)))) + '(trailing-whitespace ((t (nil)))) + '(underline ((t (:underline t)))) + '(variable-pitch ((t (nil)))) + '(vc-annotate-face-0046FF ((t (nil)))) + '(vcursor ((t (nil)))) + '(vertical-divider ((t (nil)))) + '(vhdl-font-lock-attribute-face ((t (nil)))) + '(vhdl-font-lock-directive-face ((t (nil)))) + '(vhdl-font-lock-enumvalue-face ((t (nil)))) + '(vhdl-font-lock-function-face ((t (nil)))) + '(vhdl-font-lock-generic-/constant-face ((t (nil)))) + '(vhdl-font-lock-prompt-face ((t (nil)))) + '(vhdl-font-lock-reserved-words-face ((t (nil)))) + '(vhdl-font-lock-translate-off-face ((t (nil)))) + '(vhdl-font-lock-type-face ((t (nil)))) + '(vhdl-font-lock-variable-face ((t (nil)))) + '(vhdl-speedbar-architecture-face ((t (nil)))) + '(vhdl-speedbar-architecture-selected-face ((t (nil)))) + '(vhdl-speedbar-configuration-face ((t (nil)))) + '(vhdl-speedbar-configuration-selected-face ((t (nil)))) + '(vhdl-speedbar-entity-face ((t (nil)))) + '(vhdl-speedbar-entity-selected-face ((t (nil)))) + '(vhdl-speedbar-instantiation-face ((t (nil)))) + '(vhdl-speedbar-instantiation-selected-face ((t (nil)))) + '(vhdl-speedbar-package-face ((t (nil)))) + '(vhdl-speedbar-package-selected-face ((t (nil)))) + '(vhdl-speedbar-subprogram-face ((t (nil)))) + '(viper-minibuffer-emacs-face ((t (nil)))) + '(viper-minibuffer-insert-face ((t (nil)))) + '(viper-minibuffer-vi-face ((t (nil)))) + '(viper-replace-overlay-face ((t (nil)))) + '(viper-search-face ((t (nil)))) + '(vm-xface ((t (nil)))) + '(vmpc-pre-sig-face ((t (nil)))) + '(vmpc-sig-face ((t (nil)))) + '(w3m-anchor-face ((t (nil)))) + '(w3m-arrived-anchor-face ((t (nil)))) + '(w3m-header-line-location-content-face ((t (nil)))) + '(w3m-header-line-location-title-face ((t (nil)))) + '(white ((t (nil)))) + '(widget ((t (nil)))) + '(widget-button-face ((t (nil)))) + '(widget-button-pressed-face ((t (nil)))) + '(widget-documentation-face ((t (nil)))) + '(widget-field-face ((t (nil)))) + '(widget-inactive-face ((t (nil)))) + '(widget-single-line-field-face ((t (nil)))) + '(woman-addition-face ((t (nil)))) + '(woman-bold-face ((t (nil)))) + '(woman-italic-face ((t (nil)))) + '(woman-unknown-face ((t (nil)))) + '(x-face ((t (nil)))) + '(xrdb-option-name-face ((t (nil)))) + '(xref-keyword-face ((t (nil)))) + '(xref-list-default-face ((t (nil)))) + '(xref-list-pilot-face ((t (nil)))) + '(xref-list-symbol-face ((t (nil)))) + '(yellow ((t (nil)))) + '(zmacs-region ((t (nil))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'matrix) + +;;; matrix-theme.el ends here diff --git a/replace-colorthemes/midnight-theme.el b/replace-colorthemes/midnight-theme.el new file mode 100644 index 0000000..879296b --- /dev/null +++ b/replace-colorthemes/midnight-theme.el @@ -0,0 +1,64 @@ +;;; midnight-theme.el --- midnight theme + +;; Copyright (C) 2000 by Gordon Messmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of midnight theme from `color-themes' + +;;; Code: + +(deftheme midnight + "midnight theme") + +(custom-theme-set-faces + 'midnight + + '(default ((t (:background "black" :foreground "grey85")))) + '(mouse ((t (:foreground "grey85")))) + '(cursor ((t (:background "grey85")))) + + '(font-lock-comment-face ((t (:italic t :foreground "grey60")))) + '(font-lock-string-face ((t (:foreground "Magenta")))) + '(font-lock-keyword-face ((t (:foreground "Cyan")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink")))) + '(font-lock-constant-face ((t (:foreground "OliveDrab")))) + '(font-lock-type-face ((t (:foreground "DarkCyan")))) + '(font-lock-variable-name-face ((t (:foreground "DarkGoldenrod")))) + '(font-lock-function-name-face ((t (:foreground "SlateBlue")))) + '(font-lock-builtin-face ((t (:foreground "SkyBlue")))) + '(highline-face ((t (:background "grey12")))) + '(setnu-line-number-face ((t (:background "Grey15" :foreground "White" :bold t)))) + '(show-paren-match-face ((t (:background "grey30")))) + '(region ((t (:background "grey15")))) + '(highlight ((t (:background "blue")))) + '(secondary-selection ((t (:background "navy")))) + '(widget-field-face ((t (:background "navy")))) + '(widget-single-line-field-face ((t (:background "royalblue"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'midnight) + +;;; midnight-theme.el ends here diff --git a/replace-colorthemes/mistyday-theme.el b/replace-colorthemes/mistyday-theme.el new file mode 100644 index 0000000..d651cdf --- /dev/null +++ b/replace-colorthemes/mistyday-theme.el @@ -0,0 +1,101 @@ +;;; mistyday-theme.el --- mistyday theme + +;; Copyright (C) 2001 by K.C. Hari Kumar +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of mistyday theme from `color-themes' + +;;; Code: + +(deftheme mistyday + "mistyday theme") + +(custom-theme-set-faces + 'mistyday + + '(default ((t (:background "mistyrose" :foreground "Black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "deep pink")))) + '(border ((t (:foreground "black")))) + + '(goto-address-mail-face ((t (:italic t)))) + '(goto-address-mail-mouse-face ((t (:background "forest green" :foreground "white smoke")))) + '(goto-address-url-face ((t (:bold t)))) + '(goto-address-url-mouse-face ((t (:background "dark slate grey" :foreground "light cyan")))) + '(list-matching-lines-face ((t (:bold t)))) + + '(default ((t (nil)))) + '(CUA-global-mark-face ((t (:background "cyan" :foreground "black")))) + '(CUA-rectangle-face ((t (:background "maroon" :foreground "white")))) + '(CUA-rectangle-noselect-face ((t (:background "dimgray" :foreground "white")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(calendar-today-face ((t (:underline t :background "Spring Green" :foreground "Brown")))) + '(custom-button-face ((t (:background "dark slate grey" :foreground "azure")))) + '(custom-documentation-face ((t (:background "white" :foreground "blue")))) + '(diary-face ((t (:background "navy" :foreground "yellow")))) + '(font-latex-bold-face ((t (:bold t :foreground "DarkOliveGreen")))) + '(font-latex-italic-face ((t (:italic t :foreground "DarkOliveGreen")))) + '(font-latex-math-face ((t (:foreground "navy")))) + '(font-latex-sedate-face ((t (:foreground "DimGray")))) + '(font-latex-string-face ((t (nil)))) + '(font-latex-warning-face ((t (nil)))) + '(font-lock-builtin-face ((t (:background "DarkTurquoise" :foreground "Navy")))) + '(font-lock-comment-face ((t (:italic t :foreground "royal blue")))) + '(font-lock-constant-face ((t (:background "pale green" :foreground "dark slate blue")))) + '(font-lock-doc-string-face ((t (:background "medium aquamarine" :foreground "deep pink")))) + '(font-lock-function-name-face ((t (:background "SpringGreen" :foreground "MidnightBlue")))) + '(font-lock-keyword-face ((t (:foreground "dark magenta")))) + '(font-lock-preprocessor-face ((t (:background "pale green" :foreground "dark slate blue")))) + '(font-lock-reference-face ((t (:background "DarkTurquoise" :foreground "Navy")))) + '(font-lock-string-face ((t (:background "medium aquamarine" :foreground "deep pink")))) + '(font-lock-type-face ((t (:background "steel blue" :foreground "khaki")))) + '(font-lock-variable-name-face ((t (:background "thistle" :foreground "orange red")))) + '(font-lock-warning-face ((t (:background "LemonChiffon" :foreground "Red")))) + '(highlight ((t (:background "dark slate grey" :foreground "light cyan")))) + '(holiday-face ((t (:background "orangered" :foreground "lightyellow")))) + '(ido-first-match-face ((t (:bold t)))) + '(ido-only-match-face ((t (:foreground "ForestGreen")))) + '(ido-subdir-face ((t (:foreground "red")))) + '(italic ((t (:italic t)))) + '(isearch ((t (:background "sienna" :foreground "light cyan")))) + '(mode-line ((t (:background "Royalblue4" :foreground "lawn green")))) + '(mode-line-buffer-id ((t (:background "Royalblue4" :foreground "lawn green")))) + '(mode-line-mousable ((t (:background "Royalblue4" :foreground "lawn green")))) + '(mode-line-mousable-minor-mode ((t (:background "Royalblue4" :foreground "lawn green")))) + '(paren-face-match ((t (:background "turquoise")))) + '(paren-face-mismatch ((t (:background "purple" :foreground "white")))) + '(paren-face-no-match ((t (:background "yellow" :foreground "black")))) + '(primary-selection ((t (:background "sienna" :foreground "light cyan")))) + '(region ((t (:background "sienna" :foreground "light cyan")))) + '(secondary-selection ((t (:background "forest green" :foreground "white smoke")))) + '(underline ((t (:underline t)))) + '(zmacs-region ((t (:background "sienna" :foreground "light cyan"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'mistyday) + +;;; mistyday-theme.el ends here diff --git a/replace-colorthemes/montz-theme.el b/replace-colorthemes/montz-theme.el new file mode 100644 index 0000000..3e3fea9 --- /dev/null +++ b/replace-colorthemes/montz-theme.el @@ -0,0 +1,196 @@ +;;; montz-theme.el --- montz theme + +;; Copyright (C) 2000 by Brady Montz +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of montz theme from `color-themes' + +;;; Code: + +(deftheme montz + "montz theme") + +(custom-theme-set-faces + 'montz + + '(default ((t (:background "gray80" :foreground "black")))) + '(cursor ((t (:background "Red3")))) + '(border ((t (:foreground "black")))) + + '(gnus-mouse-face ((t (:background "darkseagreen2")))) + '(smiley-mouse-face ((t (:background "darkseagreen2")))) + + '(bbdb-company ((t (:italic t)))) + '(bbdb-field-name ((t (:bold t)))) + '(bbdb-field-value ((t (nil)))) + '(bbdb-name ((t (:underline t)))) + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(border-glyph ((t (nil)))) + '(dired-face-boring ((t (:foreground "Gray65")))) + '(dired-face-directory ((t (:bold t)))) + '(dired-face-executable ((t (:foreground "SeaGreen")))) + '(dired-face-flagged ((t (:background "LightSlateGray")))) + '(dired-face-marked ((t (:background "PaleVioletRed")))) + '(dired-face-permissions ((t (:background "grey75" :foreground "black")))) + '(dired-face-setuid ((t (:foreground "Red")))) + '(dired-face-socket ((t (:foreground "magenta")))) + '(dired-face-symlink ((t (:foreground "cyan")))) + '(display-time-mail-balloon-enhance-face ((t (:background "orange")))) + '(display-time-mail-balloon-gnus-group-face ((t (:foreground "blue")))) + '(display-time-time-balloon-face ((t (:foreground "red")))) + '(font-lock-builtin-face ((t (:foreground "red3")))) + '(font-lock-comment-face ((t (:foreground "blue")))) + '(font-lock-constant-face ((t (:foreground "red3")))) + '(font-lock-doc-string-face ((t (:foreground "mediumvioletred")))) + '(font-lock-function-name-face ((t (:foreground "firebrick")))) + '(font-lock-keyword-face ((t (:bold t :foreground "black")))) + '(font-lock-preprocessor-face ((t (:foreground "blue3")))) + '(font-lock-reference-face ((t (:foreground "red3")))) + '(font-lock-string-face ((t (:foreground "mediumvioletred")))) + '(font-lock-type-face ((t (:foreground "darkgreen")))) + '(font-lock-variable-name-face ((t (:foreground "black")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:bold t)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen")))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-header-content-face ((t (:italic t :foreground "indianred4")))) + '(gnus-header-from-face ((t (:foreground "red3")))) + '(gnus-header-name-face ((t (:foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue")))) + '(gnus-header-subject-face ((t (:foreground "red4")))) + '(gnus-picons-face ((t (:background "white" :foreground "black")))) + '(gnus-picons-xbm-face ((t (:background "white" :foreground "black")))) + '(gnus-signature-face ((t (:italic t)))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(gnus-x-face ((t (:background "white" :foreground "black")))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "grey75" :foreground "black")))) + '(gui-element ((t (nil)))) + '(highlight ((t (:background "darkseagreen2")))) + '(info-node ((t (:bold t)))) + '(info-xref ((t (:bold t)))) + '(isearch ((t (:background "paleturquoise")))) + '(italic ((t (:italic t)))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:background "gray68" :foreground "black")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:bold t :foreground "blue4")))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (nil)))) + '(mode-line-buffer-id ((t (:background "Gray80" :foreground "blue4")))) + '(mode-line-mousable ((t (:background "Gray80" :foreground "firebrick")))) + '(mode-line-mousable-minor-mode ((t (:background "Gray80" :foreground "green4")))) + '(paren-face-match ((t (:background "turquoise")))) + '(paren-face-mismatch ((t (:background "purple" :foreground "white")))) + '(paren-face-no-match ((t (:background "yellow" :foreground "black")))) + '(pointer ((t (nil)))) + '(primary-selection ((t (:background "gray65")))) + '(red ((t (:foreground "red")))) + '(right-margin ((t (nil)))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(text-cursor ((t (:background "Red3" :foreground "gray80")))) + '(toolbar ((t (nil)))) + '(underline ((t (:underline t)))) + '(vertical-divider ((t (nil)))) + '(viper-minibuffer-emacs-face ((t (:background "gray80" :foreground "black")))) + '(viper-minibuffer-insert-face ((t (:background "gray80" :foreground "black")))) + '(viper-minibuffer-vi-face ((t (:background "gray80" :foreground "black")))) + '(viper-replace-overlay-face ((t (:background "black" :foreground "white")))) + '(viper-search-face ((t (:background "black" :foreground "white")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "black" :foreground "white"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'montz) + +;;; montz-theme.el ends here diff --git a/replace-colorthemes/oswald-theme.el b/replace-colorthemes/oswald-theme.el new file mode 100644 index 0000000..5cfb323 --- /dev/null +++ b/replace-colorthemes/oswald-theme.el @@ -0,0 +1,97 @@ +;;; oswald-theme.el --- oswald theme + +;; Copyright (C) 2001 by Tom Oswald +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of oswald theme from `color-themes' + +;;; Code: + +(deftheme oswald + "oswald theme") + +(custom-theme-set-faces + 'oswald + + '(default ((t (:background "black" :foreground "green")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:foreground "black")))) + + '(list-matching-lines-face ((t (:bold t)))) + '(view-highlight-face ((t (:background "yellow" :foreground "red")))) + + '(blank-space-face ((t (:background "LightGray")))) + '(blank-tab-face ((t (:background "green" :foreground "black")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick")))) + '(ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black")))) + '(ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid")))) + '(ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy")))) + '(ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black")))) + '(ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-B ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black")))) + '(ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy")))) + '(ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black")))) + '(ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black")))) + '(ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black")))) + '(ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White")))) + '(ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White")))) + '(font-lock-builtin-face ((t (:italic t :bold t :foreground "LightSteelBlue")))) + '(font-lock-comment-face ((t (:italic t :foreground "LightGoldenrod4")))) + '(font-lock-constant-face ((t (:italic t :foreground "HotPink")))) + '(font-lock-doc-string-face ((t (:italic t :foreground "orange")))) + '(font-lock-function-name-face ((t (:italic t :bold t :foreground "red")))) + '(font-lock-keyword-face ((t (:foreground "red")))) + '(font-lock-preprocessor-face ((t (:italic t :foreground "HotPink")))) + '(font-lock-string-face ((t (:italic t :foreground "orange")))) + '(font-lock-reference-face ((t (:italic t :bold t :foreground "LightSteelBlue")))) + '(font-lock-type-face ((t (:italic t :foreground "LightSlateBlue")))) + '(font-lock-variable-name-face ((t (:underline t :foreground "LightGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink")))) + '(highlight ((t (:background "yellow" :foreground "red")))) + '(isearch ((t (:background "dim gray" :foreground "aquamarine")))) + '(ispell-face ((t (:bold t :background "#3454b4" :foreground "yellow")))) + '(italic ((t (:italic t)))) + '(mode-line ((t (:background "green" :foreground "black")))) + '(mode-line-buffer-id ((t (:background "green" :foreground "black")))) + '(mode-line-mousable ((t (:background "green" :foreground "black")))) + '(mode-line-mousable-minor-mode ((t (:background "green" :foreground "black")))) + '(region ((t (:background "dim gray" :foreground "aquamarine")))) + '(secondary-selection ((t (:background "darkslateblue" :foreground "light goldenrod")))) + '(show-paren-match-face ((t (:background "turquoise" :foreground "black")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(underline ((t (:underline t)))) + '(zmacs-region ((t (:background "dim gray" :foreground "aquamarine"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'oswald) + +;;; oswald-theme.el ends here diff --git a/replace-colorthemes/parus-theme.el b/replace-colorthemes/parus-theme.el new file mode 100644 index 0000000..b4ec4da --- /dev/null +++ b/replace-colorthemes/parus-theme.el @@ -0,0 +1,165 @@ +;;; parus-theme.el --- parus theme + +;; Copyright (C) 2000 by Jon K Hellank +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of parus theme from `color-themes' + +;;; Code: + +(deftheme parus + "parus theme") + +(custom-theme-set-faces + 'parus + + '(default ((t (:background "#00005a" :foreground "White")))) + '(mouse ((t (:foreground "yellow")))) + '(cursor ((t (:background "yellow")))) + '(border ((t (:foreground "black")))) + + '(gnus-mouse-face ((t (:background "darkolivegreen")))) + '(list-matching-lines-face ((t (:bold t)))) + '(paren-face ((t (:bold t)))) + '(view-highlight-face ((t (:background "darkolivegreen")))) + + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(font-latex-bold-face ((t (:bold t :foreground "OliveDrab")))) + '(font-latex-italic-face ((t (:italic t :foreground "OliveDrab")))) + '(font-latex-math-face ((t (:foreground "burlywood")))) + '(font-latex-sedate-face ((t (:foreground "LightGray")))) + '(font-latex-string-face ((t (:foreground "LightSalmon")))) + '(font-latex-warning-face ((t (:foreground "Pink")))) + '(font-lock-builtin-face ((t (:foreground "#e0e0ff")))) + '(font-lock-reference-face ((t (:foreground "#e0e0ff")))) + '(font-lock-comment-face ((t (:foreground "#FFd1d1")))) + '(font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(font-lock-preprocessor-face ((t (:foreground "Aquamarine")))) + '(font-lock-function-name-face ((t (:foreground "#b2e4ff")))) + '(font-lock-keyword-face ((t (:foreground "#a0ffff")))) + '(font-lock-string-face ((t (:foreground "#efca10")))) + '(font-lock-doc-string-face ((t (:foreground "#efca10")))) + '(font-lock-type-face ((t (:foreground "PaleGreen")))) + '(font-lock-variable-name-face ((t (:foreground "LightGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "#dfdfff")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "light cyan")))) + '(gnus-cite-face-3 ((t (:foreground "light yellow")))) + '(gnus-cite-face-4 ((t (:foreground "light pink")))) + '(gnus-cite-face-5 ((t (:foreground "pale green")))) + '(gnus-cite-face-6 ((t (:foreground "beige")))) + '(gnus-cite-face-7 ((t (:foreground "orange")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t)))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise")))) + '(gnus-group-news-2-empty-face ((t (:foreground "turquoise")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "turquoise")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise")))) + '(gnus-header-content-face ((t (:italic t :foreground "#90f490")))) + '(gnus-header-from-face ((t (:foreground "#aaffaa")))) + '(gnus-header-name-face ((t (:foreground "#c7e3c7")))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "yellow")))) + '(gnus-header-subject-face ((t (:foreground "#a0f0a0")))) + '(gnus-signature-face ((t (:italic t)))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "pink")))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "pink")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "PaleGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "pink")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(highlight ((t (:background "darkolivegreen")))) + '(italic ((t (:italic t)))) + '(message-cited-text-face ((t (:foreground "#dfdfff")))) + '(message-header-cc-face ((t (:bold t :foreground "#a0f0a0")))) + '(message-header-name-face ((t (:foreground "#c7e3c7")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow")))) + '(message-header-other-face ((t (:foreground "#db9b9b")))) + '(message-header-subject-face ((t (:foreground "#a0f0a0")))) + '(message-header-to-face ((t (:bold t :foreground "#aaffaa")))) + '(message-header-xheader-face ((t (:foreground "#e2e2ff")))) + '(message-mml-face ((t (:foreground "#abdbab")))) + '(message-separator-face ((t (:foreground "#dfdfff")))) + '(mode-line ((t (:background "White" :foreground "#00005a")))) + '(mode-line-buffer-id ((t (:background "White" :foreground "#00005a")))) + '(mode-line-mousable ((t (:background "White" :foreground "#00005a")))) + '(mode-line-mousable-minor-mode ((t (:background "White" :foreground "#00005a")))) + '(paren-mismatch-face ((t (:background "DeepPink")))) + '(paren-no-match-face ((t (:background "yellow")))) + '(region ((t (:background "blue")))) + '(primary-selection ((t (:background "blue")))) + '(isearch ((t (:background "blue")))) + '(secondary-selection ((t (:background "darkslateblue")))) + '(underline ((t (:underline t)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:background "dim gray")))) + '(widget-inactive-face ((t (:foreground "light gray")))) + '(widget-single-line-field-face ((t (:background "dim gray"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'parus) + +;;; parus-theme.el ends here diff --git a/replace-colorthemes/pierson-theme.el b/replace-colorthemes/pierson-theme.el new file mode 100644 index 0000000..84abdd9 --- /dev/null +++ b/replace-colorthemes/pierson-theme.el @@ -0,0 +1,70 @@ +;;; pierson-theme.el --- pierson theme + +;; Copyright (C) 2000 by Dan L. Pierson +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of pierson theme from `color-themes' + +;;; Code: + +(deftheme pierson + "pierson theme") + +(custom-theme-set-faces + 'pierson + + '(default ((t (:background "AntiqueWhite" :foreground "black")))) + '(cursor ((t (:background "Orchid")))) + '(border ((t (:foreground "black")))) + + '(bold ((t (:bold t)))) + '(list-matching-lines-face ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(font-lock-builtin-face ((t (:foreground "Orchid")))) + '(font-lock-comment-face ((t (:foreground "ForestGreen")))) + '(font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(font-lock-function-name-face ((t (:foreground "blue3")))) + '(font-lock-keyword-face ((t (:foreground "Blue")))) + '(font-lock-string-face ((t (:foreground "Firebrick")))) + '(font-lock-type-face ((t (:foreground "Purple")))) + '(font-lock-variable-name-face ((t (:foreground "blue3")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(highlight ((t (:background "darkseagreen2")))) + '(italic ((t (:italic t)))) + '(mode-line ((t (:foreground "antiquewhite" :background "black")))) + '(mode-line-mousable-minor-mode ((t (:foreground "antiquewhite" :background "black")))) + '(mode-line-mousable ((t (:foreground "antiquewhite" :background "black")))) + '(mode-line-buffer-id ((t (:foreground "antiquewhite" :background "black")))) + '(region ((t (:background "gray")))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(underline ((t (:underline t))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'pierson) + +;;; pierson-theme.el ends here diff --git a/replace-colorthemes/pok-wob-theme.el b/replace-colorthemes/pok-wob-theme.el new file mode 100644 index 0000000..ef12ff3 --- /dev/null +++ b/replace-colorthemes/pok-wob-theme.el @@ -0,0 +1,181 @@ +;;; pok-wob-theme.el --- pok-wob theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of pok-wob theme from `color-themes' + +;;; Code: + +(deftheme pok-wob + "pok-wob theme") + +(custom-theme-set-faces + 'pok-wob + + '(default ((t (:background "black" :foreground "white")))) + '(mouse ((t (:foreground "gold")))) + '(cursor ((t (:background "yellow")))) + '(border ((t (:foreground "black")))) + + '(bold ((t (:bold t :foreground "light gray")))) + '(bold-italic ((t (:italic t :bold t :foreground "cyan")))) + '(calendar-today-face ((t (:underline t :foreground "white")))) + '(custom-button-face ((t (nil)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t)))) + '(custom-group-tag-face-1 ((t (:underline t)))) + '(custom-invalid-face ((t (:background "red" :foreground "white")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (nil)))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t)))) + '(diary-face ((t (:foreground "gold")))) + '(font-lock-builtin-face ((t (:bold t :foreground "cyan")))) + '(font-lock-comment-face ((t (:foreground "Gold")))) + '(font-lock-constant-face ((t (:bold t :foreground "LightSteelBlue")))) + '(font-lock-function-name-face ((t (:bold t :foreground "gold")))) + '(font-lock-keyword-face ((t (:bold t :foreground "Cyan")))) + '(font-lock-string-face ((t (:foreground "Khaki")))) + '(font-lock-type-face ((t (:bold t :foreground "Cyan")))) + '(font-lock-variable-name-face ((t (:italic t :foreground "gold")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink")))) + '(gnus-cite-attribution-face ((t (:underline t :foreground "beige")))) + '(gnus-cite-face-1 ((t (:foreground "gold")))) + '(gnus-cite-face-10 ((t (:foreground "coral")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "wheat")))) + '(gnus-cite-face-3 ((t (:foreground "light pink")))) + '(gnus-cite-face-4 ((t (:foreground "khaki")))) + '(gnus-cite-face-5 ((t (:foreground "pale green")))) + '(gnus-cite-face-6 ((t (:foreground "beige")))) + '(gnus-cite-face-7 ((t (:foreground "orange")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t :foreground "light gray")))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t :foreground "cyan")))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "gold")))) + '(gnus-emphasis-italic ((t (:italic t :foreground "cyan")))) + '(gnus-emphasis-underline ((t (:underline t :foreground "white")))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t :foreground "white")))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t :foreground "white")))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t :foreground "white")))) + '(gnus-group-mail-1-empty-face ((t (:foreground "Magenta")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "Magenta")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "Cyan")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "Cyan")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "Wheat")))) + '(gnus-group-mail-low-face ((t (:foreground "aquamarine4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise")))) + '(gnus-group-news-2-empty-face ((t (:foreground "turquoise")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "turquoise")))) + '(gnus-group-news-3-empty-face ((t (:foreground "wheat")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "Wheat")))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "MediumAquamarine")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-header-content-face ((t (:italic t :foreground "Wheat")))) + '(gnus-header-from-face ((t (:foreground "light yellow")))) + '(gnus-header-name-face ((t (:foreground "Wheat")))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "gold")))) + '(gnus-header-subject-face ((t (:bold t :foreground "Gold")))) + '(gnus-signature-face ((t (:italic t :foreground "white")))) + '(gnus-splash-face ((t (:foreground "orange")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "orange")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "red")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "coral")))) + '(gnus-summary-high-unread-face ((t (:bold t :foreground "gold")))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "red")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "coral")))) + '(gnus-summary-low-unread-face ((t (:italic t :foreground "white")))) + '(gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "PaleGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "pink")))) + '(gnus-summary-normal-unread-face ((t (:foreground "white")))) + '(gnus-summary-selected-face ((t (:underline t :foreground "white")))) + '(highlight ((t (:background "Blue" :foreground "white")))) + '(highline-face ((t (:background "dark slate gray" :foreground "white")))) + '(holiday-face ((t (:background "red" :foreground "white")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:italic t :bold t :foreground "white")))) + '(info-xref ((t (:bold t :foreground "light gray")))) + '(italic ((t (:italic t :foreground "cyan")))) + '(makefile-space-face ((t (:background "hotpink" :foreground "white")))) + '(message-cited-text-face ((t (:foreground "green")))) + '(message-header-cc-face ((t (:bold t :foreground "Aquamarine")))) + '(message-header-name-face ((t (:foreground "Gold")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "gold")))) + '(message-header-other-face ((t (:foreground "lightGray")))) + '(message-header-subject-face ((t (:foreground "Yellow")))) + '(message-header-to-face ((t (:bold t :foreground "green2")))) + '(message-header-xheader-face ((t (:foreground "sky blue")))) + '(message-mml-face ((t (:bold t :foreground "khaki")))) + '(message-separator-face ((t (:background "aquamarine" :foreground "black")))) + '(mode-line ((t (:background "dark gray" :foreground "black")))) + '(mode-line-buffer-id ((t (:background "dark gray" :foreground "black")))) + '(mode-line-mousable ((t (:background "dark gray" :foreground "black")))) + '(mode-line-mousable-minor-mode ((t (:background "dark gray" :foreground "black")))) + '(paren-mismatch-face ((t (:bold t :background "white" :foreground "red")))) + '(paren-no-match-face ((t (:bold t :background "white" :foreground "red")))) + '(region ((t (:background "MediumSlateBlue" :foreground "white")))) + '(secondary-selection ((t (:background "Sienna" :foreground "white")))) + '(show-paren-match-face ((t (:background "purple" :foreground "white")))) + '(show-paren-mismatch-face ((t (:bold t :background "white" :foreground "red")))) + '(speedbar-button-face ((t (nil)))) + '(speedbar-directory-face ((t (nil)))) + '(speedbar-file-face ((t (:bold t)))) + '(speedbar-highlight-face ((t (nil)))) + '(speedbar-selected-face ((t (:underline t)))) + '(speedbar-tag-face ((t (nil)))) + '(swbuff-current-buffer-face ((t (:bold t :foreground "red")))) + '(underline ((t (:underline t :foreground "white")))) + '(widget-button-face ((t (:bold t :foreground "coral")))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:background "dim gray" :foreground "white")))) + '(widget-inactive-face ((t (:foreground "light gray")))) + '(widget-single-line-field-face ((t (:background "dim gray" :foreground "white"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'pok-wob) + +;;; pok-wob-theme.el ends here diff --git a/replace-colorthemes/pok-wog-theme.el b/replace-colorthemes/pok-wog-theme.el new file mode 100644 index 0000000..839ae58 --- /dev/null +++ b/replace-colorthemes/pok-wog-theme.el @@ -0,0 +1,167 @@ +;;; pok-wog-theme.el --- pok-wog theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of pok-wog theme from `color-themes' + +;;; Code: + +(deftheme pok-wog + "pok-wog theme") + +(custom-theme-set-faces + 'pok-wog + + '(default ((t (:background "DarkSlateGray" :foreground "White")))) + '(mouse ((t (:foreground "gold")))) + '(cursor ((t (:background "Cyan")))) + '(border ((t (:foreground "black")))) + + '(bold ((t (:bold t :foreground "Wheat")))) + '(bold-italic ((t (:italic t :bold t :foreground "wheat")))) + '(calendar-today-face ((t (:underline t :foreground "white")))) + '(diary-face ((t (:foreground "red")))) + '(font-lock-builtin-face ((t (:bold t :foreground "cyan")))) + '(font-lock-comment-face ((t (:foreground "Gold")))) + '(font-lock-constant-face ((t (:bold t :foreground "LightSteelBlue")))) + '(font-lock-function-name-face ((t (:bold t :foreground "Yellow")))) + '(font-lock-keyword-face ((t (:bold t :foreground "Cyan")))) + '(font-lock-string-face ((t (:foreground "Khaki")))) + '(font-lock-type-face ((t (:bold t :foreground "Cyan")))) + '(font-lock-variable-name-face ((t (:foreground "LightGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink")))) + '(gnus-cite-attribution-face ((t (:bold t :foreground "Wheat")))) + '(gnus-cite-face-1 ((t (:foreground "wheat")))) + '(gnus-cite-face-10 ((t (:foreground "wheat")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "cyan")))) + '(gnus-cite-face-3 ((t (:foreground "light yellow")))) + '(gnus-cite-face-4 ((t (:foreground "light pink")))) + '(gnus-cite-face-5 ((t (:foreground "pale green")))) + '(gnus-cite-face-6 ((t (:foreground "beige")))) + '(gnus-cite-face-7 ((t (:foreground "orange")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t :foreground "wheat")))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t :foreground "white")))) + '(gnus-emphasis-underline ((t (:underline t :foreground "white")))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t :foreground "wheat")))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t)))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t :foreground "white")))) + '(gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "Salmon")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "gold")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "Wheat")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise")))) + '(gnus-group-news-2-empty-face ((t (:foreground "turquoise")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "turquoise")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t :foreground "Wheat")))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise")))) + '(gnus-header-content-face ((t (:italic t :foreground "Wheat")))) + '(gnus-header-from-face ((t (:foreground "light yellow")))) + '(gnus-header-name-face ((t (:foreground "cyan")))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "yellow")))) + '(gnus-header-subject-face ((t (:bold t :foreground "Gold")))) + '(gnus-signature-face ((t (:italic t :foreground "wheat")))) + '(gnus-splash-face ((t (:foreground "orange")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "pink")))) + '(gnus-summary-high-unread-face ((t (:bold t :foreground "gold")))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "pink")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "PaleGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "pink")))) + '(gnus-summary-normal-unread-face ((t (:foreground "wheat")))) + '(gnus-summary-selected-face ((t (:underline t :foreground "white")))) + '(highlight ((t (:background "Blue" :foreground "white")))) + '(highline-face ((t (:background "black" :foreground "white")))) + '(holiday-face ((t (:background "pink" :foreground "white")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:italic t :bold t :foreground "white")))) + '(info-xref ((t (:bold t :foreground "wheat")))) + '(italic ((t (:italic t :foreground "white")))) + '(makefile-space-face ((t (:background "hotpink")))) + '(message-cited-text-face ((t (:foreground "green")))) + '(message-header-cc-face ((t (:bold t :foreground "Aquamarine")))) + '(message-header-name-face ((t (:foreground "Gold")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow")))) + '(message-header-other-face ((t (:foreground "lightGray")))) + '(message-header-subject-face ((t (:foreground "Yellow")))) + '(message-header-to-face ((t (:bold t :foreground "green2")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:bold t :foreground "khaki")))) + '(message-separator-face ((t (:background "aquamarine" :foreground "black")))) + '(mode-line ((t (:background "DarkGray" :foreground "Black")))) + '(mode-line-buffer-id ((t (:background "DarkGray" :foreground "Black")))) + '(mode-line-mousable ((t (:background "DarkGray" :foreground "Black")))) + '(mode-line-mousable-minor-mode ((t (:background "DarkGray" :foreground "Black")))) + '(paren-mismatch-face ((t (:background "DeepPink" :foreground "white")))) + '(paren-no-match-face ((t (:background "yellow" :foreground "white")))) + '(region ((t (:background "MediumSlateBlue" :foreground "white")))) + '(secondary-selection ((t (:background "Sienna" :foreground "white")))) + '(show-paren-match-face ((t (:background "turquoise" :foreground "white")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(speedbar-button-face ((t (:bold t :foreground "magenta")))) + '(speedbar-directory-face ((t (:bold t :foreground "orchid")))) + '(speedbar-file-face ((t (:foreground "pink")))) + '(speedbar-highlight-face ((t (:background "black")))) + '(speedbar-selected-face ((t (:underline t :foreground "cyan")))) + '(speedbar-tag-face ((t (:foreground "yellow")))) + '(swbuff-current-buffer-face ((t (:bold t :foreground "red")))) + '(underline ((t (:underline t :foreground "white")))) + '(widget-button-face ((t (:bold t :foreground "wheat")))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:background "dim gray" :foreground "white")))) + '(widget-inactive-face ((t (:foreground "light gray")))) + '(widget-single-line-field-face ((t (:background "dim gray" :foreground "white"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'pok-wog) + +;;; pok-wog-theme.el ends here diff --git a/replace-colorthemes/railscast-theme.el b/replace-colorthemes/railscast-theme.el new file mode 100644 index 0000000..f3c3483 --- /dev/null +++ b/replace-colorthemes/railscast-theme.el @@ -0,0 +1,91 @@ +;;; railscast-theme.el --- railscast theme + +;; Copyright (C) 2009 Oleg Shaldybin +;; Copyright (C) 2014 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;;; License: + +;; MIT License +;; ----------- +;; Permission is hereby granted, free of charge, to any person +;; obtaining a copy of this software and associated documentation +;; files (the "Software"), to deal in the Software without +;; restriction, including without limitation the rights to use, +;; copy, modify, merge, publish, distribute, sublicense, and/or +;; sell copies of the Software, and to permit persons to whom the +;; Software is furnished to do so, subject to the following +;; conditions: +;; +;; The above copyright notice and this permission notice shall +;; be included in all copies or substantial portions of the +;; Software. +;; +;; THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, +;; EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES +;; OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND +;; NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT +;; HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, +;; WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING +;; FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR +;; OTHER DEALINGS IN THE SOFTWARE. + +;;; Commentary: +;; +;; Port of railscast theme from https://github.com/olegshaldybin/color-theme-railscasts.git + +;;; Code: + +(deftheme railscast + "railscast theme") + +(custom-theme-set-faces + 'railscast + + '(default ((t (:background "#232323" :foreground "#E6E1DC")))) + '(border ((t (:foreground "#232323")))) + '(mouse ((t (:foreground "sienna1")))) + '(cursor ((t (:background "#5A647E")))) + + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(fringe ((t (:background "#232323")))) + '(font-lock-builtin-face ((t (:foreground "#D0D0FF")))) + '(font-lock-comment-face ((t (:foreground "#BC9458" :italic t)))) + '(font-lock-constant-face ((t (:foreground "#6D9CBE")))) + '(font-lock-doc-string-face ((t (:foreground "#A5C261")))) + '(font-lock-function-name-face ((t (:foreground "#FFC66D")))) + '(font-lock-keyword-face ((t (:foreground "#CC7833")))) + '(font-lock-preprocessor-face ((t (:foreground "#CC7833")))) + '(font-lock-reference-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-string-face ((t (:foreground "#A5C261")))) + '(font-lock-type-face ((t (:foreground "white")))) + '(font-lock-variable-name-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-warning-face ((t (:foreground "Pink")))) + '(paren-face-match-light ((t (:foreground "#FFC66D" :background "#555577")))) + '(highlight ((t (:background "darkolivegreen")))) + '(italic ((t (:italic t)))) + '(mode-line ((t (:background "#A5BAF1" :foreground "black")))) + '(mode-line-buffer-id ((t (:background "#A5BAF1" :foreground "black")))) + '(region ((t (:background "#555577")))) + '(primary-selection ((t (:background "#555577")))) + '(isearch ((t (:background "#555555")))) + '(zmacs-region ((t (:background "#555577")))) + '(secondary-selection ((t (:background "darkslateblue")))) + '(flymake-errline ((t (:background "LightSalmon" :foreground "black")))) + '(flymake-warnline ((t (:background "LightSteelBlue" :foreground "black")))) + '(underline ((t (:underline t)))) + '(minibuffer-prompt ((t (:bold t :foreground "#FF6600"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'railscast) + +;;; railscast-theme.el ends here diff --git a/replace-colorthemes/ramangalahy-theme.el b/replace-colorthemes/ramangalahy-theme.el new file mode 100644 index 0000000..35d95da --- /dev/null +++ b/replace-colorthemes/ramangalahy-theme.el @@ -0,0 +1,211 @@ +;;; ramangalahy-theme.el --- ramangalahy theme + +;; Copyright (C) 2000 by Solofo Ramangalahy +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of ramangalahy theme from `color-themes' + +;;; Code: + +(deftheme ramangalahy + "ramangalahy theme") + +(custom-theme-set-faces + 'ramangalahy + + '(default ((t (:background "lightgrey" :foreground "black")))) + '(cursor ((t (:background "blue")))) + '(border ((t (:foreground "black")))) + + '(gnus-mouse-face ((t (:background "darkseagreen2")))) + '(goto-address-mail-face ((t (:underline t :bold t :foreground "#0000ee")))) + '(ispell-highlight-face ((t (:background "darkseagreen2")))) + '(setnu-line-number-face ((t (:bold t)))) + '(tinyreplace-face ((t (:background "darkseagreen2")))) + '(vm-highlight-url-face ((t (:italic t :bold t)))) + '(vm-highlighted-header-face ((t (:bold t)))) + '(vm-mime-button-face ((t (:background "grey75" :foreground "black")))) + '(vm-summary-highlight-face ((t (:bold t)))) + + '(bbdb-company ((t (nil)))) + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(border-glyph ((t (nil)))) + '(cperl-here-face ((t (:foreground "green4")))) + '(cperl-pod-face ((t (:foreground "brown4")))) + '(cperl-pod-head-face ((t (:foreground "steelblue")))) + '(custom-button-face ((t (:bold t)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :foreground "blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "red")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :foreground "blue")))) + '(dired-face-boring ((t (:foreground "Gray65")))) + '(dired-face-directory ((t (:bold t)))) + '(dired-face-executable ((t (:foreground "SeaGreen")))) + '(dired-face-flagged ((t (:background "LightSlateGray")))) + '(dired-face-marked ((t (:background "PaleVioletRed")))) + '(dired-face-permissions ((t (:background "grey75" :foreground "black")))) + '(dired-face-setuid ((t (:foreground "Red")))) + '(dired-face-socket ((t (:foreground "magenta")))) + '(dired-face-symlink ((t (:foreground "blue")))) + '(display-time-mail-balloon-enhance-face ((t (:background "orange")))) + '(display-time-mail-balloon-gnus-group-face ((t (:foreground "blue")))) + '(display-time-time-balloon-face ((t (:foreground "red")))) + '(ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue")))) + '(font-lock-comment-face ((t (:bold t :foreground "purple")))) + '(font-lock-doc-string-face ((t (:bold t :foreground "slateblue")))) + '(font-lock-emphasized-face ((t (:bold t :background "lightyellow2")))) + '(font-lock-function-name-face ((t (:bold t :foreground "blue")))) + '(font-lock-keyword-face ((t (:bold t :foreground "violetred")))) + '(font-lock-other-emphasized-face ((t (:italic t :bold t :background "lightyellow2")))) + '(font-lock-other-type-face ((t (:bold t :foreground "orange3")))) + '(font-lock-preprocessor-face ((t (:bold t :foreground "mediumblue")))) + '(font-lock-reference-face ((t (:foreground "red3")))) + '(font-lock-string-face ((t (:foreground "green4")))) + '(font-lock-type-face ((t (:bold t :foreground "steelblue")))) + '(font-lock-variable-name-face ((t (:foreground "magenta4")))) + '(font-lock-warning-face ((t (:bold t :background "yellow" :foreground "Red")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (nil)))) + '(gnus-emphasis-italic ((t (nil)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t)))) + '(gnus-emphasis-underline-italic ((t (:underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen")))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4")))) + '(gnus-group-news-3-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "DeepPink4")))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-header-content-face ((t (:foreground "indianred4")))) + '(gnus-header-from-face ((t (:foreground "red3")))) + '(gnus-header-name-face ((t (:foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:foreground "MidnightBlue")))) + '(gnus-header-subject-face ((t (:foreground "red4")))) + '(gnus-signature-face ((t (:bold t)))) + '(gnus-splash-face ((t (:foreground "ForestGreen")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-low-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-low-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-low-unread-face ((t (nil)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(gnus-x-face ((t (:background "lightgrey" :foreground "black")))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "grey75" :foreground "black")))) + '(gui-element ((t (:background "lightgrey")))) + '(highlight ((t (:background "darkseagreen2")))) + '(info-node ((t (:underline t :bold t :foreground "mediumpurple")))) + '(info-xref ((t (:underline t :bold t :foreground "#0000ee")))) + '(isearch ((t (:background "paleturquoise")))) + '(italic ((t (:italic t)))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:background "gray68" :foreground "black")))) + '(message-cited-text ((t (:foreground "slategrey")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-contents ((t (:italic t)))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:bold t :foreground "blue4")))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-headers ((t (:bold t)))) + '(message-highlighted-header-contents ((t (:bold t)))) + '(message-separator-face ((t (:foreground "brown")))) + '(message-url ((t (:bold t)))) + '(mode-line ((t (:bold t :background "Gray75" :foreground "Black")))) + '(mode-line-buffer-id ((t (:bold t :background "Gray75" :foreground "blue4")))) + '(mode-line-mousable ((t (:bold t :background "Gray75" :foreground "firebrick")))) + '(mode-line-mousable-minor-mode ((t (:bold t :background "Gray75" :foreground "green4")))) + '(paren-blink-off ((t (:foreground "lightgrey")))) + '(paren-match ((t (:background "darkseagreen2")))) + '(paren-mismatch ((t (:background "DeepPink" :foreground "black")))) + '(pointer ((t (:foreground "blue")))) + '(primary-selection ((t (:background "gray65")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "black" :foreground "white")))) + '(right-margin ((t (nil)))) + '(searchm-buffer ((t (:bold t :background "white" :foreground "red")))) + '(searchm-button ((t (:bold t :background "CadetBlue" :foreground "white")))) + '(searchm-field ((t (:background "grey89")))) + '(searchm-field-label ((t (:bold t)))) + '(searchm-highlight ((t (:bold t :background "darkseagreen2" :foreground "black")))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(template-message-face ((t (:bold t)))) + '(text-cursor ((t (:background "blue" :foreground "lightgrey")))) + '(toolbar ((t (nil)))) + '(underline ((t (:underline t)))) + '(vertical-divider ((t (nil)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(x-face ((t (:background "white" :foreground "black")))) + '(x-symbol-adobe-fontspecific-face ((t (nil)))) + '(x-symbol-face ((t (nil)))) + '(x-symbol-heading-face ((t (:underline t :bold t :foreground "green4")))) + '(x-symbol-info-face ((t (:foreground "green4")))) + '(x-symbol-invisible-face ((t (nil)))) + '(x-symbol-revealed-face ((t (:background "pink")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "yellow"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'ramangalahy) + +;;; ramangalahy-theme.el ends here diff --git a/replace-colorthemes/raspopovic-theme.el b/replace-colorthemes/raspopovic-theme.el new file mode 100644 index 0000000..f34331c --- /dev/null +++ b/replace-colorthemes/raspopovic-theme.el @@ -0,0 +1,105 @@ +;;; raspopovic-theme.el --- raspopovic theme + +;; Copyright (C) 2000 by Pedja Raspopovic +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of raspopovic theme from `color-themes' + +;;; Code: + +(deftheme raspopovic + "raspopovic theme") + +(custom-theme-set-faces + 'raspopovic + + '(default ((t (:background "darkblue" :foreground "yellow")))) + '(cursor ((t (:background "Red3")))) + '(border ((t (:foreground "black")))) + + '(setnu-line-number-face ((t (:bold t :background "darkblue" :foreground "yellow")))) + '(goto-address-mail-face ((t (:bold t :background "darkblue" :foreground "yellow")))) + + '(blue ((t (:background "darkblue" :foreground "blue")))) + '(bold ((t (:bold t :background "darkblue" :foreground "yellow")))) + '(bold-italic ((t (:bold t :background "darkblue" :foreground "red3")))) + '(comint-input-face ((t (:foreground "deepskyblue")))) + '(dired-face-boring ((t (:foreground "Gray65")))) + '(dired-face-directory ((t (:foreground "lightgreen")))) + '(dired-face-executable ((t (:foreground "indianred")))) + '(dired-face-flagged ((t (:background "LightSlateGray")))) + '(dired-face-marked ((t (:background "darkblue" :foreground "deepskyblue")))) + '(dired-face-permissions ((t (:background "darkblue" :foreground "white")))) + '(dired-face-setuid ((t (:foreground "Red")))) + '(dired-face-socket ((t (:foreground "magenta")))) + '(dired-face-symlink ((t (:foreground "grey95")))) + '(font-lock-comment-face ((t (:background "darkblue" :foreground "lightgreen")))) + '(font-lock-doc-string-face ((t (:background "darkblue" :foreground "darkseagreen")))) + '(font-lock-function-name-face ((t (:bold t :background "darkblue" :foreground "indianred")))) + '(font-lock-keyword-face ((t (:background "darkblue" :foreground "skyblue")))) + '(font-lock-preprocessor-face ((t (:background "darkblue" :foreground "orange")))) + '(font-lock-reference-face ((t (:background "darkblue" :foreground "deepskyblue")))) + '(font-lock-string-face ((t (:background "darkblue" :foreground "lightgrey")))) + '(font-lock-type-face ((t (:background "darkblue" :foreground "orange")))) + '(font-lock-variable-name-face ((t (:background "darkblue" :foreground "white")))) + '(green ((t (:background "darkblue" :foreground "green")))) + '(gui-button-face ((t (:background "grey75" :foreground "black")))) + '(highlight ((t (:background "yellow" :foreground "darkblue")))) + '(info-node ((t (:bold t :background "darkblue" :foreground "red3")))) + '(info-xref ((t (:bold t :background "darkblue" :foreground "yellow")))) + '(isearch ((t (:background "yellow" :foreground "darkblue")))) + '(isearch-secondary ((t (:foreground "red3")))) + '(italic ((t (:background "darkblue" :foreground "red3")))) + '(left-margin ((t (:background "darkblue" :foreground "yellow")))) + '(list-mode-item-selected ((t (:background "gray68" :foreground "yellow")))) + '(makefile-space-face ((t (:background "hotpink")))) + '(mode-line ((t (:background "Gray75" :foreground "Black")))) + '(mode-line-buffer-id ((t (:background "Gray75" :foreground "blue")))) + '(mode-line-mousable ((t (:background "Gray75" :foreground "red")))) + '(mode-line-mousable-minor-mode ((t (:background "Gray75" :foreground "green4")))) + '(paren-blink-off ((t (:foreground "darkblue")))) + '(paren-match ((t (:background "yellow" :foreground "darkblue")))) + '(paren-mismatch ((t (:background "DeepPink" :foreground "yellow")))) + '(pointer ((t (:background "darkblue" :foreground "red3")))) + '(primary-selection ((t (:background "yellow" :foreground "darkblue")))) + '(red ((t (:background "darkblue" :foreground "red")))) + '(right-margin ((t (:background "darkblue" :foreground "yellow")))) + '(secondary-selection ((t (:background "darkblue" :foreground "yellow")))) + '(shell-option-face ((t (:background "darkblue" :foreground "cyan2")))) + '(shell-output-2-face ((t (:background "darkblue" :foreground "darkseagreen")))) + '(shell-output-3-face ((t (:background "darkblue" :foreground "lightgrey")))) + '(shell-output-face ((t (:background "darkblue" :foreground "white")))) + '(shell-prompt-face ((t (:background "darkblue" :foreground "red")))) + '(text-cursor ((t (:background "Red3" :foreground "white")))) + '(underline ((t (:underline t :background "darkblue" :foreground "yellow")))) + '(vvb-face ((t (:background "pink" :foreground "black")))) + '(yellow ((t (:background "darkblue" :foreground "yellow")))) + '(zmacs-region ((t (:background "gray" :foreground "black"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'raspopovic) + +;;; raspopovic-theme.el ends here diff --git a/replace-colorthemes/renegade-theme.el b/replace-colorthemes/renegade-theme.el new file mode 100644 index 0000000..84a6330 --- /dev/null +++ b/replace-colorthemes/renegade-theme.el @@ -0,0 +1,75 @@ +;;; renegade-theme.el --- renegade theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of renegade theme from `color-themes' + +;;; Code: + +(deftheme renegade + "renegade theme") + +(custom-theme-set-faces + 'renegade + + '(default ((t (:background "black" :foreground "cyan3")))) + '(mouse ((t (:foreground "white")))) + '(cursor ((t (:background "black")))) + '(border ((t (:foreground "black")))) + + '(bold ((t (:bold t :foreground "cyan" :weight bold)))) + '(bold-italic ((t (:italic t :bold t :foreground "cyan" :slant italic :weight bold)))) + '(fixed-pitch ((t (:family "courier")))) + '(font-lock-builtin-face ((t (:bold t :foreground "cornflower blue" :weight bold)))) + '(font-lock-comment-face ((t (:bold t :foreground "yellow" :weight bold)))) + '(font-lock-constant-face ((t (:foreground "magenta3")))) + '(font-lock-doc-face ((t (:bold t :weight bold :foreground "red")))) + '(font-lock-function-name-face ((t (:foreground "gray")))) + '(font-lock-keyword-face ((t (:bold t :foreground "cyan" :weight bold)))) + '(font-lock-string-face ((t (:bold t :foreground "red" :weight bold)))) + '(font-lock-type-face ((t (:bold t :foreground "cyan" :weight bold)))) + '(font-lock-variable-name-face ((t (:foreground "cyan3")))) + '(font-lock-warning-face ((t (:bold t :foreground "red" :weight bold)))) + '(fringe ((t (:background "gray32")))) + '(highlight ((t (:background "blue")))) + '(isearch ((t (:background "blue" :foreground "cyan3")))) + '(isearch-lazy-highlight-face ((t (:background "turquoise3" :foreground "black")))) + '(menu ((t (nil)))) + '(mode-line ((t (:bold t :background "blue3" :foreground "white" :weight bold + :box (:line-width -1 :style released-button))))) + '(mouse ((t (:background "white")))) + '(region ((t (:bold t :background "white" :foreground "blue" :weight bold)))) + '(scroll-bar ((t (nil)))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(variable-pitch ((t (:family "helv"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'renegade) + +;;; renegade-theme.el ends here diff --git a/replace-colorthemes/resolve-theme.el b/replace-colorthemes/resolve-theme.el new file mode 100644 index 0000000..d6aa8d4 --- /dev/null +++ b/replace-colorthemes/resolve-theme.el @@ -0,0 +1,193 @@ +;;; resolve-theme.el --- resolve theme + +;; Copyright (C) 2002 by Damien Elmes +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of resolve theme from `color-themes' + +;;; Code: + +(deftheme resolve + "resolve theme") + +(custom-theme-set-faces + 'resolve + + '(default ((t (:background "#00457f" :foreground "white smoke")))) + '(mouse ((t (:background "white")))) + '(cursor ((t (:background "DarkGoldenrod1")))) + '(border ((t (:background "black")))) + + '(display-time-mail-face ((t (:foreground "white" :background "#001040")))-line) + '(help-highlight-face ((t (:underline t)))) + '(list-matching-lines-face ((t (:bold t :foreground "snow2" :weight bold)))) + '(view-highlight-face ((t (:background "gray91" :foreground "firebrick")))) + '(widget-mouse-face ((t (:background "gray91" :foreground "firebrick")))) + + '(bold ((t (:bold t :foreground "snow2" :weight bold)))) + '(bold-italic ((t (:italic t :bold t :weight bold)))) + '(calendar-today-face ((t (:underline t)))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(cperl-array-face ((t (:bold t :foreground "wheat" :weight bold)))) + '(cperl-hash-face ((t (:bold t :foreground "chartreuse" :weight bold)))) + '(diary-face ((t (:foreground "yellow")))) + '(erc-input-face ((t (:foreground "lightblue2")))) + '(erc-notice-face ((t (:foreground "lightyellow3")))) + + '(font-latex-bold-face ((t (:bold t :foreground "DarkOliveGreen" :weight bold)))) + '(font-latex-italic-face ((t (:italic t :foreground "DarkOliveGreen")))) + '(font-latex-math-face ((t (:foreground "burlywood")))) + '(font-latex-sedate-face ((t (:foreground "LightGray")))) + '(font-latex-string-face ((t (:foreground "RosyBrown")))) + '(font-latex-warning-face ((t (:bold t :foreground "Red" :weight bold)))) + '(font-lock-builtin-face ((t (:foreground "wheat")))) + '(font-lock-comment-face ((t (:foreground "light steel blue")))) + '(font-lock-constant-face ((t (:foreground "seashell3")))) + '(font-lock-doc-face ((t (:foreground "plum")))) + '(font-lock-doc-string-face ((t (:foreground "#008000")))) + '(font-lock-function-name-face ((t (:foreground "thistle1")))) + '(font-lock-keyword-face ((t (:foreground "wheat")))) + '(font-lock-other-emphasized-face ((t (:bold t :foreground "gold1" :weight bold)))) + '(font-lock-other-type-face ((t (:bold t :foreground "gold1" :weight bold)))) + '(font-lock-preprocessor-face ((t (:foreground "#800080")))) + '(font-lock-reference-face ((t (:foreground "wheat")))) + '(font-lock-string-face ((t (:foreground "plum")))) + '(font-lock-type-face ((t (:foreground "lawn green")))) + '(font-lock-variable-name-face ((t (:foreground "light yellow")))) + '(font-lock-warning-face ((t (:foreground "plum")))) + '(fringe ((t (:background "#000000")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "light blue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "light cyan")))) + '(gnus-cite-face-3 ((t (:foreground "light yellow")))) + '(gnus-cite-face-4 ((t (:foreground "light pink")))) + '(gnus-cite-face-5 ((t (:foreground "pale green")))) + '(gnus-cite-face-6 ((t (:foreground "beige")))) + '(gnus-cite-face-7 ((t (:foreground "orange")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t :weight bold)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t :weight bold)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :weight bold)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1" :weight bold)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2" :weight bold)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3" :weight bold)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4" :weight bold)))) + '(gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise" :weight bold)))) + '(gnus-group-news-2-empty-face ((t (:foreground "turquoise")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "turquoise" :weight bold)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t :weight bold)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t :weight bold)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t :weight bold)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t :weight bold)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise" :weight bold)))) + '(gnus-header-content-face ((t (:italic t :foreground "snow2")))) + '(gnus-header-from-face ((t (:foreground "spring green")))) + '(gnus-header-name-face ((t (:bold t :foreground "snow2" :weight bold)))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "yellow")))) + '(gnus-header-subject-face ((t (:bold t :foreground "peach puff" :weight bold)))) + '(gnus-signature-face ((t (:italic t)))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue" :weight bold)))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen" :weight bold)))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "pink" :weight bold)))) + '(gnus-summary-high-unread-face ((t (:bold t :weight bold)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "pink")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "PaleGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "pink")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(header-line ((t (:background "grey20" :foreground "grey90")))) + '(highlight ((t (:background "gray91" :foreground "firebrick")))) + '(highline-face ((t (:background "paleturquoise" :foreground "black")))) + '(holiday-face ((t (:background "chocolate4")))) + '(isearch ((t (:background "palevioletred2" :foreground "brown4")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise4")))) + '(italic ((t (:italic t)))) + '(menu ((t (nil)))) + '(message-cited-text-face ((t (:foreground "seashell3")))) + '(message-header-cc-face ((t (:bold t :foreground "snow2" :weight bold)))) + '(message-header-name-face ((t (:bold t :foreground "snow1" :weight bold)))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4" :weight bold)))) + '(message-header-other-face ((t (:foreground "snow2")))) + '(message-header-subject-face ((t (:bold t :foreground "snow2" :weight bold)))) + '(message-header-to-face ((t (:bold t :foreground "snow2" :weight bold)))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "misty rose")))) + '(mode-line ((t (:foreground "white" :background "#001040" + :box (:line-width -1 :style released-button))))) + '(mode-line-buffer-id ((t (:foreground "white" :background "#001040")))) + '(mode-line-mousable ((t (:foreground "white" :background "#001040")))) + '(mode-line-mousable-minor-mode ((t (:foreground "white" :background "#001040")))) + '(my-tab-face ((t (:background "SlateBlue1")))) + '(p4-diff-del-face ((t (:bold t :foreground "salmon" :weight bold)))) + '(primary-selection ((t (:background "gray91" :foreground "DodgerBlue4")))) + '(region ((t (:background "gray91" :foreground "DodgerBlue4")))) + '(scroll-bar ((t (:background "grey75")))) + '(secondary-selection ((t (:background "gray91" :foreground "sienna3")))) + '(show-paren-match-face ((t (:background "cyan3" :foreground "blue")))) + '(show-paren-mismatch-face ((t (:background "red" :foreground "blue")))) + '(tool-bar ((t (:background "grey75" :foreground "black")))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "steel blue")))) + '(widget-inactive-face ((t (:foreground "grey")))) + '(widget-single-line-field-face ((t (:background "gray85")))) + '(zmacs-region ((t (:background "gray91" :foreground "DodgerBlue4"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'resolve) + +;;; resolve-theme.el ends here diff --git a/replace-colorthemes/retro-green-theme.el b/replace-colorthemes/retro-green-theme.el new file mode 100644 index 0000000..02b3a67 --- /dev/null +++ b/replace-colorthemes/retro-green-theme.el @@ -0,0 +1,60 @@ +;;; retro-green-theme.el --- retro-green theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of retro-green theme from `color-themes' + +;;; Code: + +(deftheme retro-green + "retro-green theme") + +(let ((foreground "green") + (faces '((default ((t (:background "black" :foreground "green")))) + (mouse ((t (:foreground "green")))) + (cursor ((t (:background "green")))) + (border ((t (:foreground "green"))))))) + (dolist (face (face-list)) + (cond ((memq face '(bold bold-italic)) + (add-to-list 'faces `(,face ((t (:bold t)))))) + ((memq face '(italic underline show-paren-mismatch-face)) + (add-to-list 'faces `(,face ((t (:underline t)))))) + ((memq face '(mode-line mode-line-buffer-id mode-line-mousable + mode-line-mousable-minor-mode highlight region + secondary-selection show-paren-match-face)) + (add-to-list 'faces `(,face ((t (:foreground "black" + :background ,foreground + :inverse t)))))) + (t + (add-to-list 'faces `(,face ((t (nil)))))))) + (apply 'custom-theme-set-faces 'retro-green faces)) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'retro-green) + +;;; retro-green-theme.el ends here diff --git a/replace-colorthemes/retro-orange-theme.el b/replace-colorthemes/retro-orange-theme.el new file mode 100644 index 0000000..080d2b3 --- /dev/null +++ b/replace-colorthemes/retro-orange-theme.el @@ -0,0 +1,60 @@ +;;; retro-orange-theme.el --- retro-orange theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of retro-orange theme from `color-themes' + +;;; Code: + +(deftheme retro-orange + "retro-orange theme") + +(let ((foreground "orange") + (faces '((default ((t (:background "black" :foreground "orange")))) + (mouse ((t (:foreground "orange")))) + (cursor ((t (:background "orange")))) + (border ((t (:foreground "orange"))))))) + (dolist (face (face-list)) + (cond ((memq face '(bold bold-italic)) + (add-to-list 'faces `(,face ((t (:bold t)))))) + ((memq face '(italic underline show-paren-mismatch-face)) + (add-to-list 'faces `(,face ((t (:underline t)))))) + ((memq face '(mode-line mode-line-buffer-id mode-line-mousable + mode-line-mousable-minor-mode highlight region + secondary-selection show-paren-match-face)) + (add-to-list 'faces `(,face ((t (:foreground "black" + :background ,foreground + :inverse t)))))) + (t + (add-to-list 'faces `(,face ((t (nil)))))))) + (apply 'custom-theme-set-faces 'retro-orange faces)) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'retro-orange) + +;;; retro-orange-theme.el ends here diff --git a/replace-colorthemes/robin-hood-theme.el b/replace-colorthemes/robin-hood-theme.el new file mode 100644 index 0000000..4d08714 --- /dev/null +++ b/replace-colorthemes/robin-hood-theme.el @@ -0,0 +1,114 @@ +;;; robin-hood-theme.el --- robin-hood theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of robin-hood theme from `color-themes' + +;;; Code: + +(deftheme robin-hood + "robin-hood theme") + +(custom-theme-set-faces + 'robin-hood + + '(default ((t (:background "#304020" :foreground "navajo white")))) + '(mouse ((t (:foreground "Grey")))) + '(cursor ((t (:background "LightGray")))) + '(border ((t (:foreground "black")))) + + '(button ((t (:bold t)))) + '(header-line ((t (:background "#030" :foreground "#AA7")))) + '(ido-subdir-face ((t (:foreground "MediumSlateBlue")))) + '(minibuffer-prompt ((t (:foreground "pale green")))) + '(semantic-dirty-token-face ((t (:background "grey22")))) + '(tool-bar ((t (:background "#304020" :foreground "wheat" :box (:line-width 1 :style released-button))))) + '(tooltip ((t (:background "lemon chiffon" :foreground "black")))) + + '(bbdb-company ((t (:foreground "pale green")))) + '(bbdb-name ((t (:bold t :foreground "pale green")))) + '(bbdb-field-name ((t (:foreground "medium sea green")))) + '(bbdb-field-value ((t (:foreground "dark sea green")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t :foreground "beige")))) + '(calendar-today-face ((t (:underline t :foreground "lemon chiffon")))) + '(comint-highlight-prompt ((t (:foreground "medium aquamarine")))) + '(cperl-array-face ((t (:foreground "Yellow")))) + '(cperl-hash-face ((t (:foreground "White")))) + '(cperl-nonoverridable-face ((t (:foreground "SkyBlue")))) + '(custom-button-face ((t (:bold t :foreground "DodgerBlue1" :underline t)))) + '(custom-documentation-face ((t (:foreground "Grey")))) + '(custom-group-tag-face ((t (:foreground "MediumAquamarine")))) + '(custom-state-face ((t (:foreground "LightSalmon")))) + '(custom-variable-tag-face ((t (:foreground "Aquamarine")))) + '(diary-face ((t (:bold t :foreground "yellow")))) + '(dired-face-directory ((t (:bold t :foreground "sky blue")))) + '(dired-face-permissions ((t (:foreground "aquamarine")))) + '(dired-face-flagged ((t (:foreground "tomato")))) + '(dired-face-marked ((t (:foreground "light salmon")))) + '(dired-face-executable ((t (:foreground "green yellow")))) + '(fringe ((t (:background "#003700")))) + '(highlight ((t (:background "PaleGreen" :foreground "DarkGreen")))) + '(highline-face ((t (:background "SeaGreen")))) + '(holiday-face ((t (:bold t :foreground "peru")))) + '(hyper-apropos-hyperlink ((t (:bold t :foreground "DodgerBlue1")))) + '(hyper-apropos-documentation ((t (:foreground "LightSalmon")))) + '(info-header-xref ((t (:foreground "DodgerBlue1" :bold t)))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:underline t :bold t :foreground "DodgerBlue1")))) + '(info-xref ((t (:bold t :foreground "DodgerBlue1")))) + '(isearch ((t (:foreground "pink" :background "red")))) + '(isearch-lazy-highlight-face ((t (:foreground "red")))) + '(italic ((t (:italic t)))) + '(menu ((t (:background "#304020" :foreground "navajo white")))) + '(mode-line ((t (:background "dark olive green" :foreground "wheat" :box (:line-width 1 :style released-button))))) + '(mode-line-inactive ((t (:background "dark olive green" :foreground "khaki" :box (:line-width 1 :style released-button))))) + '(mode-line-buffer-id ((t (:background "dark olive green" :foreground "beige")))) + '(mode-line-mousable ((t (:background "dark olive green" :foreground "yellow green")))) + '(mode-line-mousable-minor-mode ((t (:background "dark olive green" :foreground "wheat")))) + '(region ((t (:background "dark cyan" :foreground "cyan")))) + '(secondary-selection ((t (:background "Aquamarine" :foreground "SlateBlue")))) + '(show-paren-match-face ((t (:bold t :background "Aquamarine" :foreground "steel blue")))) + '(show-paren-mismatch-face ((t (:background "Red" :foreground "White")))) + '(underline ((t (:underline t)))) + '(widget-field-face ((t (:foreground "LightBlue")))) + '(widget-inactive-face ((t (:foreground "DimGray")))) + '(widget-single-line-field-face ((t (:foreground "LightBlue")))) + '(w3m-anchor-face ((t (:bold t :foreground "DodgerBlue1")))) + '(w3m-arrived-anchor-face ((t (:bold t :foreground "DodgerBlue3")))) + '(w3m-header-line-location-title-face ((t (:foreground "beige" :background "dark olive green")))) + '(w3m-header-line-location-content-face ((t (:foreground "wheat" :background "dark olive green")))) + '(woman-bold-face ((t (:bold t)))) + '(woman-italic-face ((t (:foreground "beige")))) + '(woman-unknown-face ((t (:foreground "LightSalmon")))) + '(zmacs-region ((t (:background "dark cyan" :foreground "cyan")))) ) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'robin-hood) + +;;; robin-hood-theme.el ends here diff --git a/replace-colorthemes/rotor-theme.el b/replace-colorthemes/rotor-theme.el new file mode 100644 index 0000000..a368306 --- /dev/null +++ b/replace-colorthemes/rotor-theme.el @@ -0,0 +1,113 @@ +;;; rotor-theme.el --- rotor theme + +;; Copyright (C) 2000 Jinwei Shen +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of rotor theme from `color-themes' + +;;; Code: + +(deftheme rotor + "rotor theme") + +(custom-theme-set-faces + 'rotor + + '(default ((t (:background "Beige" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "Maroon")))) + '(border ((t (:foreground "black")))) + + '(Man-overstrike-face ((t (:foreground "MediumSlateBlue")))) + '(Man-underline-face ((t (:foreground "ForestGreen")))) + '(list-matching-lines-face ((t (:bold t :background "grey40" :foreground "yellow")))) + '(rmail-highlight-face ((t (:foreground "MediumSlateBlue")))) + '(watson-attribution-face ((t (:italic t :foreground "yellow3")))) + '(watson-url-face ((t (:bold t :background "grey40" :foreground "yellow")))) + '(watson-url-mouse-face ((t (:background "PaleGreen" :foreground "black")))) + + '(bold ((t (:bold t :background "grey40" :foreground "yellow")))) + '(bold-italic ((t (:italic t :bold t :foreground "yellow green")))) + '(custom-button-face ((t (nil)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :foreground "blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "red")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :foreground "blue")))) + '(font-lock-builtin-face ((t (:foreground "Orchid")))) + '(font-lock-comment-face ((t (:foreground "MediumBlue")))) + '(font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(font-lock-function-name-face ((t (:foreground "MediumSlateBlue")))) + '(font-lock-keyword-face ((t (:foreground "#80a0ff")))) + '(font-lock-string-face ((t (:foreground "red")))) + '(font-lock-type-face ((t (:foreground "ForestGreen")))) + '(font-lock-variable-name-face ((t (:foreground "DarkGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(highlight ((t (:background "PaleGreen" :foreground "black")))) + '(italic ((t (:italic t :foreground "yellow3")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4")))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "wheat" :foreground "DarkOliveGreen")))) + '(mode-line-buffer-id ((t (:background "wheat" :foreground "DarkOliveGreen")))) + '(mode-line-mousable ((t (:background "wheat" :foreground "DarkOliveGreen")))) + '(mode-line-mousable-minor-mode ((t (:background "wheat" :foreground "DarkOliveGreen")))) + '(nil ((t (nil)))) + '(region ((t (:background "dark cyan" :foreground "cyan")))) + '(secondary-selection ((t (:background "Turquoise" :foreground "black")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(underline ((t (:underline t)))) + '(viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black")))) + '(viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen")))) + '(viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-search-face ((t (:background "khaki" :foreground "Black")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'rotor) + +;;; rotor-theme.el ends here diff --git a/replace-colorthemes/ryerson-theme.el b/replace-colorthemes/ryerson-theme.el new file mode 100644 index 0000000..03e21e2 --- /dev/null +++ b/replace-colorthemes/ryerson-theme.el @@ -0,0 +1,52 @@ +;;; ryerson-theme.el --- ryerson theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of ryerson theme from `color-themes' + +;;; Code: + +(deftheme ryerson + "ryerson theme") + +(custom-theme-set-faces + 'ryerson + + '(default ((t (:background "midnightblue" :foreground "white")))) + '(cursor ((t (:background "red")))) + + '(mode-line-buffer-id ((t (:foreground "black" :background "slategray3")))) + '(mode-line-mousable ((t (:foreground "black" :background "slategray3")))) + '(mode-line-mousable-minor-mode ((t (:foreground "black" :background "slategray3")))) + '(underline ((t (:underline t)))) + '(region ((t (:foreground "black" :background "slategray3"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'ryerson) + +;;; ryerson-theme.el ends here diff --git a/replace-colorthemes/salmon-diff-theme.el b/replace-colorthemes/salmon-diff-theme.el new file mode 100644 index 0000000..b8d6107 --- /dev/null +++ b/replace-colorthemes/salmon-diff-theme.el @@ -0,0 +1,63 @@ +;;; salmon-diff-theme.el --- salmon-diff theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of salmon-diff theme from `color-themes' + +;;; Code: + +(deftheme salmon-diff + "salmon-diff theme") + +(custom-theme-set-faces + 'salmon-diff + + '(change-log-acknowledgement-face ((t (:foreground "LightBlue")))) + '(change-log-conditionals-face ((t (:bold t :weight bold :foreground "Aquamarine")))) + '(change-log-date-face ((t (:foreground "LightSalmon")))) + '(change-log-email-face ((t (:bold t :weight bold :foreground "Aquamarine")))) + '(change-log-file-face ((t (:bold t :weight bold :foreground "Aquamarine")))) + '(change-log-function-face ((t (:bold t :weight bold :foreground "Aquamarine")))) + '(change-log-list-face ((t (:foreground "Salmon")))) + '(change-log-name-face ((t (:foreground "Aquamarine")))) + '(diff-added-face ((t (nil)))) + '(diff-changed-face ((t (nil)))) + '(diff-context-face ((t (:foreground "grey70")))) + '(diff-file-header-face ((t (:bold t)))) + '(diff-function-face ((t (:foreground "grey70")))) + '(diff-header-face ((t (:foreground "light salmon")))) + '(diff-hunk-header-face ((t (:foreground "light salmon")))) + '(diff-index-face ((t (:bold t)))) + '(diff-nonexistent-face ((t (:bold t)))) + '(diff-removed-face ((t (nil)))) + '(log-view-message-face ((t (:foreground "light salmon"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'salmon-diff) + +;;; salmon-diff-theme.el ends here diff --git a/replace-colorthemes/salmon-font-lock-theme.el b/replace-colorthemes/salmon-font-lock-theme.el new file mode 100644 index 0000000..0a91510 --- /dev/null +++ b/replace-colorthemes/salmon-font-lock-theme.el @@ -0,0 +1,56 @@ +;;; salmon-font-lock-theme.el --- salmon-font-lock theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of salmon-font-lock theme from `color-themes' + +;;; Code: + +(deftheme salmon-font-lock + "salmon-font-lock theme") + +(custom-theme-set-faces + 'salmon-font-lock + + '(font-lock-builtin-face ((t (:bold t :foreground "PaleGreen")))) + '(font-lock-comment-face ((t (:foreground "LightBlue")))) + '(font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(font-lock-doc-string-face ((t (:foreground "LightSalmon")))) + '(font-lock-function-name-face ((t (:bold t :foreground "Aquamarine")))) + '(font-lock-keyword-face ((t (:foreground "Salmon")))) + '(font-lock-preprocessor-face ((t (:foreground "Salmon")))) + '(font-lock-reference-face ((t (:foreground "pale green")))) + '(font-lock-string-face ((t (:foreground "LightSalmon")))) + '(font-lock-type-face ((t (:bold t :foreground "YellowGreen")))) + '(font-lock-variable-name-face ((t (:bold t :foreground "Aquamarine")))) + '(font-lock-warning-face ((t (:bold t :foreground "red"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'salmon-font-lock) + +;;; salmon-font-lock-theme.el ends here diff --git a/replace-colorthemes/scintilla-theme.el b/replace-colorthemes/scintilla-theme.el new file mode 100644 index 0000000..1945506 --- /dev/null +++ b/replace-colorthemes/scintilla-theme.el @@ -0,0 +1,63 @@ +;;; scintilla-theme.el --- scintilla theme + +;; Copyright (C) 2000 by Gordon Messmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of scintilla theme from `color-themes' + +;;; Code: + +(deftheme scintilla + "scintilla theme") + +(custom-theme-set-faces + 'scintilla + + '(default ((t (:background "white" :foreground "black")))) + '(mouse ((t (:foreground "grey15")))) + '(cursor ((t (:background "grey15")))) + + '(font-lock-comment-face ((t (:italic t :foreground "ForestGreen")))) + '(font-lock-string-face ((t (:foreground "DarkMagenta")))) + '(font-lock-keyword-face ((t (:foreground "NavyBlue")))) + '(font-lock-warning-face ((t (:bold t :foreground "VioletRed")))) + '(font-lock-constant-face ((t (:foreground "Blue")))) + '(font-lock-type-face ((t (:foreground "NavyBlue")))) + '(font-lock-variable-name-face ((t (:foreground "DarkCyan")))) + '(font-lock-function-name-face ((t (:foreground "DarkCyan")))) + '(font-lock-builtin-face ((t (:foreground "NavyBlue")))) + '(highline-face ((t (:background "Grey95")))) + '(show-paren-match-face ((t (:background "Grey80")))) + '(region ((t (:background "Grey80")))) + '(highlight ((t (:foreground "ForestGreen")))) + '(secondary-selection ((t (:background "NavyBlue" :foreground "white")))) + '(widget-field-face ((t (:background "NavyBlue")))) + '(widget-single-line-field-face ((t (:background "RoyalBlue"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'scintilla) + +;;; scintilla-theme.el ends here diff --git a/replace-colorthemes/screenshots.md b/replace-colorthemes/screenshots.md new file mode 100644 index 0000000..1fbbcea --- /dev/null +++ b/replace-colorthemes/screenshots.md @@ -0,0 +1,431 @@ +## Ported Themes + +### aalto-dark + +![aalto-dark](images/aalto-dark-theme.png) + +### aalto-light + +![aalto-light](images/aalto-light-theme.png) + +### aliceblue + +![aliceblue](images/aliceblue-theme.png) + +### andreas + +![andreas](images/andreas-theme.png) + +### arjen + +![arjen](images/arjen-theme.png) + +### beige-diff + +![beige-diff](images/beige-diff-theme.png) + +### beige-eshell + +![beige-eshell](images/beige-eshell-theme.png) + +### bharadwaj-slate + +![bharadwaj-slate](images/bharadwaj-slate-theme.png) + +### bharadwaj + +![bharadwaj](images/bharadwaj-theme.png) + +### billw + +![billw](images/billw-theme.png) + +### black-on-gray + +![black-on-gray](images/black-on-gray-theme.png) + +### blippblopp + +![blippblopp](images/blippblopp-theme.png) + +### blue-erc + +![blue-erc](images/blue-erc-theme.png) + +### blue-eshell + +![blue-eshell](images/blue-eshell-theme.png) + +### blue-gnus + +![blue-gnus](images/blue-gnus-theme.png) + +### blue-mood + +![blue-mood](images/blue-mood-theme.png) + +### blue-sea + +![blue-sea](images/blue-sea-theme.png) + +### calm-forest + +![calm-forest](images/calm-forest-theme.png) + +### charcoal-black + +![charcoal-black](images/charcoal-black-theme.png) + +### clarity + +![clarity](images/clarity-theme.png) + +### classic + +![classic](images/classic-theme.png) + +### cobalt + +![cobalt](images/cobalt-theme.png) + +### comidia + +![comidia](images/comidia-theme.png) + +### dark-blue + +![dark-blue](images/dark-blue-theme.png) + +### dark-blue2 + +![dark-blue2](images/dark-blue2-theme.png) + +### dark-erc + +![dark-erc](images/dark-erc-theme.png) + +### dark-font-lock + +![dark-font-lock](images/dark-font-lock-theme.png) + +### dark-gnus + +![dark-gnus](images/dark-gnus-theme.png) + +### dark-green + +![dark-green](images/dark-green-theme.png) + +### dark-info + +![dark-info](images/dark-info-theme.png) + +### dark-laptop + +![dark-laptop](images/dark-laptop-theme.png) + +### deep-blue + +![deep-blue](images/deep-blue-theme.png) + +### desert + +![desert](images/desert-theme.png) + +### digital-ofs1 + +![digital-ofs1](images/digital-ofs1-theme.png) + +### emacs-21 + +![emacs-21](images/emacs-21-theme.png) + +### emacs-nw + +![emacs-nw](images/emacs-nw-theme.png) + +### euphoria + +![euphoria](images/euphoria-theme.png) + +### feng-shui + +![feng-shui](images/feng-shui-theme.png) + +### fischmeister + +![fischmeister](images/fischmeister-theme.png) + +### gnome + +![gnome](images/gnome-theme.png) + +### gnome2 + +![gnome2](images/gnome2-theme.png) + +### goldenrod + +![goldenrod](images/goldenrod-theme.png) + +### gray1 + +![gray1](images/gray1-theme.png) + +### gray30 + +![gray30](images/gray30-theme.png) + +### greiner + +![greiner](images/greiner-theme.png) + +### gtk-ide + +![gtk-ide](images/gtk-ide-theme.png) + +### high-contrast + +![high-contrast](images/high-contrast-theme.png) + +### hober + +![hober](images/hober-theme.png) + +### infodoc + +![infodoc](images/infodoc-theme.png) + +### jb-simple + +![jb-simple](images/jb-simple-theme.png) + +### jedit-grey + +![jedit-grey](images/jedit-grey-theme.png) + +### jonadabian-slate + +![jonadabian-slate](images/jonadabian-slate-theme.png) + +### jonadabian + +![jonadabian](images/jonadabian-theme.png) + +### jsc-dark + +![jsc-dark](images/jsc-dark-theme.png) + +### jsc-light + +![jsc-light](images/jsc-light-theme.png) + +### jsc-light2 + +![jsc-light2](images/jsc-light2-theme.png) + +### katester + +![katester](images/katester-theme.png) + +### kingsajz + +![kingsajz](images/kingsajz-theme.png) + +### late-night + +![late-night](images/late-night-theme.png) + +### lawrence + +![lawrence](images/lawrence-theme.png) + +### ld-dark + +![ld-dark](images/ld-dark-theme.png) + +### lethe + +![lethe](images/lethe-theme.png) + +### marine + +![marine](images/marine-theme.png) + +### marquardt + +![marquardt](images/marquardt-theme.png) + +### matrix + +![matrix](images/matrix-theme.png) + +### midnight + +![midnight](images/midnight-theme.png) + +### mistyday + +![mistyday](images/mistyday-theme.png) + +### montz + +![montz](images/montz-theme.png) + +### oswald + +![oswald](images/oswald-theme.png) + +### parus + +![parus](images/parus-theme.png) + +### pierson + +![pierson](images/pierson-theme.png) + +### pok-wob + +![pok-wob](images/pok-wob-theme.png) + +### pok-wog + +![pok-wog](images/pok-wog-theme.png) + +### ramangalahy + +![ramangalahy](images/ramangalahy-theme.png) + +### raspopovic + +![raspopovic](images/raspopovic-theme.png) + +### renegade + +![renegade](images/renegade-theme.png) + +### resolve + +![resolve](images/resolve-theme.png) + +### retro-green + +![retro-green](images/retro-green-theme.png) + +### retro-orange + +![retro-orange](images/retro-orange-theme.png) + +### robin-hood + +![robin-hood](images/robin-hood-theme.png) + +### rotor + +![rotor](images/rotor-theme.png) + +### ryerson + +![ryerson](images/ryerson-theme.png) + +### salmon-diff + +![salmon-diff](images/salmon-diff-theme.png) + +### salmon-font-lock + +![salmon-font-lock](images/salmon-font-lock-theme.png) + +### scintilla + +![scintilla](images/scintilla-theme.png) + +### shaman + +![shaman](images/shaman-theme.png) + +### simple-1 + +![simple-1](images/simple-1-theme.png) + +### sitaramv-nt + +![sitaramv-nt](images/sitaramv-nt-theme.png) + +### sitaramv-solaris + +![sitaramv-solaris](images/sitaramv-solaris-theme.png) + +### snow + +![snow](images/snow-theme.png) + +### snowish + +![snowish](images/snowish-theme.png) + +### standard-ediff + +![standard-ediff](images/standard-ediff-theme.png) + +### standard + +![standard](images/standard-theme.png) + +### subtle-blue + +![subtle-blue](images/subtle-blue-theme.png) + +### subtle-hacker + +![subtle-hacker](images/subtle-hacker-theme.png) + +### taming-mr-arneson + +![taming-mr-arneson](images/taming-mr-arneson-theme.png) + +### taylor + +![taylor](images/taylor-theme.png) + +### tty-dark + +![tty-dark](images/tty-dark-theme.png) + +### vim-colors + +![vim-colors](images/vim-colors-theme.png) + +### whateveryouwant + +![whateveryouwant](images/whateveryouwant-theme.png) + +### wheat + +![wheat](images/wheat-theme.png) + +### word-perfect + +![word-perfect](images/word-perfect-theme.png) + +### xemacs + +![xemacs](images/xemacs-theme.png) + +### xp + +![xp](images/xp-theme.png) + +## 3rd Party Theme + +### julie + +![julie](images/julie-theme.png) + +### subdued + +![subdued](images/subdued-theme.png) + +### railscast + +![railscast](images/railscast-theme.png) diff --git a/replace-colorthemes/shaman-theme.el b/replace-colorthemes/shaman-theme.el new file mode 100644 index 0000000..ef96fb3 --- /dev/null +++ b/replace-colorthemes/shaman-theme.el @@ -0,0 +1,115 @@ +;;; shaman-theme.el --- shaman theme + +;; Copyright (C) 2002 by shaman +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of shaman theme from `color-themes' + +;;; Code: + +(deftheme shaman + "shaman theme") + +(custom-theme-set-faces + 'shaman + + '(default ((t (:background "#456345" :foreground "White")))) + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t :size "12")))) + '(bold-italic ((t (:italic t :bold t)))) + '(border-glyph ((t (nil)))) + '(buffers-tab ((t (:background "Gray80" :foreground "black")))) + '(buffers-tab-face ((t (:background "Gray80" :foreground "black")))) + '(font-lock-builtin-face ((t (:foreground "cadetblue2")))) + '(font-lock-comment-face ((t (:foreground "gray80")))) + '(font-lock-constant-face ((t (:foreground "steelblue1")))) + '(font-lock-doc-face ((t (:foreground "light coral")))) + '(font-lock-doc-string-face ((t (:foreground "light coral")))) + '(font-lock-function-name-face ((t (:foreground "aquamarine")))) + '(font-lock-keyword-face ((t (:foreground "cyan")))) + '(font-lock-preprocessor-face ((t (:foreground "steelblue1")))) + '(font-lock-reference-face ((t (:foreground "cadetblue2")))) + '(font-lock-string-face ((t (:foreground "tan")))) + '(font-lock-type-face ((t (:foreground "wheat")))) + '(font-lock-variable-name-face ((t (:foreground "cyan3")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink")))) + '(fringe ((t (nil)))) + '(gnus-x-face ((t (:background "white" :foreground "black")))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "grey75" :foreground "black")))) + '(gui-element ((t (:background "Gray80" :foreground "black")))) + '(highlight ((t (:background "darkseagreen2")))) + '(isearch ((t (:background "paleturquoise")))) + '(isearch-secondary ((t (:foreground "red3")))) + '(italic ((t (:italic t)))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:background "gray68")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:bold t :foreground "green4")))) + '(message-header-name-face ((t (:foreground "DarkGreen")))) + '(message-header-newsgroups-face ((t (:bold t :foreground "yellow")))) + '(message-header-other-face ((t (:foreground "#b00000")))) + '(message-header-subject-face ((t (:foreground "green3")))) + '(message-header-to-face ((t (:bold t :foreground "green2")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "blue3")))) + '(mode-line ((t (:background "Gray80" :foreground "black")))) + '(mode-line ((t (:background "Gray80" :foreground "black")))) + '(mode-line-buffer-id ((t (:background "Gray80" :foreground "blue4")))) + '(mode-line-mousable ((t (:background "Gray80" :foreground "firebrick")))) + '(mode-line-mousable-minor-mode ((t (:background "Gray80" :foreground "green4")))) + '(pointer ((t (:foreground "White")))) + '(primary-selection ((t (:background "gray65")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "gray65")))) + '(right-margin ((t (nil)))) + '(rpm-spec-dir-face ((t (:foreground "green")))) + '(rpm-spec-doc-face ((t (:foreground "magenta")))) + '(rpm-spec-ghost-face ((t (:foreground "red")))) + '(rpm-spec-macro-face ((t (:foreground "yellow")))) + '(rpm-spec-package-face ((t (:foreground "red")))) + '(rpm-spec-tag-face ((t (:foreground "blue")))) + '(rpm-spec-var-face ((t (:foreground "maroon")))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(text-cursor ((t (:background "Pink" :foreground "Black")))) + '(tool-bar ((t (nil)))) + '(toolbar ((t (:background "Gray80" :foreground "black")))) + '(underline ((t (:underline t)))) + '(vertical-divider ((t (:background "Gray80" :foreground "black")))) + '(widget ((t (:background "Gray80" :foreground "black")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-field-face ((t (:background "dim gray")))) + '(widget-inactive-face ((t (:foreground "light gray")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "gray65"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'shaman) + +;;; shaman-theme.el ends here diff --git a/replace-colorthemes/simple-1-theme.el b/replace-colorthemes/simple-1-theme.el new file mode 100644 index 0000000..326f1c7 --- /dev/null +++ b/replace-colorthemes/simple-1-theme.el @@ -0,0 +1,55 @@ +;;; simple-1-theme.el --- simple-1 theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of simple-1 theme from `color-themes' + +;;; Code: + +(deftheme simple-1 + "simple-1 theme") + +(custom-theme-set-faces + 'simple-1 + + '(default ((t (:background "black" :foreground "white")))) + '(mouse ((t (:foreground "white")))) + '(cursor ((t (:background "indian red")))) + '(border ((t (:foreground "white")))) + + '(mode-line ((t (:foreground "black" :background "white")))) + '(mode-line-buffer-id ((t (:foreground "black" :background "white")))) + '(mode-line-mousable ((t (:foreground "black" :background "white")))) + '(mode-line-mousable-minor-mode ((t (:foreground "black" :background "white")))) + '(underline ((t (:underline t)))) + '(region ((t (:background "grey"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'simple-1) + +;;; simple-1-theme.el ends here diff --git a/replace-colorthemes/sitaramv-nt-theme.el b/replace-colorthemes/sitaramv-nt-theme.el new file mode 100644 index 0000000..d3d2a15 --- /dev/null +++ b/replace-colorthemes/sitaramv-nt-theme.el @@ -0,0 +1,99 @@ +;;; sitaramv-nt-theme.el --- sitaramv-nt theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of sitaramv-nt theme from `color-themes' + +;;; Code: + +(deftheme sitaramv-nt + "sitaramv-nt theme") + +(custom-theme-set-faces + 'sitaramv-nt + + '(default ((t (:background "white" :foreground "black")))) + '(mouse ((t (:foreground "sienna3")))) + '(cursor ((t (:background "HotPink")))) + '(border ((t (:foreground "Blue")))) + + '(mode-line ((t (:foreground "black" :background "gold2")))) + '(mode-line-buffer-id ((t (:foreground "black" :background "gold2")))) + '(mode-line-mousable ((t (:foreground "black" :background "gold2")))) + '(mode-line-mousable-minor-mode ((t (:foreground "black" :background "gold2")))) + '(highlight ((t (:foreground "black" :background "darkseagreen2")))) + '(bold ((t (:bold t)))) + '(italic ((t (:italic t)))) + '(bold-italic ((t (:bold t :italic t)))) + '(region ((t (:foreground "black" :background "snow3")))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(underline ((t (:underline t)))) + '(lazy-highlight-face ((t (:foreground "dark magenta" :bold t)))) + '(font-lock-comment-face ((t (:foreground "ForestGreen" :italic t)))) + '(font-lock-string-face ((t (:foreground "red")))) + '(font-lock-keyword-face ((t (:foreground "blue" :bold t)))) + '(font-lock-builtin-face ((t (:foreground "black")))) + '(font-lock-function-name-face ((t (:foreground "dark magenta" :bold t)))) + '(font-lock-variable-name-face ((t (:foreground "black")))) + '(font-lock-type-face ((t (:foreground "blue")))) + '(font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(font-lock-warning-face ((t (:foreground "Red" :bold t)))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-button-face ((t (:bold t)))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-single-line-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(custom-invalid-face ((t (:foreground "yellow" :background "red")))) + '(custom-rogue-face ((t (:foreground "pink" :background "black")))) + '(custom-modified-face ((t (:foreground "white" :background "blue")))) + '(custom-set-face ((t (:foreground "blue" :background "white")))) + '(custom-changed-face ((t (:foreground "white" :background "blue")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-button-face ((t (nil)))) + '(custom-documentation-face ((t (nil)))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-tag-face ((t (:foreground "blue" :underline t)))) + '(custom-variable-button-face ((t (:bold t :underline t)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face-1 ((t (:foreground "red" :underline t)))) + '(custom-group-tag-face ((t (:foreground "blue" :underline t)))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-highlight-face ((t (:background "green")))) + '(ff-paths-non-existant-file-face ((t (:foreground "NavyBlue" :bold t)))) + '(show-paren-match-face ((t (:background "light blue")))) + '(show-paren-mismatch-face ((t (:foreground "white" :background "purple"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'sitaramv-nt) + +;;; sitaramv-nt-theme.el ends here diff --git a/replace-colorthemes/sitaramv-solaris-theme.el b/replace-colorthemes/sitaramv-solaris-theme.el new file mode 100644 index 0000000..e5a96f4 --- /dev/null +++ b/replace-colorthemes/sitaramv-solaris-theme.el @@ -0,0 +1,210 @@ +;;; sitaramv-solaris-theme.el --- sitaramv-solaris theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of sitaramv-solaris theme from `color-themes' + +;;; Code: + +(deftheme sitaramv-solaris + "sitaramv-solaris theme") + +(custom-theme-set-faces + 'sitaramv-solaris + + '(default ((t (:background "MidnightBlue" :foreground "white")))) + '(mouse ((t (:foreground "yellow")))) + '(cursor ((t (:background "magenta2")))) + '(border ((t (:foreground "black")))) + + '(mode-line ((t (:foreground "black" :background "gold2")))) + '(mode-line-buffer-id ((t (:foreground "black" :background "gold2")))) + '(mode-line-mousable ((t (:foreground "black" :background "gold2")))) + '(mode-line-mousable-minor-mode ((t (:foreground "black" :background "gold2")))) + '(highlight ((t (:foreground "black" :background "Aquamarine")))) + '(bold ((t (:bold t)))) + '(italic ((t (:italic t)))) + '(bold-italic ((t (:bold t :italic t)))) + '(region ((t (:foreground "black" :background "snow3")))) + '(secondary-selection ((t (:foreground "black" :background "aquamarine")))) + '(underline ((t (:underline t)))) + '(lazy-highlight-face ((t (:foreground "yellow")))) + '(font-lock-comment-face ((t (:foreground "orange" :italic t)))) + '(font-lock-string-face ((t (:foreground "orange")))) + '(font-lock-keyword-face ((t (:foreground "green")))) + '(font-lock-builtin-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-function-name-face ((t (:foreground "cyan" :bold t)))) + '(font-lock-variable-name-face ((t (:foreground "white")))) + '(font-lock-type-face ((t (:foreground "cyan")))) + '(font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(font-lock-warning-face ((t (:foreground "Pink" :bold t)))) + '(widget-documentation-face ((t (:foreground "lime green")))) + '(widget-button-face ((t (:bold t)))) + '(widget-field-face ((t (:background "dim gray")))) + '(widget-single-line-field-face ((t (:background "dim gray")))) + '(widget-inactive-face ((t (:foreground "light gray")))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(custom-invalid-face ((t (:foreground "yellow" :background "red")))) + '(custom-rogue-face ((t (:foreground "pink" :background "black")))) + '(custom-modified-face ((t (:foreground "white" :background "blue")))) + '(custom-set-face ((t (:foreground "blue" :background "white")))) + '(custom-changed-face ((t (:foreground "white" :background "blue")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-button-face ((t (nil)))) + '(custom-documentation-face ((t (nil)))) + '(custom-state-face ((t (:foreground "lime green")))) + '(custom-variable-tag-face ((t (:foreground "light blue" :underline t)))) + '(custom-variable-button-face ((t (:bold t :underline t)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face-1 ((t (:foreground "pink" :underline t)))) + '(custom-group-tag-face ((t (:foreground "light blue" :underline t)))) + '(speedbar-button-face ((t (:foreground "green3")))) + '(speedbar-file-face ((t (:foreground "cyan")))) + '(speedbar-directory-face ((t (:foreground "light blue")))) + '(speedbar-tag-face ((t (:foreground "yellow")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-highlight-face ((t (:background "sea green")))) + '(font-lock-doc-string-face ((t (:foreground "Plum1" :bold t)))) + '(font-lock-exit-face ((t (:foreground "green")))) + '(ff-paths-non-existant-file-face ((t (:foreground "NavyBlue" :bold t)))) + '(show-paren-match-face ((t (:background "red")))) + '(show-paren-mismatch-face ((t (:foreground "white" :background "purple")))) + '(message-header-to-face ((t (:foreground "green2" :bold t)))) + '(message-header-cc-face ((t (:foreground "LightGoldenrod" :bold t)))) + '(message-header-subject-face ((t (:foreground "green3")))) + '(message-header-newsgroups-face ((t (:foreground "yellow" :bold t :italic t)))) + '(message-header-other-face ((t (:foreground "Salmon")))) + '(message-header-name-face ((t (:foreground "green3")))) + '(message-header-xheader-face ((t (:foreground "GreenYellow")))) + '(message-separator-face ((t (:foreground "Tan")))) + '(message-cited-text-face ((t (:foreground "Gold")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:foreground "PaleTurquoise" :bold t)))) + '(gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise")))) + '(gnus-group-news-2-face ((t (:foreground "turquoise" :bold t)))) + '(gnus-group-news-2-empty-face ((t (:foreground "turquoise")))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-low-face ((t (:foreground "DarkTurquoise" :bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise")))) + '(gnus-group-mail-1-face ((t (:foreground "aquamarine1" :bold t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1")))) + '(gnus-group-mail-2-face ((t (:foreground "aquamarine2" :bold t)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2")))) + '(gnus-group-mail-3-face ((t (:foreground "aquamarine3" :bold t)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3")))) + '(gnus-group-mail-low-face ((t (:foreground "aquamarine4" :bold t)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4")))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(gnus-summary-cancelled-face ((t (:foreground "yellow" :background "black")))) + '(gnus-summary-high-ticked-face ((t (:foreground "pink" :bold t)))) + '(gnus-summary-low-ticked-face ((t (:foreground "pink" :italic t)))) + '(gnus-summary-normal-ticked-face ((t (:foreground "pink")))) + '(gnus-summary-high-ancient-face ((t (:foreground "SkyBlue" :bold t)))) + '(gnus-summary-low-ancient-face ((t (:foreground "SkyBlue" :italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-high-read-face ((t (:foreground "PaleGreen" :bold t)))) + '(gnus-summary-low-read-face ((t (:foreground "PaleGreen" :italic t)))) + '(gnus-summary-normal-read-face ((t (:foreground "PaleGreen")))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(eshell-ls-directory-face ((t (:foreground "SkyBlue" :bold t)))) + '(eshell-ls-symlink-face ((t (:foreground "Cyan" :bold t)))) + '(eshell-ls-executable-face ((t (:foreground "Green" :bold t)))) + '(eshell-ls-readonly-face ((t (:foreground "Pink")))) + '(eshell-ls-unreadable-face ((t (:foreground "DarkGrey")))) + '(eshell-ls-special-face ((t (:foreground "Magenta" :bold t)))) + '(eshell-ls-missing-face ((t (:foreground "Red" :bold t)))) + '(eshell-ls-archive-face ((t (:foreground "Orchid" :bold t)))) + '(eshell-ls-backup-face ((t (:foreground "LightSalmon")))) + '(eshell-ls-product-face ((t (:foreground "LightSalmon")))) + '(eshell-ls-clutter-face ((t (:foreground "OrangeRed" :bold t)))) + '(eshell-prompt-face ((t (:foreground "Pink" :bold t)))) + '(term-default-fg ((t (nil)))) + '(term-default-bg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-bold ((t (:bold t)))) + '(term-underline ((t (:underline t)))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-black ((t (:foreground "black")))) + '(term-red ((t (:foreground "red")))) + '(term-green ((t (:foreground "green")))) + '(term-yellow ((t (:foreground "yellow")))) + '(term-blue ((t (:foreground "blue")))) + '(term-magenta ((t (:foreground "magenta")))) + '(term-cyan ((t (:foreground "cyan")))) + '(term-white ((t (:foreground "white")))) + '(term-blackbg ((t (:background "black")))) + '(term-redbg ((t (:background "red")))) + '(term-greenbg ((t (:background "green")))) + '(term-yellowbg ((t (:background "yellow")))) + '(term-bluebg ((t (:background "blue")))) + '(term-magentabg ((t (:background "magenta")))) + '(term-cyanbg ((t (:background "cyan")))) + '(term-whitebg ((t (:background "white")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t)))) + '(gnus-emphasis-bold-italic ((t (:bold t :italic t)))) + '(gnus-emphasis-underline-bold-italic ((t (:bold t :italic t :underline t)))) + '(gnus-emphasis-highlight-words ((t (:foreground "yellow" :background "black")))) + '(gnus-signature-face ((t (:italic t)))) + '(gnus-header-from-face ((t (:foreground "spring green")))) + '(gnus-header-subject-face ((t (:foreground "yellow" :bold t)))) + '(gnus-header-newsgroups-face ((t (:foreground "SeaGreen3" :bold t :italic t)))) + '(gnus-header-name-face ((t (:foreground "pink")))) + '(gnus-header-content-face ((t (:foreground "lime green" :italic t)))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "light blue")))) + '(gnus-cite-face-2 ((t (:foreground "light cyan")))) + '(gnus-cite-face-3 ((t (:foreground "light yellow")))) + '(gnus-cite-face-4 ((t (:foreground "light pink")))) + '(gnus-cite-face-5 ((t (:foreground "pale green")))) + '(gnus-cite-face-6 ((t (:foreground "beige")))) + '(gnus-cite-face-7 ((t (:foreground "orange")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'sitaramv-solaris) + +;;; sitaramv-solaris-theme.el ends here diff --git a/replace-colorthemes/snow-theme.el b/replace-colorthemes/snow-theme.el new file mode 100644 index 0000000..8448978 --- /dev/null +++ b/replace-colorthemes/snow-theme.el @@ -0,0 +1,139 @@ +;;; snow-theme.el --- snow theme + +;; Copyright (C) 2001 by Nicolas Rist +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of snow theme from `color-themes' + +;;; Code: + +(deftheme snow + "snow theme") + +(custom-theme-set-faces + 'snow + + '(default ((t (:background "snow2" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "RoyalBlue2")))) + '(border ((t (:foreground "black")))) + + '(gnus-mouse-face ((t (:background "LightSteelBlue1")))) + '(list-matching-lines-face ((t (:bold t)))) + '(view-highlight-face ((t (:background "LightSteelBlue1")))) + + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(calendar-today-face ((t (:underline t)))) + '(custom-button-face ((t (:background "gainsboro" :foreground "dark cyan")))) + '(custom-documentation-face ((t (:background "gainsboro")))) + '(diary-face ((t (:foreground "red")))) + '(fg:black ((t (:foreground "black")))) + '(font-lock-builtin-face ((t (:background "gainsboro" :foreground "medium orchid")))) + '(font-lock-comment-face ((t (:background "gainsboro" :foreground "SteelBlue3")))) + '(font-lock-constant-face ((t (:background "gainsboro" :foreground "orange3")))) + '(font-lock-function-name-face ((t (:background "gainsboro" :foreground "blue3")))) + '(font-lock-keyword-face ((t (:background "gainsboro" :foreground "red3")))) + '(font-lock-string-face ((t (:background "gainsboro" :foreground "SpringGreen3")))) + '(font-lock-type-face ((t (:background "gainsboro" :foreground "dark cyan")))) + '(font-lock-variable-name-face ((t (:background "gainsboro" :foreground "purple2")))) + '(font-lock-warning-face ((t (:bold t :background "gainsboro" :foreground "red")))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen")))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-splash-face ((t (:foreground "ForestGreen")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(gui-button-face ((t (:foreground "light grey")))) + '(highlight ((t (:background "LightSteelBlue1")))) + '(holiday-face ((t (:background "pink")))) + '(ibuffer-marked-face ((t (:foreground "red")))) + '(italic ((t (:italic t)))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4")))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "dark slate gray" :foreground "gainsboro")))) + '(mode-line-buffer-id ((t (:background "dark slate gray" :foreground "gainsboro")))) + '(mode-line-mousable ((t (:background "dark slate gray" :foreground "gainsboro")))) + '(mode-line-mousable-minor-mode ((t (:background "dark slate gray" :foreground "gainsboro")))) + '(region ((t (:background "lavender")))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(sgml-comment-face ((t (:foreground "dark green")))) + '(sgml-doctype-face ((t (:foreground "maroon")))) + '(sgml-end-tag-face ((t (:foreground "blue2")))) + '(sgml-entity-face ((t (:foreground "red2")))) + '(sgml-ignored-face ((t (:background "gray90" :foreground "maroon")))) + '(sgml-ms-end-face ((t (:foreground "maroon")))) + '(sgml-ms-start-face ((t (:foreground "maroon")))) + '(sgml-pi-face ((t (:foreground "maroon")))) + '(sgml-sgml-face ((t (:foreground "maroon")))) + '(sgml-short-ref-face ((t (:foreground "goldenrod")))) + '(sgml-start-tag-face ((t (:foreground "blue2")))) + '(show-paren-match-face ((t (:background "SlateGray1")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "dark turquoise" :foreground "white")))) + '(speedbar-selected-face ((t (:underline t :foreground "red")))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(underline ((t (:underline t))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'snow) + +;;; snow-theme.el ends here diff --git a/replace-colorthemes/snowish-theme.el b/replace-colorthemes/snowish-theme.el new file mode 100644 index 0000000..5e0c1b0 --- /dev/null +++ b/replace-colorthemes/snowish-theme.el @@ -0,0 +1,267 @@ +;;; snowish-theme.el --- snowish theme + +;; Copyright (C) 2001 by Girish Bharadwaj +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of snowish theme from `color-themes' + +;;; Code: + +(deftheme snowish + "snowish theme") + +(custom-theme-set-faces + 'snowish + + '(default ((t (:background "snow2" :foreground "darkslategray")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "Red3")))) + '(border ((t (:foreground "black")))) + + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t :foreground "peru")))) + '(bold-italic ((t (:italic t :bold t)))) + '(border-glyph ((t (nil)))) + '(buffers-tab ((t (:background "snow2" :foreground "darkslategray")))) + '(custom-button-face ((t (:bold t)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "gray85")))) + '(custom-comment-tag-face ((t (:foreground "blue4")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :foreground "blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "red")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :foreground "blue")))) + '(cyan ((t (:foreground "cyan")))) + '(display-time-mail-balloon-enhance-face ((t (:background "orange")))) + '(display-time-mail-balloon-gnus-group-face ((t (:foreground "blue")))) + '(display-time-time-balloon-face ((t (:foreground "red")))) + '(eshell-ls-archive-face ((t (:bold t :foreground "Orchid")))) + '(eshell-ls-backup-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "Blue")))) + '(eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen")))) + '(eshell-ls-missing-face ((t (:bold t :foreground "Red")))) + '(eshell-ls-product-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-readonly-face ((t (:foreground "Brown")))) + '(eshell-ls-special-face ((t (:bold t :foreground "Magenta")))) + '(eshell-ls-symlink-face ((t (:bold t :foreground "Dark Cyan")))) + '(eshell-ls-unreadable-face ((t (:foreground "Grey30")))) + '(eshell-prompt-face ((t (:bold t :foreground "Red")))) + '(font-lock-builtin-face ((t (:underline t :foreground "blue")))) + '(font-lock-comment-face ((t (:foreground "snow4")))) + '(font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(font-lock-doc-string-face ((t (:foreground "mediumblue")))) + '(font-lock-function-name-face ((t (:bold t :foreground "darkblue")))) + '(font-lock-keyword-face ((t (:bold t :foreground "dodgerblue")))) + '(font-lock-preprocessor-face ((t (:underline t :foreground "blue3")))) + '(font-lock-reference-face ((t (:foreground "red3")))) + '(font-lock-string-face ((t (:foreground "darkviolet")))) + '(font-lock-type-face ((t (:foreground "goldenrod")))) + '(font-lock-variable-name-face ((t (:foreground "tomato")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(gnus-cite-attribution-face ((t (nil)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (nil)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (nil)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t)))) + '(gnus-emphasis-underline-italic ((t (:underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "ForestGreen")))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-header-content-face ((t (:foreground "indianred4")))) + '(gnus-header-from-face ((t (:foreground "red3")))) + '(gnus-header-name-face ((t (:foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:foreground "MidnightBlue")))) + '(gnus-header-subject-face ((t (:foreground "red4")))) + '(gnus-picons-face ((t (:background "white" :foreground "black")))) + '(gnus-picons-xbm-face ((t (:background "white" :foreground "black")))) + '(gnus-signature-face ((t (nil)))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick")))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-low-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-low-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-low-unread-face ((t (nil)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(gnus-x-face ((t (:background "white" :foreground "black")))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "grey75" :foreground "black")))) + '(gui-element ((t (:background "#D4D0C8" :foreground "black")))) + '(highlight ((t (:background "darkseagreen2")))) + '(html-helper-bold-face ((t (:bold t)))) + '(html-helper-bold-italic-face ((t (nil)))) + '(html-helper-builtin-face ((t (:underline t :foreground "blue3")))) + '(html-helper-italic-face ((t (:foreground "medium sea green")))) + '(html-helper-underline-face ((t (:underline t)))) + '(html-tag-face ((t (:bold t)))) + '(hyper-apropos-documentation ((t (:foreground "darkred")))) + '(hyper-apropos-heading ((t (:bold t)))) + '(hyper-apropos-hyperlink ((t (:foreground "blue4")))) + '(hyper-apropos-major-heading ((t (:bold t)))) + '(hyper-apropos-section-heading ((t (nil)))) + '(hyper-apropos-warning ((t (:bold t :foreground "red")))) + '(info-menu-6 ((t (nil)))) + '(isearch ((t (:background "paleturquoise")))) + '(isearch-secondary ((t (:foreground "red3")))) + '(italic ((t (nil)))) + '(jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan")))) + '(jde-bug-breakpoint-marker ((t (:background "yellow" :foreground "red")))) + '(jde-java-font-lock-link-face ((t (:underline t :foreground "blue")))) + '(jde-java-font-lock-number-face ((t (:foreground "RosyBrown")))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:background "gray68" :foreground "darkslategray")))) + '(magenta ((t (:foreground "magenta")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:foreground "blue4")))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue")))) + '(message-header-to-face ((t (:bold t :foreground "MidnightBlue")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (nil)))) + '(mode-line-buffer-id ((t (:background "#D4D0C8" :foreground "blue4")))) + '(mode-line-mousable ((t (:background "#D4D0C8" :foreground "firebrick")))) + '(mode-line-mousable-minor-mode ((t (:background "#D4D0C8" :foreground "green4")))) + '(paren-blink-off ((t (:foreground "snow2")))) + '(paren-match ((t (:background "darkseagreen2")))) + '(paren-mismatch ((t (:background "snow2" :foreground "darkslategray")))) + '(pointer ((t (nil)))) + '(primary-selection ((t (:background "gray65")))) + '(red ((t (:foreground "red")))) + '(right-margin ((t (nil)))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(semantic-intangible-face ((t (:foreground "gray25")))) + '(semantic-read-only-face ((t (:background "gray25")))) + '(senator-momentary-highlight-face ((t (:background "gray70")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:underline t :foreground "red")))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(template-message-face ((t (:bold t)))) + '(term-blue-bold-face ((t (:bold t :background "snow2" :foreground "blue")))) + '(term-blue-face ((t (:foreground "blue")))) + '(term-blue-inv-face ((t (:background "blue")))) + '(term-blue-ul-face ((t (:underline t :background "snow2" :foreground "blue")))) + '(term-cyan-bold-face ((t (:bold t :background "snow2" :foreground "cyan")))) + '(term-cyan-face ((t (:foreground "cyan")))) + '(term-cyan-inv-face ((t (:background "cyan")))) + '(term-cyan-ul-face ((t (:underline t :background "snow2" :foreground "cyan")))) + '(term-default-bold-face ((t (:bold t :background "snow2" :foreground "darkslategray")))) + '(term-default-face ((t (:background "snow2" :foreground "darkslategray")))) + '(term-default-inv-face ((t (:background "darkslategray" :foreground "snow2")))) + '(term-default-ul-face ((t (:underline t :background "snow2" :foreground "darkslategray")))) + '(term-green-bold-face ((t (:bold t :background "snow2" :foreground "green")))) + '(term-green-face ((t (:foreground "green")))) + '(term-green-inv-face ((t (:background "green")))) + '(term-green-ul-face ((t (:underline t :background "snow2" :foreground "green")))) + '(term-magenta-bold-face ((t (:bold t :background "snow2" :foreground "magenta")))) + '(term-magenta-face ((t (:foreground "magenta")))) + '(term-magenta-inv-face ((t (:background "magenta")))) + '(term-magenta-ul-face ((t (:underline t :background "snow2" :foreground "magenta")))) + '(term-red-bold-face ((t (:bold t :background "snow2" :foreground "red")))) + '(term-red-face ((t (:foreground "red")))) + '(term-red-inv-face ((t (:background "red")))) + '(term-red-ul-face ((t (:underline t :background "snow2" :foreground "red")))) + '(term-white-bold-face ((t (:bold t :background "snow2" :foreground "white")))) + '(term-white-face ((t (:foreground "white")))) + '(term-white-inv-face ((t (:background "snow2")))) + '(term-white-ul-face ((t (:underline t :background "snow2" :foreground "white")))) + '(term-yellow-bold-face ((t (:bold t :background "snow2" :foreground "yellow")))) + '(term-yellow-face ((t (:foreground "yellow")))) + '(term-yellow-inv-face ((t (:background "yellow")))) + '(term-yellow-ul-face ((t (:underline t :background "snow2" :foreground "yellow")))) + '(text-cursor ((t (:background "Red3" :foreground "snow2")))) + '(toolbar ((t (nil)))) + '(underline ((t (:underline t)))) + '(vertical-divider ((t (nil)))) + '(white ((t (:foreground "white")))) + '(widget ((t (nil)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "gray65"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'snowish) + +;;; snowish-theme.el ends here diff --git a/replace-colorthemes/standard-ediff-theme.el b/replace-colorthemes/standard-ediff-theme.el new file mode 100644 index 0000000..0bed478 --- /dev/null +++ b/replace-colorthemes/standard-ediff-theme.el @@ -0,0 +1,60 @@ +;;; standard-ediff-theme.el --- standard-ediff theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of standard-ediff theme from `color-themes' + +;;; Code: + +(deftheme standard-ediff + "standard-ediff theme") + +(custom-theme-set-faces + 'standard-ediff + + '(ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick")))) + '(ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black")))) + '(ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid")))) + '(ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy")))) + '(ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black")))) + '(ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-B ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black")))) + '(ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy")))) + '(ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black")))) + '(ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black")))) + '(ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black")))) + '(ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White")))) + '(ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'standard-ediff) + +;;; standard-ediff-theme.el ends here diff --git a/replace-colorthemes/standard-theme.el b/replace-colorthemes/standard-theme.el new file mode 100644 index 0000000..0294092 --- /dev/null +++ b/replace-colorthemes/standard-theme.el @@ -0,0 +1,273 @@ + +;;; standard-theme.el --- standard theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of standard theme from `color-themes' + +;;; Code: + +(deftheme standard + "standard theme") + +(custom-theme-set-faces + 'standard + + '(default ((t (:background "white" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:foreground "black")))) + + '(Man-overstrike-face ((t (:bold t)))) + '(Man-underline-face ((t (:underline t)))) + '(apropos-keybinding-face ((t (:underline t)))) + '(apropos-label-face ((t (:italic t)))) + '(apropos-match-face ((t (:background "paleturquoise")))) + '(apropos-property-face ((t (:bold t :italic t)))) + '(apropos-symbol-face ((t (:bold t)))) + '(goto-address-mail-face ((t (:italic t)))) + '(goto-address-mail-mouse-face ((t (:background "paleturquoise")))) + '(goto-address-url-face ((t (:bold t)))) + '(goto-address-url-mouse-face ((t (:background "darkseagreen2")))) + '(help-highlight-face ((t (:underline t)))) + '(list-matching-lines-face ((t (:bold t)))) + '(view-highlight-face ((t (:background "darkseagreen2")))) + + '(bold ((t (:bold t)))) + '(bold-italic ((t (:bold t :italic t)))) + '(calendar-today-face ((t (:underline t)))) + '(cperl-array-face ((t (:foreground "Blue" :background "lightyellow2" :bold t)))) + '(cperl-hash-face ((t (:foreground "Red" :background "lightyellow2" :bold t :italic t)))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(custom-button-face ((t (nil)))) + '(custom-changed-face ((t (:foreground "white" :background "blue")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:foreground "blue" :underline t)))) + '(custom-group-tag-face-1 ((t (:foreground "red" :underline t)))) + '(custom-invalid-face ((t (:foreground "yellow" :background "red")))) + '(custom-modified-face ((t (:foreground "white" :background "blue")))) + '(custom-rogue-face ((t (:foreground "pink" :background "black")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:foreground "blue" :background "white")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:bold t :underline t)))) + '(custom-variable-tag-face ((t (:foreground "blue" :underline t)))) + '(diary-face ((t (:foreground "red")))) + '(ediff-current-diff-face-A ((t (:foreground "firebrick" :background "pale green")))) + '(ediff-current-diff-face-Ancestor ((t (:foreground "Black" :background "VioletRed")))) + '(ediff-current-diff-face-B ((t (:foreground "DarkOrchid" :background "Yellow")))) + '(ediff-current-diff-face-C ((t (:foreground "Navy" :background "Pink")))) + '(ediff-even-diff-face-A ((t (:foreground "Black" :background "light grey")))) + '(ediff-even-diff-face-Ancestor ((t (:foreground "White" :background "Grey")))) + '(ediff-even-diff-face-B ((t (:foreground "White" :background "Grey")))) + '(ediff-even-diff-face-C ((t (:foreground "Black" :background "light grey")))) + '(ediff-fine-diff-face-A ((t (:foreground "Navy" :background "sky blue")))) + '(ediff-fine-diff-face-Ancestor ((t (:foreground "Black" :background "Green")))) + '(ediff-fine-diff-face-B ((t (:foreground "Black" :background "cyan")))) + '(ediff-fine-diff-face-C ((t (:foreground "Black" :background "Turquoise")))) + '(ediff-odd-diff-face-A ((t (:foreground "White" :background "Grey")))) + '(ediff-odd-diff-face-Ancestor ((t (:foreground "Black" :background "light grey")))) + '(ediff-odd-diff-face-B ((t (:foreground "Black" :background "light grey")))) + '(ediff-odd-diff-face-C ((t (:foreground "White" :background "Grey")))) + '(eshell-ls-archive-face ((t (:foreground "Orchid" :bold t)))) + '(eshell-ls-backup-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-clutter-face ((t (:foreground "OrangeRed" :bold t)))) + '(eshell-ls-directory-face ((t (:foreground "Blue" :bold t)))) + '(eshell-ls-executable-face ((t (:foreground "ForestGreen" :bold t)))) + '(eshell-ls-missing-face ((t (:foreground "Red" :bold t)))) + '(eshell-ls-product-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-readonly-face ((t (:foreground "Brown")))) + '(eshell-ls-special-face ((t (:foreground "Magenta" :bold t)))) + '(eshell-ls-symlink-face ((t (:foreground "DarkCyan" :bold t)))) + '(eshell-ls-unreadable-face ((t (:foreground "Grey30")))) + '(eshell-prompt-face ((t (:foreground "Red" :bold t)))) + '(eshell-test-failed-face ((t (:foreground "OrangeRed" :bold t)))) + '(eshell-test-ok-face ((t (:foreground "Green" :bold t)))) + '(excerpt ((t (:italic t)))) + '(fixed ((t (:bold t)))) + '(flyspell-duplicate-face ((t (:foreground "Gold3" :bold t :underline t)))) + '(flyspell-incorrect-face ((t (:foreground "OrangeRed" :bold t :underline t)))) + '(font-lock-builtin-face ((t (:foreground "Orchid")))) + '(font-lock-comment-face ((t (:foreground "Firebrick")))) + '(font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(font-lock-function-name-face ((t (:foreground "Blue")))) + '(font-lock-keyword-face ((t (:foreground "Purple")))) + '(font-lock-string-face ((t (:foreground "RosyBrown")))) + '(font-lock-type-face ((t (:foreground "ForestGreen")))) + '(font-lock-variable-name-face ((t (:foreground "DarkGoldenrod")))) + '(font-lock-warning-face ((t (:foreground "Red" :bold t)))) + '(fringe ((t (:background "grey95")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:bold t :italic t)))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t)))) + '(gnus-emphasis-underline-bold-italic ((t (:bold t :italic t :underline t)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:foreground "DeepPink3" :bold t)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:foreground "HotPink3" :bold t)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:foreground "magenta4" :bold t)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:foreground "DeepPink4" :bold t)))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:foreground "ForestGreen" :bold t)))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:foreground "CadetBlue4" :bold t)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:foreground "DarkGreen" :bold t)))) + '(gnus-header-content-face ((t (:foreground "indianred4" :italic t)))) + '(gnus-header-from-face ((t (:foreground "red3")))) + '(gnus-header-name-face ((t (:foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:foreground "MidnightBlue" :italic t)))) + '(gnus-header-subject-face ((t (:foreground "red4")))) + '(gnus-signature-face ((t (:italic t)))) + '(gnus-splash-face ((t (:foreground "ForestGreen")))) + '(gnus-summary-cancelled-face ((t (:foreground "yellow" :background "black")))) + '(gnus-summary-high-ancient-face ((t (:foreground "RoyalBlue" :bold t)))) + '(gnus-summary-high-read-face ((t (:foreground "DarkGreen" :bold t)))) + '(gnus-summary-high-ticked-face ((t (:foreground "firebrick" :bold t)))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:foreground "RoyalBlue" :italic t)))) + '(gnus-summary-low-read-face ((t (:foreground "DarkGreen" :italic t)))) + '(gnus-summary-low-ticked-face ((t (:foreground "firebrick" :italic t)))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(highlight ((t (:background "darkseagreen2")))) + '(highlight-changes-delete-face ((t (:foreground "red" :underline t)))) + '(highlight-changes-face ((t (:foreground "red")))) + '(highline-face ((t (:background "paleturquoise")))) + '(holiday-face ((t (:background "pink")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:bold t :italic t)))) + '(info-xref ((t (:bold t)))) + '(italic ((t (:italic t)))) + '(makefile-space-face ((t (:background "hotpink")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:foreground "blue4" :bold t :italic t)))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:foreground "navy blue" :bold t)))) + '(message-header-to-face ((t (:foreground "MidnightBlue" :bold t)))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:foreground "white" :background "black")))) + '(mode-line-buffer-id ((t (:foreground "white" :background "black")))) + '(mode-line-mousable ((t (:foreground "white" :background "black")))) + '(mode-line-mousable-minor-mode ((t (:foreground "white" :background "black")))) + '(region ((t (:background "gray")))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:foreground "white" :background "purple")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(term-black ((t (:foreground "black")))) + '(term-blackbg ((t (:background "black")))) + '(term-blue ((t (:foreground "blue")))) + '(term-bluebg ((t (:background "blue")))) + '(term-bold ((t (:bold t)))) + '(term-cyan ((t (:foreground "cyan")))) + '(term-cyanbg ((t (:background "cyan")))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-green ((t (:foreground "green")))) + '(term-greenbg ((t (:background "green")))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (:foreground "magenta")))) + '(term-magentabg ((t (:background "magenta")))) + '(term-red ((t (:foreground "red")))) + '(term-redbg ((t (:background "red")))) + '(term-underline ((t (:underline t)))) + '(term-white ((t (:foreground "white")))) + '(term-whitebg ((t (:background "white")))) + '(term-yellow ((t (:foreground "yellow")))) + '(term-yellowbg ((t (:background "yellow")))) + '(underline ((t (:underline t)))) + '(vcursor ((t (:foreground "blue" :background "cyan" :underline t)))) + '(vhdl-font-lock-attribute-face ((t (:foreground "Orchid")))) + '(vhdl-font-lock-directive-face ((t (:foreground "CadetBlue")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4")))) + '(vhdl-font-lock-function-face ((t (:foreground "Orchid4")))) + '(vhdl-font-lock-prompt-face ((t (:foreground "Red" :bold t)))) + '(vhdl-font-lock-reserved-words-face ((t (:foreground "Orange" :bold t)))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-speedbar-architecture-face ((t (:foreground "Blue")))) + '(vhdl-speedbar-architecture-selected-face ((t (:foreground "Blue" :underline t)))) + '(vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod")))) + '(vhdl-speedbar-configuration-selected-face ((t (:foreground "DarkGoldenrod" :underline t)))) + '(vhdl-speedbar-entity-face ((t (:foreground "ForestGreen")))) + '(vhdl-speedbar-entity-selected-face ((t (:foreground "ForestGreen" :underline t)))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "Brown")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:foreground "Brown" :underline t)))) + '(vhdl-speedbar-package-face ((t (:foreground "Grey50")))) + '(vhdl-speedbar-package-selected-face ((t (:foreground "Grey50" :underline t)))) + '(viper-minibuffer-emacs-face ((t (:foreground "Black" :background "darkseagreen2")))) + '(viper-minibuffer-insert-face ((t (:foreground "Black" :background "pink")))) + '(viper-minibuffer-vi-face ((t (:foreground "DarkGreen" :background "grey")))) + '(viper-replace-overlay-face ((t (:foreground "Black" :background "darkseagreen2")))) + '(viper-search-face ((t (:foreground "Black" :background "khaki")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'standard) + +;;; standard-theme.el ends here diff --git a/replace-colorthemes/subdued-theme.el b/replace-colorthemes/subdued-theme.el new file mode 100644 index 0000000..0be4bd3 --- /dev/null +++ b/replace-colorthemes/subdued-theme.el @@ -0,0 +1,110 @@ +;;; subdued-theme.el --- subdued theme + +;; Copyright (C) 2009-2010 Jason R. Blevins +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of subdued theme from http://jblevins.org/projects/emacs-color-themes/ + +;;; Code: + +(deftheme subdued + "subdued theme") + +(custom-theme-set-faces + 'subdued + + '(default ((t (:background "#000" :foreground "#d3d7cf")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "#73d216")))) + '(border ((t (:foreground "#73d216")))) + + '(font-lock-comment-face ((t (:foreground "#61635e")))) ; dark aluminum + '(font-lock-comment-delimiter-face ((t (:foreground "#61635e")))) ; dark aluminum + '(font-lock-doc-face ((t (:foreground "#77507b")))) ; plum + '(font-lock-doc-string-face ((t (:foreground "#77507b")))) ; plum + '(font-lock-string-face ((t (:foreground "#77507b")))) ; plum + '(font-lock-keyword-face ((t (:foreground "#729fcf")))) ; light sky blue + '(font-lock-builtin-face ((t (:foreground "#855c1b")))) ; med-dark chocolate + '(font-lock-function-name-face ((t (:foreground "#c4a000")))) ; dark butter + '(font-lock-variable-name-face ((t (nil)))) + '(font-lock-preprocessor-face ((t (:foreground "#888a85")))) ; aluminum + '(font-lock-constant-face ((t (:foreground "#4e9a06")))) ; dark chameleon + '(font-lock-type-face ((t (:foreground "#ad7fa8")))) ; light plum + '(font-lock-warning-face ((t (:bold t :foreground "#cc0000")))) ; scarlet red + + ;; Search + '(isearch ((t (:foreground "#080808" :background "#edd400")))) + '(isearch-lazy-highlight-face ((t (:foreground "#080808" :background "#2e3436")))) + + ;; Emacs Interface + '(fringe ((t (:background "#0f0f0f")))) + '(border ((t (:background "#0f0f0f")))) + '(mode-line ((t (:background "#1f1f1f" :foreground "#eeeeec")))) + '(mode-line-buffer-id ((t (:background "#1f1f1f" :foreground "#eeeeec")))) + '(mode-line-inactive ((t (:background "#1f1f1f" :foreground "#888a85")))) + '(minibuffer-prompt ((t (:foreground "#729fcf")))) ; light sky blue + '(region ((t (:background "#2e3436")))) + + ;; Parenthesis matching + '(show-paren-match-face ((t (:foreground "#2e3436" :background "#73d216")))) + '(show-paren-mismatch-face ((t (:foreground "#2e3436" :background "#ef2929")))) + + ;; Line highlighting + '(highlight ((t (:background "#1f1f1f" :foreground nil)))) + '(highlight-current-line-face ((t (:background "#1f1f1f" :foreground nil)))) + + ;; Calendar + '(holiday-face ((t (:foreground "#cc0000")))) ; dark scarlet red + + ;; Info + '(info-xref ((t (:foreground "#729fcf")))) ; light sky blue + '(info-xref-visited ((t (:foreground "#ad7fa8")))) ; light plum + +;;; AUCTeX + '(font-latex-sectioning-5-face ((t (:foreground "#c4a000" :bold t)))) ; dark butter + '(font-latex-bold-face ((t (:foreground "#4e9a06" :bold t)))) ; dark chameleon + '(font-latex-italic-face ((t (:foreground "#4e9a06" :italic t)))) ; dark chameleon + '(font-latex-math-face ((t (:foreground "#855c1b")))) ; med-dark chocolate + '(font-latex-string-face ((t (:foreground "#77507b")))) ; plum + '(font-latex-warning-face ((t (:foreground "#cc0000")))) ; dark scarlet red + '(font-latex-slide-title-face ((t (:foreground "#c4a000")))) ; dark butter + +;;; post-mode + '(post-emoticon-face ((t (:background "#edd400" :foreground "#000000")))) ; medium butter + '(post-header-value-face ((t (:foreground "#4e9a06")))) ; dark chameleon + '(post-header-keyword-face ((t (:foreground "#4e9a06" :bold t)))) ; dark chameleon + '(post-signature-text-face ((t (:foreground "#cc0000")))) ; dark scarlet red + '(post-quoted-text-face ((t (:foreground "#855c1b" :slant normal)))) ; med-dark chocolate + '(post-double-quoted-text-face ((t (:foreground "#77507b" :slant normal)))) ; plum + '(post-multiply-quoted-text-face ((t (:foreground "#61635e" :slant normal)))) ; dark aluminum + '(post-email-address-text-face ((t (:foreground "#729fcf" :bold t)))) ; light sky blue + '(post-url-face ((t (:foreground "#729fcf" :bold t)))) ; light sky blue + ) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'subdued) + +;;; subdued-theme.el ends here diff --git a/replace-colorthemes/subtle-blue-theme.el b/replace-colorthemes/subtle-blue-theme.el new file mode 100644 index 0000000..fc2d3c8 --- /dev/null +++ b/replace-colorthemes/subtle-blue-theme.el @@ -0,0 +1,437 @@ +;;; subtle-blue-theme.el --- subtle-blue theme + +;; Copyright (C) 2001 by Chris McMahan +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of subtle-blue theme from `color-themes' + +;;; Code: + +(deftheme subtle-blue + "subtle-blue theme") + +(custom-theme-set-faces + 'subtle-blue + + '(default ((t (:background "#65889C" :foreground "#eedfcc")))) + '(mouse ((t (:background "Grey")))) + '(cursor ((t (:background "white")))) + '(border ((t (:background "black")))) + + '(bbdb-company ((t (:italic t)))) + '(bbdb-field-name ((t (:bold t :foreground "MediumAquamarine")))) + '(bbdb-field-value ((t (nil)))) + '(bbdb-name ((t (:underline t)))) + '(blank-space-face ((t (:background "gray80")))) + '(blank-tab-face ((t (:background "LightBlue" :foreground "DarkSlateGray")))) + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t :foreground "MediumAquamarine")))) + '(bold-italic ((t (:italic t :bold t :foreground "SkyBlue")))) + '(border-glyph ((t (nil)))) + '(calendar-today-face ((t (:underline t)))) + '(comint-highlight-input ((t (:bold t)))) + '(comint-highlight-prompt ((t (:foreground "cyan")))) + '(comint-input-face ((t (:foreground "deepskyblue")))) + '(cperl-array-face ((t (:bold t :foreground "Yellow")))) + '(cperl-hash-face ((t (:italic t :bold t :foreground "White")))) + '(cperl-nonoverridable-face ((t (:foreground "SkyBlue")))) + '(custom-button-face ((t (:underline t :bold t :foreground "MediumAquaMarine")))) + '(custom-button-pressed-face ((t (:background "lightgrey" :foreground "black")))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "dim gray")))) + '(custom-comment-tag-face ((t (:foreground "gray80")))) + '(custom-documentation-face ((t (:foreground "Grey")))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:bold t :foreground "MediumAquamarine")))) + '(custom-group-tag-face-1 ((t (:foreground "MediumAquaMarine")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "yellow")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:bold t :foreground "Aquamarine")))) + '(cvs-filename-face ((t (:foreground "blue4")))) + '(cvs-handled-face ((t (:foreground "pink")))) + '(cvs-header-face ((t (:bold t :foreground "blue4")))) + '(cvs-marked-face ((t (:bold t :foreground "green3")))) + '(cvs-msg-face ((t (:italic t)))) + '(cvs-need-action-face ((t (:foreground "orange")))) + '(cvs-unknown-face ((t (:foreground "red")))) + '(diary-face ((t (:bold t :foreground "cyan")))) + '(dired-face-boring ((t (:foreground "Gray65")))) + '(dired-face-directory ((t (:bold t :foreground "sky blue")))) + '(dired-face-executable ((t (:foreground "MediumAquaMarine")))) + '(dired-face-flagged ((t (:foreground "Cyan")))) + '(dired-face-marked ((t (:foreground "cyan")))) + '(dired-face-permissions ((t (:foreground "aquamarine")))) + '(dired-face-setuid ((t (:foreground "LightSalmon")))) + '(dired-face-socket ((t (:foreground "LightBlue")))) + '(dired-face-symlink ((t (:foreground "gray95")))) + '(display-time-mail-balloon-enhance-face ((t (:background "orange")))) + '(display-time-mail-balloon-gnus-group-face ((t (:foreground "blue")))) + '(display-time-time-balloon-face ((t (:foreground "red")))) + '(ecb-sources-face ((t (:foreground "LightBlue1")))) + '(ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick")))) + '(ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black")))) + '(ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid")))) + '(ediff-current-diff-face-C ((t (:background "indianred" :foreground "white")))) + '(ediff-even-diff-face-A ((t (:background "light gray" :foreground "Black")))) + '(ediff-even-diff-face-Ancestor ((t (:background "Gray" :foreground "White")))) + '(ediff-even-diff-face-B ((t (:background "Gray" :foreground "White")))) + '(ediff-even-diff-face-C ((t (:background "light gray" :foreground "Black")))) + '(ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy")))) + '(ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black")))) + '(ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black")))) + '(ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black")))) + '(ediff-odd-diff-face-A ((t (:background "Gray" :foreground "White")))) + '(ediff-odd-diff-face-Ancestor ((t (:background "light gray" :foreground "Black")))) + '(ediff-odd-diff-face-B ((t (:background "light gray" :foreground "Black")))) + '(ediff-odd-diff-face-C ((t (:background "Gray" :foreground "White")))) + '(erc-action-face ((t (:bold t)))) + '(erc-bold-face ((t (:bold t)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "LightSalmon")))) + '(erc-error-face ((t (:bold t :foreground "yellow")))) + '(erc-input-face ((t (:foreground "Beige")))) + '(erc-inverse-face ((t (:background "wheat" :foreground "darkslategrey")))) + '(erc-notice-face ((t (:foreground "MediumAquamarine")))) + '(erc-pal-face ((t (:foreground "PaleGreen")))) + '(erc-prompt-face ((t (:foreground "MediumAquamarine")))) + '(erc-underline-face ((t (:underline t)))) + '(eshell-ls-archive-face ((t (:bold t :foreground "wheat")))) + '(eshell-ls-backup-face ((t (:foreground "Grey")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "wheat")))) + '(eshell-ls-directory-face ((t (:bold t :foreground "Yellow")))) + '(eshell-ls-executable-face ((t (:bold t :foreground "wheat")))) + '(eshell-ls-missing-face ((t (:bold t :foreground "wheat")))) + '(eshell-ls-picture-face ((t (:foreground "wheat")))) + '(eshell-ls-product-face ((t (:foreground "wheat")))) + '(eshell-ls-readonly-face ((t (:foreground "wheat")))) + '(eshell-ls-special-face ((t (:bold t :foreground "wheat")))) + '(eshell-ls-symlink-face ((t (:bold t :foreground "White")))) + '(eshell-ls-text-face ((t (:foreground "wheat")))) + '(eshell-ls-todo-face ((t (:foreground "wheat")))) + '(eshell-ls-unreadable-face ((t (:foreground "wheat3")))) + '(eshell-prompt-face ((t (:bold t :foreground "PaleGreen")))) + '(eshell-test-failed-face ((t (:bold t :foreground "OrangeRed")))) + '(eshell-test-ok-face ((t (:bold t :foreground "Green")))) + '(excerpt ((t (:italic t)))) + '(ff-paths-non-existant-file-face ((t (:bold t :foreground "NavyBlue")))) + '(flyspell-duplicate-face ((t (:underline t :bold t :foreground "Gold3")))) + '(flyspell-incorrect-face ((t (:underline t :bold t :foreground "OrangeRed")))) + '(font-latex-italic-face ((t (nil)))) + '(font-latex-math-face ((t (nil)))) + '(font-latex-sedate-face ((t (:foreground "Gray85")))) + '(font-latex-string-face ((t (:foreground "orange")))) + '(font-latex-warning-face ((t (:foreground "gold")))) + '(font-lock-builtin-face ((t (:foreground "PaleGreen")))) + '(font-lock-comment-face ((t (:italic t :foreground "Wheat3")))) + '(font-lock-constant-face ((t (:foreground "LightBlue")))) + '(font-lock-doc-face ((t (:bold t :foreground "DarkSeaGreen")))) + '(font-lock-doc-string-face ((t (:bold t :foreground "DarkSeaGreen")))) + '(font-lock-exit-face ((t (:foreground "green")))) + '(font-lock-function-name-face ((t (:italic t :bold t :foreground "cyan")))) + '(font-lock-keyword-face ((t (:bold t :foreground "LightBlue")))) + '(font-lock-preprocessor-face ((t (:foreground "blue3")))) + '(font-lock-reference-face ((t (:foreground "PaleGreen")))) + '(font-lock-string-face ((t (:italic t :foreground "MediumAquamarine")))) + '(font-lock-type-face ((t (:bold t :foreground "LightBlue")))) + '(font-lock-variable-name-face ((t (:italic t :bold t :foreground "LightBlue")))) + '(font-lock-warning-face ((t (:bold t :foreground "LightSalmon")))) + '(fringe ((t (:background "darkslategrey")))) + '(gnus-cite-attribution-face ((t (:italic t :bold t)))) + '(gnus-cite-face-1 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-11 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-2 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-3 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-4 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-5 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-6 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-7 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-8 ((t (:foreground "LightBlue")))) + '(gnus-cite-face-9 ((t (:foreground "LightBlue")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:underline t :bold t)))) + '(gnus-emphasis-underline-bold-italic ((t (:underline t :italic t :bold t)))) + '(gnus-emphasis-underline-italic ((t (:underline t :italic t)))) + '(gnus-filterhist-face-1 ((t (nil)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "gray80")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "light cyan")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "gray80")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "turquoise")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "gray80")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "gray80")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-group-news-1-empty-face ((t (:foreground "gray80")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "green yellow")))) + '(gnus-group-news-2-empty-face ((t (:foreground "gray80")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "Aquamarine")))) + '(gnus-group-news-3-empty-face ((t (:foreground "gray80")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-group-news-4-empty-face ((t (:foreground "gray80")))) + '(gnus-group-news-4-face ((t (:bold t :foreground "Wheat")))) + '(gnus-group-news-5-empty-face ((t (:foreground "gray80")))) + '(gnus-group-news-5-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-group-news-6-empty-face ((t (:foreground "gray80")))) + '(gnus-group-news-6-face ((t (:bold t :foreground "MediumAquamarine")))) + '(gnus-group-news-low-empty-face ((t (:foreground "gray80")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "yellow green")))) + '(gnus-header-content-face ((t (:italic t :foreground "LightSkyBlue3")))) + '(gnus-header-from-face ((t (:bold t :foreground "light cyan")))) + '(gnus-header-name-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3")))) + '(gnus-header-subject-face ((t (:bold t :foreground "light cyan")))) + '(gnus-picons-face ((t (:background "white" :foreground "black")))) + '(gnus-picons-xbm-face ((t (:background "white" :foreground "black")))) + '(gnus-signature-face ((t (:italic t :foreground "LightBlue")))) + '(gnus-splash ((t (:foreground "Brown")))) + '(gnus-splash-face ((t (:foreground "LightBlue")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "gray80")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "LightBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "gray80")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "burlywood")))) + '(gnus-summary-high-unread-face ((t (:italic t :bold t :foreground "wheat")))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "LightBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "light sea green")))) + '(gnus-summary-low-ticked-face ((t (:italic t :bold t :foreground "LightBlue")))) + '(gnus-summary-low-unread-face ((t (:italic t :foreground "light sea green")))) + '(gnus-summary-normal-ancient-face ((t (:foreground "gray80")))) + '(gnus-summary-normal-read-face ((t (:foreground "gray80")))) + '(gnus-summary-normal-ticked-face ((t (:bold t :foreground "sandy brown")))) + '(gnus-summary-normal-unread-face ((t (:bold t :foreground "wheat")))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(gnus-x-face ((t (:background "white" :foreground "black")))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "cyan" :foreground "#65889C")))) + '(gui-element ((t (:background "Gray")))) + '(header-line ((t (:background "grey20" :foreground "grey90")))) + '(highlight ((t (:background "PaleGreen" :foreground "DarkGreen")))) + '(highlight-changes-delete-face ((t (:underline t :foreground "red")))) + '(highlight-changes-face ((t (:foreground "red")))) + '(highline-face ((t (:background "SeaGreen")))) + '(holiday-face ((t (:background "DimGray")))) + '(html-helper-bold-face ((t (:foreground "DarkRed")))) + '(html-helper-italic-face ((t (:foreground "DarkBlue")))) + '(html-helper-underline-face ((t (:underline t :foreground "Black")))) + '(html-tag-face ((t (:foreground "Blue")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:underline t :italic t :bold t :foreground "light blue")))) + '(info-xref ((t (:bold t :foreground "light blue")))) + '(isearch ((t (:background "Aquamarine" :foreground "SteelBlue")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise4")))) + '(isearch-secondary ((t (:foreground "red3")))) + '(italic ((t (:italic t)))) + '(jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan")))) + '(jde-bug-breakpoint-marker ((t (:background "yellow" :foreground "red")))) + '(jde-java-font-lock-api-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-bold-face ((t (:bold t)))) + '(jde-java-font-lock-code-face ((t (nil)))) + '(jde-java-font-lock-constant-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-doc-tag-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-italic-face ((t (:italic t)))) + '(jde-java-font-lock-link-face ((t (:underline t :foreground "LightBlue")))) + '(jde-java-font-lock-modifier-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-number-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-package-face ((t (:foreground "LightBlue")))) + '(jde-java-font-lock-pre-face ((t (nil)))) + '(jde-java-font-lock-underline-face ((t (:underline t)))) + '(lazy-highlight-face ((t (:bold t :foreground "dark magenta")))) + '(left-margin ((t (nil)))) + '(linemenu-face ((t (:background "gray30")))) + '(list-mode-item-selected ((t (nil)))) + '(makefile-space-face ((t (:background "hotpink")))) + '(menu ((t (:background "wheat" :foreground "gray30")))) + '(message-cited-text-face ((t (:foreground "White")))) + '(message-header-cc-face ((t (:bold t :foreground "light cyan")))) + '(message-header-name-face ((t (:foreground "LightBlue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3")))) + '(message-header-other-face ((t (:foreground "LightSkyBlue3")))) + '(message-header-subject-face ((t (:bold t :foreground "light cyan")))) + '(message-header-to-face ((t (:bold t :foreground "light cyan")))) + '(message-header-xheader-face ((t (:foreground "LightBlue")))) + '(message-mml-face ((t (:bold t :foreground "LightBlue")))) + '(message-separator-face ((t (:foreground "LightBlue")))) + '(mmm-default-submode-face ((t (:background "#c0c0c5")))) + '(mode-line ((t (:background "#4f657d" :foreground "gray80")))) + '(mode-line-buffer-id ((t (:background "#4f657d" :foreground "gray80")))) + '(mode-line-mousable ((t (:background "#4f657d" :foreground "gray80")))) + '(mode-line-mousable-minor-mode ((t (:background "#4f657d" :foreground "gray80")))) + '(my-summary-highlight-face ((t (:foreground "White")))) + '(my-url-face ((t (:foreground "PaleTurquoise")))) + '(nil ((t (nil)))) + '(paren-blink-off ((t (:foreground "gray")))) + '(paren-face-match ((t (:background "turquoise")))) + '(paren-face-mismatch ((t (:background "purple" :foreground "white")))) + '(paren-face-no-match ((t (:background "yellow" :foreground "black")))) + '(paren-match ((t (:background "darkseagreen2")))) + '(paren-mismatch ((t (:background "DeepPink" :foreground "black")))) + '(paren-mismatch-face ((t (:bold t)))) + '(paren-no-match-face ((t (:bold t)))) + '(pointer ((t (nil)))) + '(primary-selection ((t (:background "gray65")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "CadetBlue" :foreground "gray80")))) + '(right-margin ((t (nil)))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "LightBlue" :foreground "#4f657d")))) + '(semantic-dirty-token-face ((t (:background "gray10")))) + '(semantic-intangible-face ((t (:foreground "gray25")))) + '(semantic-read-only-face ((t (:background "gray25")))) + '(senator-intangible-face ((t (:foreground "gray75")))) + '(senator-momentary-highlight-face ((t (:background "gray80")))) + '(senator-read-only-face ((t (:background "#664444")))) + '(sgml-comment-face ((t (:foreground "dark turquoise")))) + '(sgml-doctype-face ((t (:foreground "red")))) + '(sgml-end-tag-face ((t (:foreground "blue")))) + '(sgml-entity-face ((t (:foreground "magenta")))) + '(sgml-ignored-face ((t (:background "gray60" :foreground "gray40")))) + '(sgml-ms-end-face ((t (:foreground "green")))) + '(sgml-ms-start-face ((t (:foreground "yellow")))) + '(sgml-pi-face ((t (:foreground "lime green")))) + '(sgml-sgml-face ((t (:foreground "brown")))) + '(sgml-short-ref-face ((t (:foreground "deep sky blue")))) + '(sgml-start-tag-face ((t (:foreground "dark green")))) + '(shell-option-face ((t (:foreground "blue")))) + '(shell-output-2-face ((t (:foreground "darkseagreen")))) + '(shell-output-3-face ((t (:foreground "slategray")))) + '(shell-output-face ((t (:foreground "palegreen")))) + '(shell-prompt-face ((t (:foreground "red")))) + '(show-paren-match-face ((t (:background "Aquamarine" :foreground "steel blue")))) + '(show-paren-mismatch-face ((t (:bold t :background "IndianRed" :foreground "White")))) + '(speedbar-button-face ((t (:bold t :foreground "LightBlue")))) + '(speedbar-directory-face ((t (:bold t :foreground "yellow")))) + '(speedbar-file-face ((t (:bold t :foreground "wheat")))) + '(speedbar-highlight-face ((t (:background "sea green")))) + '(speedbar-selected-face ((t (:underline t)))) + '(speedbar-tag-face ((t (:foreground "LightBlue")))) + '(swbuff-current-buffer-face ((t (:bold t :foreground "red")))) + '(template-message-face ((t (:bold t)))) + '(term-black ((t (:foreground "black")))) + '(term-blackbg ((t (:background "black")))) + '(term-blue ((t (:foreground "blue")))) + '(term-bluebg ((t (:background "blue")))) + '(term-bold ((t (:bold t)))) + '(term-cyan ((t (:foreground "cyan")))) + '(term-cyanbg ((t (:background "cyan")))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-green ((t (:foreground "green")))) + '(term-greenbg ((t (:background "green")))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (:foreground "magenta")))) + '(term-magentabg ((t (:background "magenta")))) + '(term-red ((t (:foreground "red")))) + '(term-redbg ((t (:background "red")))) + '(term-underline ((t (:underline t)))) + '(term-white ((t (:foreground "white")))) + '(term-whitebg ((t (:background "white")))) + '(term-yellow ((t (:foreground "yellow")))) + '(term-yellowbg ((t (:background "yellow")))) + '(text-cursor ((t (:background "Red3" :foreground "white")))) + '(tool-bar ((t (:background "grey75" :foreground "black")))) + '(toolbar ((t (:background "Gray")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(variable-pitch ((t (nil)))) + '(vc-annotate-face-0046FF ((t (:background "black" :foreground "wheat")))) + '(vcursor ((t (:underline t :background "cyan" :foreground "blue")))) + '(vertical-divider ((t (:background "Gray")))) + '(vhdl-font-lock-attribute-face ((t (:foreground "Orchid")))) + '(vhdl-font-lock-directive-face ((t (:foreground "CadetBlue")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4")))) + '(vhdl-font-lock-function-face ((t (:foreground "Orchid4")))) + '(vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red")))) + '(vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange")))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-speedbar-architecture-face ((t (:foreground "Blue")))) + '(vhdl-speedbar-architecture-selected-face ((t (:underline t :foreground "Blue")))) + '(vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod")))) + '(vhdl-speedbar-configuration-selected-face ((t (:underline t :foreground "DarkGoldenrod")))) + '(vhdl-speedbar-entity-face ((t (:foreground "ForestGreen")))) + '(vhdl-speedbar-entity-selected-face ((t (:underline t :foreground "ForestGreen")))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "Brown")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:underline t :foreground "Brown")))) + '(vhdl-speedbar-package-face ((t (:foreground "Gray50")))) + '(vhdl-speedbar-package-selected-face ((t (:underline t :foreground "Gray50")))) + '(viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black")))) + '(viper-minibuffer-vi-face ((t (:background "gray" :foreground "DarkGreen")))) + '(viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-search-face ((t (:background "khaki" :foreground "Black")))) + '(vm-header-content-face ((t (:italic t :foreground "gray80")))) + '(vm-header-from-face ((t (:italic t :background "#65889C" :foreground "cyan")))) + '(vm-header-name-face ((t (:foreground "cyan")))) + '(vm-header-subject-face ((t (:foreground "cyan")))) + '(vm-header-to-face ((t (:italic t :foreground "cyan")))) + '(vm-message-cited-face ((t (:foreground "Gray80")))) + '(vm-summary-face-1 ((t (:foreground "MediumAquamarine")))) + '(vm-summary-face-2 ((t (:foreground "MediumAquamarine")))) + '(vm-summary-face-3 ((t (:foreground "MediumAquamarine")))) + '(vm-summary-face-4 ((t (:foreground "MediumAquamarine")))) + '(vm-summary-highlight-face ((t (:foreground "White")))) + '(vmpc-pre-sig-face ((t (:foreground "Aquamarine")))) + '(vmpc-sig-face ((t (:foreground "LightBlue")))) + '(vvb-face ((t (:background "pink" :foreground "black")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "cyan")))) + '(widget-documentation-face ((t (:foreground "LightBlue")))) + '(widget-field-face ((t (:foreground "LightBlue")))) + '(widget-inactive-face ((t (:foreground "Wheat3")))) + '(widget-single-line-field-face ((t (:foreground "LightBlue")))) + '(woman-bold-face ((t (:bold t)))) + '(woman-italic-face ((t (:foreground "beige")))) + '(woman-unknown-face ((t (:foreground "LightSalmon")))) + '(xref-keyword-face ((t (:foreground "Cyan")))) + '(xref-list-pilot-face ((t (:foreground "navy")))) + '(xref-list-symbol-face ((t (:foreground "navy")))) + '(xxml-emph-1-face ((t (:background "lightyellow")))) + '(xxml-emph-2-face ((t (:background "lightyellow")))) + '(xxml-header-1-face ((t (:background "seashell1" :foreground "MediumAquamarine")))) + '(xxml-header-2-face ((t (:background "seashell1" :foreground "SkyBlue")))) + '(xxml-header-3-face ((t (:background "seashell1")))) + '(xxml-header-4-face ((t (:background "seashell1")))) + '(xxml-interaction-face ((t (:background "lightcyan")))) + '(xxml-rug-face ((t (:background "cyan")))) + '(xxml-sparkle-face ((t (:background "yellow")))) + '(xxml-unbreakable-space-face ((t (:underline t :foreground "grey")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "#4f657d"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'subtle-blue) + +;;; subtle-blue-theme.el ends here diff --git a/replace-colorthemes/subtle-hacker-theme.el b/replace-colorthemes/subtle-hacker-theme.el new file mode 100644 index 0000000..cf5cb09 --- /dev/null +++ b/replace-colorthemes/subtle-hacker-theme.el @@ -0,0 +1,156 @@ +;;; subtle-hacker-theme.el --- subtle-hacker theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of subtle-hacker theme from `color-themes' + +;;; Code: + +(deftheme subtle-hacker + "subtle-hacker theme") + +(custom-theme-set-faces + 'subtle-hacker + + '(default ((t (:foreground "wheat" :background "darkslategrey")))) + + '(mouse ((t (:foreground "Grey")))) + '(cursor ((t (:background "LightGray")))) + '(border ((t (:foreground "black")))) + + '(bbdb-company ((t (:foreground "pale green")))) + '(bbdb-name ((t (:bold t :foreground "pale green")))) + '(bbdb-field-name ((t (:foreground "medium sea green")))) + '(bbdb-field-value ((t (:foreground "dark sea green")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t :foreground "beige")))) + '(calendar-today-face ((t (:underline t)))) + '(comint-highlight-prompt ((t (:foreground "medium aquamarine")))) + '(cperl-array-face ((t (:foreground "Yellow")))) + '(cperl-hash-face ((t (:foreground "White")))) + '(cperl-nonoverridable-face ((t (:foreground "SkyBlue")))) + '(custom-button-face ((t (:underline t :foreground "MediumSlateBlue")))) + '(custom-documentation-face ((t (:foreground "Grey")))) + '(custom-group-tag-face ((t (:foreground "MediumAquamarine")))) + '(custom-state-face ((t (:foreground "Coral")))) + '(custom-variable-tag-face ((t (:foreground "Aquamarine")))) + '(diary-face ((t (:bold t :foreground "IndianRed")))) + '(dired-face-directory ((t (:bold t :foreground "sky blue")))) + '(dired-face-permissions ((t (:foreground "aquamarine")))) + '(dired-face-flagged ((t (:foreground "tomato")))) + '(dired-face-marked ((t (:foreground "light salmon")))) + '(dired-face-executable ((t (:foreground "green yellow")))) + '(fringe ((t (:background "darkslategrey")))) + '(highlight ((t (:background "PaleGreen" :foreground "DarkGreen")))) + '(highline-face ((t (:background "SeaGreen")))) + '(holiday-face ((t (:background "DimGray")))) + '(hyper-apropos-hyperlink ((t (:bold t :foreground "DodgerBlue1")))) + '(hyper-apropos-documentation ((t (:foreground "LightSalmon")))) + '(info-header-xref ((t (:foreground "DodgerBlue1" :bold t)))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:underline t :bold t :foreground "DodgerBlue1")))) + '(info-xref ((t (:bold t :foreground "DodgerBlue1")))) + '(isearch ((t (:background "sea green")))) + '(italic ((t (:italic t)))) + '(menu ((t (:foreground "wheat" :background "darkslategrey")))) + '(mode-line ((t (:background "dark olive green" :foreground "wheat")))) + '(mode-line-buffer-id ((t (:background "dark olive green" :foreground "beige")))) + '(mode-line-mousable ((t (:background "dark olive green" :foreground "yellow green")))) + '(mode-line-mousable-minor-mode ((t (:background "dark olive green" :foreground "wheat")))) + '(region ((t (:background "dark cyan" :foreground "cyan")))) + '(secondary-selection ((t (:background "Aquamarine" :foreground "SlateBlue")))) + '(show-paren-match-face ((t (:bold t :background "Aquamarine" :foreground "steel blue")))) + '(show-paren-mismatch-face ((t (:background "Red" :foreground "White")))) + '(underline ((t (:underline t)))) + '(widget-field-face ((t (:foreground "LightBlue")))) + '(widget-inactive-face ((t (:foreground "DimGray")))) + '(widget-single-line-field-face ((t (:foreground "LightBlue")))) + '(w3m-anchor-face ((t (:bold t :foreground "DodgerBlue1")))) + '(w3m-arrived-anchor-face ((t (:bold t :foreground "DodgerBlue3")))) + '(w3m-header-line-location-title-face ((t (:foreground "beige" :background "dark olive green")))) + '(w3m-header-line-location-content-face ((t (:foreground "wheat" :background "dark olive green")))) + '(woman-bold-face ((t (:bold t)))) + '(woman-italic-face ((t (:foreground "beige")))) + '(woman-unknown-face ((t (:foreground "LightSalmon")))) + '(zmacs-region ((t (:background "dark cyan" :foreground "cyan")))) + + '(eshell-ls-clutter-face ((t (:bold t :foreground "DimGray")))) + '(eshell-ls-executable-face ((t (:bold t :foreground "Coral")))) + '(eshell-ls-missing-face ((t (:bold t :foreground "black")))) + '(eshell-ls-special-face ((t (:bold t :foreground "Gold")))) + '(eshell-ls-symlink-face ((t (:bold t :foreground "White")))) + '(font-lock-comment-face ((t (:foreground "White")))) + '(font-lock-constant-face ((t (:bold t :foreground "Aquamarine")))) + '(font-lock-function-name-face ((t (:bold t :foreground "MediumSlateBlue")))) + '(font-lock-string-face ((t (:italic t :foreground "LightSalmon")))) + '(font-lock-variable-name-face ((t (:italic t :bold t :foreground "Aquamarine")))) + '(gnus-cite-face-1 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-2 ((t (:foreground "chocolate")))) + '(gnus-cite-face-3 ((t (:foreground "tomato")))) + '(gnus-group-mail-1-empty-face ((t (:foreground "light cyan")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "light cyan")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "turquoise")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "turquoise")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "tomato")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "tomato")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "dodger blue")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "dodger blue")))) + '(gnus-group-news-1-empty-face ((t (:foreground "green yellow")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "green yellow")))) + '(gnus-group-news-2-empty-face ((t (:foreground "dark orange")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "dark orange")))) + '(gnus-group-news-3-empty-face ((t (:foreground "tomato")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "tomato")))) + '(gnus-group-news-low-empty-face ((t (:foreground "yellow green")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "yellow green")))) + '(gnus-header-name-face ((t (:bold t :foreground "DodgerBlue1")))) + '(gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3")))) + '(gnus-signature-face ((t (:foreground "salmon")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "forest green")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "burlywood")))) + '(gnus-summary-high-unread-face ((t (:italic t :bold t :foreground "cyan")))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "chocolate")))) + '(gnus-summary-low-read-face ((t (:foreground "light sea green")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "chocolate")))) + '(gnus-summary-low-unread-face ((t (:italic t :foreground "light sea green")))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "khaki")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "sandy brown")))) + '(gnus-summary-normal-unread-face ((t (:foreground "aquamarine")))) + '(message-cited-text-face ((t (:foreground "White")))) + '(message-header-name-face ((t (:foreground "DodgerBlue1")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3")))) + '(message-header-other-face ((t (:foreground "LightSkyBlue3")))) + '(message-header-xheader-face ((t (:foreground "DodgerBlue3")))) ) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'subtle-hacker) + +;;; subtle-hacker-theme.el ends here diff --git a/replace-colorthemes/taming-mr-arneson-theme.el b/replace-colorthemes/taming-mr-arneson-theme.el new file mode 100644 index 0000000..e36f57b --- /dev/null +++ b/replace-colorthemes/taming-mr-arneson-theme.el @@ -0,0 +1,178 @@ +;;; taming-mr-arneson-theme.el --- taming-mr-arneson theme + +;; Copyright (C) 2001 by Erik Arneson +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of taming-mr-arneson theme from `color-themes' + +;;; Code: + +(deftheme taming-mr-arneson + "taming-mr-arneson theme") + +(custom-theme-set-faces + 'taming-mr-arneson + + '(default ((t (:background "black" :foreground "LightSkyBlue")))) + '(cursor ((t (:background "Red3")))) + '(border ((t (:foreground "black")))) + + '(bbdb-company ((t (nil)))) + '(bbdb-field-name ((t (:bold t)))) + '(bbdb-field-value ((t (nil)))) + '(bbdb-name ((t (:underline t)))) + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:bold t :foreground "yellow")))) + '(border-glyph ((t (nil)))) + '(buffers-tab ((t (:background "black" :foreground "LightSkyBlue")))) + '(cperl-array-face ((t (:bold t :foreground "SkyBlue2")))) + '(cperl-hash-face ((t (:foreground "LightBlue2")))) + '(cperl-invalid-face ((t (:foreground "white")))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(custom-button-face ((t (:bold t)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:foreground "white")))) + '(custom-comment-tag-face ((t (:foreground "white")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :foreground "blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "red")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "white")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :foreground "blue")))) + '(cvs-filename-face ((t (:foreground "white")))) + '(cvs-handled-face ((t (:foreground "pink")))) + '(cvs-header-face ((t (:foreground "green")))) + '(cvs-marked-face ((t (:bold t :foreground "green3")))) + '(cvs-msg-face ((t (:foreground "red")))) + '(cvs-need-action-face ((t (:foreground "yellow")))) + '(cvs-unknown-face ((t (:foreground "grey")))) + '(diff-added-face ((t (nil)))) + '(diff-changed-face ((t (nil)))) + '(diff-file-header-face ((t (:bold t :background "grey70")))) + '(diff-hunk-header-face ((t (:background "grey85")))) + '(diff-index-face ((t (:bold t :background "grey70")))) + '(diff-removed-face ((t (nil)))) + '(dired-face-boring ((t (:foreground "Gray65")))) + '(dired-face-directory ((t (:bold t :foreground "SkyBlue2")))) + '(dired-face-executable ((t (:foreground "Green")))) + '(dired-face-flagged ((t (:background "LightSlateGray")))) + '(dired-face-header ((t (:background "grey75" :foreground "black")))) + '(dired-face-marked ((t (:background "PaleVioletRed")))) + '(dired-face-permissions ((t (:background "grey75" :foreground "black")))) + '(dired-face-setuid ((t (:foreground "Red")))) + '(dired-face-socket ((t (:foreground "magenta")))) + '(dired-face-symlink ((t (:foreground "cyan")))) + '(excerpt ((t (nil)))) + '(fixed ((t (:bold t)))) + '(font-lock-builtin-face ((t (:foreground "red3")))) + '(font-lock-comment-face ((t (:foreground "red")))) + '(font-lock-constant-face ((t (nil)))) + '(font-lock-doc-string-face ((t (:foreground "turquoise")))) + '(font-lock-function-name-face ((t (:foreground "white")))) + '(font-lock-keyword-face ((t (:foreground "green")))) + '(font-lock-preprocessor-face ((t (:foreground "green3")))) + '(font-lock-reference-face ((t (:foreground "red3")))) + '(font-lock-string-face ((t (:foreground "turquoise")))) + '(font-lock-type-face ((t (:foreground "steelblue")))) + '(font-lock-variable-name-face ((t (:foreground "magenta2")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "grey75" :foreground "black")))) + '(gui-element ((t (nil)))) + '(highlight ((t (:background "darkseagreen2" :foreground "blue")))) + '(html-helper-bold-face ((t (:bold t)))) + '(html-helper-italic-face ((t (:bold t :foreground "yellow")))) + '(html-helper-underline-face ((t (:underline t)))) + '(hyper-apropos-documentation ((t (:foreground "white")))) + '(hyper-apropos-heading ((t (:bold t)))) + '(hyper-apropos-hyperlink ((t (:foreground "sky blue")))) + '(hyper-apropos-major-heading ((t (:bold t)))) + '(hyper-apropos-section-heading ((t (:bold t)))) + '(hyper-apropos-warning ((t (:bold t :foreground "red")))) + '(info-node ((t (:bold t :foreground "yellow")))) + '(info-xref ((t (:bold t)))) + '(isearch ((t (:background "paleturquoise" :foreground "dark red")))) + '(isearch-secondary ((t (:foreground "red3")))) + '(italic ((t (:bold t :foreground "yellow")))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:background "gray68" :foreground "dark green")))) + '(man-bold ((t (:bold t)))) + '(man-heading ((t (:bold t)))) + '(man-italic ((t (:foreground "yellow")))) + '(man-xref ((t (:underline t)))) + '(message-cited-text ((t (:foreground "orange")))) + '(message-header-contents ((t (:foreground "white")))) + '(message-headers ((t (:bold t :foreground "orange")))) + '(message-highlighted-header-contents ((t (:bold t)))) + '(message-url ((t (:bold t :foreground "pink")))) + '(mmm-face ((t (:background "black" :foreground "green")))) + '(mode-line ((t (nil)))) + '(mode-line-buffer-id ((t (:background "Gray80" :foreground "blue4")))) + '(mode-line-mousable ((t (:background "Gray80" :foreground "firebrick")))) + '(mode-line-mousable-minor-mode ((t (:background "Gray80" :foreground "green4")))) + '(paren-blink-off ((t (:foreground "gray80")))) + '(paren-match ((t (:background "dark blue")))) + '(paren-mismatch ((t (:background "DeepPink" :foreground "LightSkyBlue")))) + '(pointer ((t (nil)))) + '(primary-selection ((t (:background "gray65" :foreground "DarkBlue")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "gray65" :foreground "DarkBlue")))) + '(right-margin ((t (nil)))) + '(secondary-selection ((t (:background "paleturquoise" :foreground "black")))) + '(shell-option-face ((t (:foreground "blue4")))) + '(shell-output-2-face ((t (:foreground "green4")))) + '(shell-output-3-face ((t (:foreground "green4")))) + '(shell-output-face ((t (:bold t)))) + '(shell-prompt-face ((t (:foreground "red4")))) + '(text-cursor ((t (:background "Red3" :foreground "black")))) + '(toolbar ((t (:background "Gray80" :foreground "black")))) + '(underline ((t (:underline t)))) + '(vertical-divider ((t (nil)))) + '(vm-xface ((t (:background "white" :foreground "black")))) + '(vmpc-pre-sig-face ((t (:foreground "forestgreen")))) + '(vmpc-sig-face ((t (:foreground "steelblue")))) + '(widget ((t (nil)))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85" :foreground "black")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(x-face ((t (:background "white" :foreground "black")))) + '(xrdb-option-name-face ((t (:foreground "red")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "gray65"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'taming-mr-arneson) + +;;; taming-mr-arneson-theme.el ends here diff --git a/replace-colorthemes/taylor-theme.el b/replace-colorthemes/taylor-theme.el new file mode 100644 index 0000000..45d971c --- /dev/null +++ b/replace-colorthemes/taylor-theme.el @@ -0,0 +1,129 @@ +;;; taylor-theme.el --- taylor theme + +;; Copyright (C) 2000 by Art Taylor +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of taylor theme from `color-themes' + +;;; Code: + +(deftheme taylor + "taylor theme") + +(custom-theme-set-faces + 'taylor + + '(default ((t (:background "black" :foreground "wheat")))) + '(cursor ((t (:background "red")))) + '(border ((t (:foreground "black")))) + + '(gnus-mouse-face ((t (:background "black" :foreground "black")))) + '(list-matching-lines-face ((t (:bold t :background "grey40" :foreground "yellow")))) + '(view-highlight-face ((t (:background "black" :foreground "black")))) + + '(bold ((t (:bold t :background "grey40" :foreground "yellow")))) + '(bold-italic ((t (:italic t :bold t :foreground "yellow green")))) + '(fl-comment-face ((t (:foreground "medium purple")))) + '(fl-function-name-face ((t (:foreground "green")))) + '(fl-keyword-face ((t (:foreground "LightGreen")))) + '(fl-string-face ((t (:foreground "light coral")))) + '(fl-type-face ((t (:foreground "cyan")))) + '(font-lock-builtin-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-comment-face ((t (:foreground "OrangeRed")))) + '(font-lock-constant-face ((t (:foreground "Aquamarine")))) + '(font-lock-function-name-face ((t (:foreground "LightSkyBlue")))) + '(font-lock-keyword-face ((t (:foreground "Cyan")))) + '(font-lock-string-face ((t (:foreground "LightSalmon")))) + '(font-lock-type-face ((t (:foreground "PaleGreen")))) + '(font-lock-variable-name-face ((t (:foreground "LightGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "Pink")))) + '(gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise")))) + '(gnus-group-news-2-empty-face ((t (:foreground "turquoise")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "turquoise")))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise")))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "SkyBlue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "PaleGreen")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "pink")))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "SkyBlue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "PaleGreen")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "pink")))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "SkyBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "PaleGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "pink")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(highlight ((t (:background "black" :foreground "black")))) + '(italic ((t (:italic t :foreground "yellow3")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:bold t :foreground "green4")))) + '(message-header-name-face ((t (:foreground "DarkGreen")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow")))) + '(message-header-other-face ((t (:foreground "#b00000")))) + '(message-header-subject-face ((t (:foreground "green3")))) + '(message-header-to-face ((t (:bold t :foreground "green2")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "blue3")))) + '(mode-line ((t (:background "wheat" :foreground "black")))) + '(mode-line-buffer-id ((t (:background "wheat" :foreground "black")))) + '(mode-line-mousable ((t (:background "wheat" :foreground "black")))) + '(mode-line-mousable-minor-mode ((t (:background "wheat" :foreground "black")))) + '(region ((t (:background "blue")))) + '(secondary-selection ((t (:background "darkslateblue" :foreground "black")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(underline ((t (:underline t)))) + '(xref-keyword-face ((t (:foreground "blue")))) + '(xref-list-default-face ((t (nil)))) + '(xref-list-pilot-face ((t (:foreground "navy")))) + '(xref-list-symbol-face ((t (:foreground "navy"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'taylor) + +;;; taylor-theme.el ends here diff --git a/replace-colorthemes/tty-dark-theme.el b/replace-colorthemes/tty-dark-theme.el new file mode 100644 index 0000000..66adcc5 --- /dev/null +++ b/replace-colorthemes/tty-dark-theme.el @@ -0,0 +1,88 @@ +;;; tty-dark-theme.el --- tty-dark theme + +;; Copyright (C) 2001 by Oivvio Polite +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of tty-dark theme from `color-themes' + +;;; Code: + +(deftheme tty-dark + "tty-dark theme") + +(custom-theme-set-faces + 'tty-dark + + '(default ((t (:background "black" :foreground "white")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "red")))) + '(border ((t (:foreground "blue")))) + + '(bold ((t (:underline t :background "black" :foreground "white")))) + '(bold-italic ((t (:underline t :foreground "white")))) + '(calendar-today-face ((t (:underline t)))) + '(diary-face ((t (:foreground "red")))) + '(font-lock-builtin-face ((t (:foreground "blue")))) + '(font-lock-comment-face ((t (:foreground "cyan")))) + '(font-lock-constant-face ((t (:foreground "magenta")))) + '(font-lock-function-name-face ((t (:foreground "cyan")))) + '(font-lock-keyword-face ((t (:foreground "red")))) + '(font-lock-string-face ((t (:foreground "green")))) + '(font-lock-type-face ((t (:foreground "yellow")))) + '(font-lock-variable-name-face ((t (:foreground "blue")))) + '(font-lock-warning-face ((t (:bold t :foreground "magenta")))) + '(highlight ((t (:background "blue" :foreground "yellow")))) + '(holiday-face ((t (:background "cyan")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:italic t :bold t)))) + '(info-xref ((t (:bold t)))) + '(italic ((t (:underline t :background "red")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:bold t :foreground "green")))) + '(message-header-name-face ((t (:foreground "green")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "yellow")))) + '(message-header-other-face ((t (:foreground "#b00000")))) + '(message-header-subject-face ((t (:foreground "green")))) + '(message-header-to-face ((t (:bold t :foreground "green")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "green")))) + '(message-separator-face ((t (:foreground "blue")))) + + '(mode-line ((t (:background "white" :foreground "blue")))) + '(mode-line-buffer-id ((t (:background "white" :foreground "red")))) + '(mode-line-mousable ((t (:background "white" :foreground "magenta")))) + '(mode-line-mousable-minor-mode ((t (:background "white" :foreground "yellow")))) + '(region ((t (:background "white" :foreground "black")))) + '(zmacs-region ((t (:background "cyan" :foreground "black")))) + '(secondary-selection ((t (:background "blue")))) + '(show-paren-match-face ((t (:background "red")))) + '(show-paren-mismatch-face ((t (:background "magenta" :foreground "white")))) + '(underline ((t (:underline t))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'tty-dark) + +;;; tty-dark-theme.el ends here diff --git a/replace-colorthemes/vim-colors-theme.el b/replace-colorthemes/vim-colors-theme.el new file mode 100644 index 0000000..ad4f99a --- /dev/null +++ b/replace-colorthemes/vim-colors-theme.el @@ -0,0 +1,125 @@ +;;; vim-colors-theme.el --- vim-colors theme + +;; Copyright (C) 2003 by Michael Soulier +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of vim-colors theme from `color-themes' + +;;; Code: + +(deftheme vim-colors + "vim-colors theme") + +(custom-theme-set-faces + 'vim-colors + + '(default ((t (:background "#ffffff" :foreground "#000000")))) + '(mouse ((t (:background "#000000")))) + '(cursor ((t (:background "#000000")))) + '(border ((t (:background "black")))) + + '(Man-overstrike-face ((t (:weight bold)))) + '(Man-underline-face ((t (:underline t)))) + '(apropos-keybinding-face ((t (:underline t)))) + '(apropos-label-face ((t (:italic t)))) + + '(apropos-match-face ((t (:background "yellow")))) + '(apropos-property-face ((t (:italic t :weight bold)))) + '(apropos-symbol-face ((t (:weight bold)))) + '(cperl-here-face ((t (:background "#f2f2f2" :foreground "#ff00ff")))) + '(cperl-invalid-face ((t (:underline t)))) + '(cperl-pod-face ((t (:foreground "blue")))) + '(cperl-pod-head-face ((t (:foreground "#008b8b")))) + '(help-highlight-face ((t (:underline t)))) + '(ispell-highlight-face ((t (:background "darkseagreen2")))) + '(list-matching-lines-face ((t (:weight bold)))) + + '(tags-tag-face ((t (:background "#ffffff" :foreground "#000000")))) + '(view-highlight-face ((t (:background "darkseagreen2")))) + '(widget-mouse-face ((t (:background "darkseagreen2")))) + + '(default ((t (:background "#ffffff" :foreground "#000000")))) + '(Info-title-4-face ((t (:weight bold)))) + '(bold ((t (:weight bold)))) + '(bold-italic ((t (:italic t :weight bold)))) + '(comint-highlight-input ((t (:weight bold)))) + '(comint-highlight-prompt ((t (:foreground "dark blue")))) + '(cperl-array-face ((t (:foreground "brown")))) + '(cperl-hash-face ((t (:foreground "red")))) + '(cperl-nonoverridable-face ((t (:foreground "#008b8b")))) + + '(font-lock-builtin-face ((t (:foreground "purple")))) + '(font-lock-comment-face ) + '(font-lock-constant-face ((t (:foreground "green4")))) + '(font-lock-doc-face ((t (:background "#f2f2f2")))) + '(font-lock-function-name-face ((t (:foreground "#008b8b")))) + '(font-lock-keyword-face ((t (:weight bold :foreground "#a52a2a")))) + '(font-lock-string-face ((t (:background "#f2f2f2" :foreground "#ff00ff")))) + '(font-lock-type-face ((t (:foreground "ForestGreen")))) + '(font-lock-variable-name-face ((t (:foreground "#008b8b")))) + '(font-lock-warning-face ((t (:weight bold :foreground "Red")))) + '(fringe ((t (:background "#e5e5e5")))) + '(header-line ((t (:background "grey90" :foreground "grey20")))) + '(highlight ((t (:background "darkseagreen2")))) + '(info-header-node ((t (nil)))) + '(info-header-xref ((t (nil)))) + '(info-menu-5 ((t (:foreground "red1")))) + '(info-menu-header ((t (:weight bold)))) + '(info-node ((t (:italic t :weight bold :foreground "brown")))) + '(info-xref ((t (:weight bold :foreground "magenta4")))) + '(isearch ((t (:background "magenta4" :foreground "lightskyblue1")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise")))) + '(italic ((t (:italic t)))) + + '(mode-line ((t (:background "grey75" :foreground "black")))) + '(region ((t (:background "lightgoldenrod2")))) + '(rpm-spec-dir-face ((t (:foreground "green")))) + '(rpm-spec-doc-face ((t (:foreground "magenta")))) + '(rpm-spec-ghost-face ((t (:foreground "red")))) + '(rpm-spec-macro-face ((t (:foreground "purple")))) + '(rpm-spec-package-face ((t (:foreground "red")))) + '(rpm-spec-tag-face ((t (:foreground "blue")))) + '(scroll-bar ((t (:background "grey75" :foreground "#000000")))) + '(secondary-selection ((t (:background "yellow")))) + '(sh-heredoc-face ((t (:foreground "tan")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(tool-bar ((t (:background "grey75" :foreground "black")))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + + '(widget-button-face ((t (:weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'vim-colors) + +;;; vim-colors-theme.el ends here diff --git a/replace-colorthemes/whateveryouwant-theme.el b/replace-colorthemes/whateveryouwant-theme.el new file mode 100644 index 0000000..e0f3990 --- /dev/null +++ b/replace-colorthemes/whateveryouwant-theme.el @@ -0,0 +1,410 @@ +;;; whateveryouwant-theme.el --- whateveryouwant theme + +;; Copyright (C) 2002 by Fabien Penso +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of whateveryouwant theme from `color-themes' + +;;; Code: + +(deftheme whateveryouwant + "whateveryouwant theme") + +(custom-theme-set-faces + 'whateveryouwant + + '(default ((t (:background "white" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:background "black")))) + + '(Info-title-1-face ((t (:bold t :weight bold :height 1.728)))) + '(Info-title-2-face ((t (:bold t :weight bold :height 1.44)))) + '(Info-title-3-face ((t (:bold t :weight bold :height 1.2)))) + '(Info-title-4-face ((t (:bold t :weight bold)))) + '(antlr-font-lock-keyword-face ((t (:bold t :foreground "black" :weight bold)))) + '(antlr-font-lock-literal-face ((t (:bold t :foreground "brown4" :weight bold)))) + '(antlr-font-lock-ruledef-face ((t (:bold t :foreground "blue" :weight bold)))) + '(antlr-font-lock-ruleref-face ((t (:foreground "blue4")))) + '(antlr-font-lock-tokendef-face ((t (:bold t :foreground "blue" :weight bold)))) + '(antlr-font-lock-tokenref-face ((t (:foreground "orange4")))) + '(bbdb-company ((t (:italic t :slant italic)))) + '(bbdb-field-name ((t (:bold t :foreground "gray40" :weight bold)))) + '(bbdb-field-value ((t (nil)))) + '(bbdb-name ((t (:underline t)))) + '(bold ((t (:bold t :foreground "gray40" :weight bold)))) + '(bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(calendar-today-face ((t (:underline t)))) + '(change-log-acknowledgement-face ((t (:foreground "Firebrick")))) + '(change-log-conditionals-face ((t (:foreground "DarkGoldenrod")))) + '(change-log-date-face ((t (:foreground "RosyBrown")))) + '(change-log-email-face ((t (:foreground "DarkGoldenrod")))) + '(change-log-file-face ((t (:foreground "Blue")))) + '(change-log-function-face ((t (:foreground "DarkGoldenrod")))) + '(change-log-list-face ((t (:foreground "Purple")))) + '(change-log-name-face ((t (:foreground "CadetBlue")))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "dark blue")))) + '(cperl-array-face ((t (:bold t :background "lightyellow2" :foreground "Blue" :weight bold)))) + '(cperl-hash-face ((t (:italic t :bold t :background "lightyellow2" :foreground "Red" :slant italic :weight bold)))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(custom-button-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button))))) + '(custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button))))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "gray85")))) + '(custom-comment-tag-face ((t (:foreground "blue4")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:bold t :weight bold :height 1.2)))) + '(custom-group-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2)))) + '(custom-group-tag-face-1 ((t (:bold t :foreground "red" :weight bold :height 1.2)))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:bold t :underline t :weight bold)))) + '(custom-variable-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2)))) + '(cvs-filename-face ((t (:foreground "blue4")))) + '(cvs-handled-face ((t (:foreground "pink")))) + '(cvs-header-face ((t (:bold t :foreground "blue4" :weight bold)))) + '(cvs-marked-face ((t (:bold t :foreground "green3" :weight bold)))) + '(cvs-msg-face ((t (:italic t :slant italic)))) + '(cvs-need-action-face ((t (:foreground "orange")))) + '(cvs-unknown-face ((t (:foreground "red")))) + '(diary-face ((t (:foreground "red")))) + '(diff-added-face ((t (nil)))) + '(diff-changed-face ((t (nil)))) + '(diff-context-face ((t (:foreground "grey50")))) + '(diff-file-header-face ((t (:bold t :background "grey70" :weight bold)))) + '(diff-function-face ((t (:foreground "grey50")))) + '(diff-header-face ((t (:background "grey85")))) + '(diff-hunk-header-face ((t (:background "grey85")))) + '(diff-index-face ((t (:bold t :background "grey70" :weight bold)))) + '(diff-nonexistent-face ((t (:bold t :background "grey70" :weight bold)))) + '(diff-removed-face ((t (nil)))) + '(dired-face-boring ((t (:foreground "RosyBrown")))) + '(dired-face-directory ((t (:foreground "Blue")))) + '(dired-face-executable ((t (nil)))) + '(dired-face-flagged ((t (:bold t :foreground "Red" :weight bold)))) + '(dired-face-marked ((t (:bold t :foreground "Red" :weight bold)))) + '(dired-face-permissions ((t (nil)))) + '(dired-face-setuid ((t (nil)))) + '(dired-face-socket ((t (nil)))) + '(dired-face-symlink ((t (:foreground "Purple")))) + '(ebrowse-default-face ((t (nil)))) + '(ebrowse-file-name-face ((t (:italic t :slant italic)))) + '(ebrowse-member-attribute-face ((t (:foreground "red")))) + '(ebrowse-member-class-face ((t (:foreground "purple")))) + '(ebrowse-progress-face ((t (:background "blue")))) + '(ebrowse-root-class-face ((t (:bold t :foreground "blue" :weight bold)))) + '(ebrowse-tree-mark-face ((t (:foreground "red")))) + '(ediff-current-diff-face-A ((t (:background "pale green" :foreground "firebrick")))) + '(ediff-current-diff-face-Ancestor ((t (:background "VioletRed" :foreground "Black")))) + '(ediff-current-diff-face-B ((t (:background "Yellow" :foreground "DarkOrchid")))) + '(ediff-current-diff-face-C ((t (:background "Pink" :foreground "Navy")))) + '(ediff-even-diff-face-A ((t (:background "light grey" :foreground "Black")))) + '(ediff-even-diff-face-Ancestor ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-B ((t (:background "Grey" :foreground "White")))) + '(ediff-even-diff-face-C ((t (:background "light grey" :foreground "Black")))) + '(ediff-fine-diff-face-A ((t (:background "sky blue" :foreground "Navy")))) + '(ediff-fine-diff-face-Ancestor ((t (:background "Green" :foreground "Black")))) + '(ediff-fine-diff-face-B ((t (:background "cyan" :foreground "Black")))) + '(ediff-fine-diff-face-C ((t (:background "Turquoise" :foreground "Black")))) + '(ediff-odd-diff-face-A ((t (:background "Grey" :foreground "White")))) + '(ediff-odd-diff-face-Ancestor ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-B ((t (:background "light grey" :foreground "Black")))) + '(ediff-odd-diff-face-C ((t (:background "Grey" :foreground "White")))) + '(erc-action-face ((t (:bold t :weight bold)))) + '(erc-bold-face ((t (:bold t :weight bold)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "LightSalmon")))) + '(erc-error-face ((t (:bold t :foreground "IndianRed" :weight bold)))) + '(erc-input-face ((t (:foreground "Beige")))) + '(erc-inverse-face ((t (:background "wheat" :foreground "darkslategrey")))) + '(erc-notice-face ((t (:foreground "MediumAquamarine")))) + '(erc-pal-face ((t (:foreground "pale green")))) + '(erc-prompt-face ((t (:foreground "MediumAquamarine")))) + '(erc-underline-face ((t (:underline t)))) + '(eshell-ls-archive-face ((t (:bold t :foreground "Orchid" :weight bold)))) + '(eshell-ls-backup-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-clutter-face ((t (:bold t :foreground "OrangeRed" :weight bold)))) + '(eshell-ls-directory-face ((t (:bold t :foreground "Blue" :weight bold)))) + '(eshell-ls-executable-face ((t (:bold t :foreground "ForestGreen" :weight bold)))) + '(eshell-ls-missing-face ((t (:bold t :foreground "Red" :weight bold)))) + '(eshell-ls-picture-face ((t (:foreground "Violet")))) + '(eshell-ls-product-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-readonly-face ((t (:foreground "Brown")))) + '(eshell-ls-special-face ((t (:bold t :foreground "Magenta" :weight bold)))) + '(eshell-ls-symlink-face ((t (:bold t :foreground "Dark Cyan" :weight bold)))) + '(eshell-ls-unreadable-face ((t (:foreground "Grey30")))) + '(eshell-prompt-face ((t (:bold t :foreground "#aa0000" :weight bold :width condensed)))) + '(eshell-test-failed-face ((t (:bold t :foreground "OrangeRed" :weight bold)))) + '(eshell-test-ok-face ((t (:bold t :foreground "Green" :weight bold)))) + '(excerpt ((t (:italic t :slant italic)))) + '(fixed ((t (:bold t :weight bold)))) + + '(flyspell-duplicate-face ((t (:bold t :foreground "Gold3" :underline t :weight bold)))) + '(flyspell-incorrect-face ((t (:bold t :foreground "OrangeRed" :underline t :weight bold)))) + '(font-latex-bold-face ((t (:bold t :foreground "DarkOliveGreen" :weight bold)))) + '(font-latex-italic-face ((t (:italic t :foreground "DarkOliveGreen" :slant italic)))) + '(font-latex-math-face ((t (:foreground "SaddleBrown")))) + '(font-latex-sedate-face ((t (:foreground "DimGray")))) + '(font-latex-string-face ((t (:foreground "RosyBrown")))) + '(font-latex-warning-face ((t (:bold t :foreground "Red" :weight bold)))) + '(font-lock-builtin-face ((t (:foreground "dodgerblue3")))) + '(font-lock-comment-face ((t (:foreground "#cc0000" :width semi-condensed)))) + '(font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(font-lock-doc-face ((t (:foreground "RosyBrown")))) + '(font-lock-doc-string-face ((t (:foreground "RosyBrown")))) + '(font-lock-function-name-face ((t (:bold t :foreground "navy" :weight bold :height 100)))) + '(font-lock-keyword-face ((t (:bold t :foreground "red4" :weight bold)))) + '(font-lock-preprocessor-face ((t (:foreground "CadetBlue")))) + '(font-lock-reference-face ((t (:foreground "Orchid")))) + '(font-lock-string-face ((t (:foreground "navy")))) + '(font-lock-type-face ((t (:bold t :foreground "black" :weight bold)))) + '(font-lock-variable-name-face ((t (:foreground "black")))) + '(font-lock-warning-face ((t (:foreground "orange2")))) + '(fringe ((t (:background "white")))) + '(gnus-cite-attribution-face ((t (:italic t :slant italic)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t :weight bold)))) + '(gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow")))) + '(gnus-emphasis-italic ((t (:italic t :slant italic)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold)))) + '(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "DeepPink3" :weight bold)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "HotPink3" :weight bold)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "magenta4" :weight bold)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "DeepPink4" :weight bold)))) + '(gnus-group-news-1-empty-face ((t (:foreground "red" :weight normal :height 120)))) + '(gnus-group-news-1-face ((t (:foreground "red" :weight normal :height 120)))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "CadetBlue4" :weight bold)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t :weight bold)))) + '(gnus-group-news-4-empty-face ((t (nil)))) + '(gnus-group-news-4-face ((t (:bold t :weight bold)))) + '(gnus-group-news-5-empty-face ((t (nil)))) + '(gnus-group-news-5-face ((t (:bold t :weight bold)))) + '(gnus-group-news-6-empty-face ((t (nil)))) + '(gnus-group-news-6-face ((t (:bold t :weight bold)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkGreen" :weight bold)))) + '(gnus-header-content-face ((t (:foreground "goldenrod" :slant normal)))) + '(gnus-header-from-face ((t (:bold t :foreground "grey75" :weight bold :height 140)))) + '(gnus-header-name-face ((t (:foreground "grey75" :height 120)))) + '(gnus-header-newsgroups-face ((t (:italic t :foreground "MidnightBlue" :slant italic)))) + '(gnus-header-subject-face ((t (:bold t :foreground "firebrick" :weight bold :height 160)))) + '(gnus-picon-face ((t (:background "white" :foreground "black")))) + '(gnus-picon-xbm-face ((t (:background "white" :foreground "black")))) + '(gnus-signature-face ((t (:italic t :slant italic)))) + '(gnus-splash-face ((t (:foreground "Brown")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "RoyalBlue" :weight bold)))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "DarkGreen" :weight bold)))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "firebrick" :weight bold)))) + '(gnus-summary-high-unread-face ((t (:bold t :weight bold)))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "RoyalBlue" :slant italic)))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "DarkGreen" :slant italic)))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "firebrick" :slant italic)))) + '(gnus-summary-low-unread-face ((t (:italic t :slant italic)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "grey65" :height 110 :width condensed)))) + '(gnus-summary-normal-read-face ((t (:foreground "grey75" :height 110 :width condensed )))) + '(gnus-summary-normal-ticked-face ((t (:bold t :foreground "firebrick" :weight bold :height 110 :width condensed)))) + '(gnus-summary-normal-unread-face ((t (:foreground "firebrick" :height 110 :width condensed)))) + '(gnus-summary-selected-face ((t (:background "gold" :foreground "black" :box (:line-width 1 :color "yellow" :style released-button) :height 140 :width condensed)))) + '(header-line ((t (:background "grey90" :foreground "grey20" :box nil)))) + '(hi-black-b ((t (:bold t :weight bold)))) + '(hi-black-hb ((t (:bold t :weight bold :height 1.67)))) + '(hi-blue ((t (:background "light blue")))) + '(hi-blue-b ((t (:bold t :foreground "blue" :weight bold)))) + '(hi-green ((t (:background "green")))) + '(hi-green-b ((t (:bold t :foreground "green" :weight bold)))) + '(hi-pink ((t (:background "pink")))) + '(hi-red-b ((t (:bold t :foreground "red" :weight bold)))) + '(hi-yellow ((t (:background "yellow")))) + '(highlight ((t (:background "black" :foreground "white")))) + '(highlight-changes-delete-face ((t (:foreground "red" :underline t)))) + '(highlight-changes-face ((t (:foreground "red")))) + '(highline-face ((t (:background "gray80")))) + '(holiday-face ((t (:background "pink")))) + '(idlwave-help-link-face ((t (:foreground "Blue")))) + '(idlwave-shell-bp-face ((t (:background "Pink" :foreground "Black")))) + '(info-header-node ((t (:italic t :bold t :foreground "brown" :slant italic :weight bold)))) + '(info-header-xref ((t (:bold t :foreground "magenta4" :weight bold)))) + '(info-menu-5 ((t (:foreground "red1")))) + '(info-menu-header ((t (:bold t :weight bold)))) + '(info-node ((t (:italic t :bold t :foreground "brown" :slant italic :weight bold)))) + '(info-xref ((t (:bold t :foreground "magenta4" :weight bold)))) + '(isearch ((t (:background "magenta4" :foreground "lightskyblue1")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise")))) + '(italic ((t (:italic t :slant italic)))) + '(log-view-file-face ((t (:bold t :background "grey70" :weight bold)))) + '(log-view-message-face ((t (:background "grey85")))) + '(makefile-space-face ((t (:background "hotpink")))) + '(menu ((t (nil)))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "grey45" :weight normal)))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "blue4" :slant italic :weight bold)))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:bold t :foreground "navy blue" :weight bold)))) + '(message-header-to-face ((t (:bold t :foreground "grey60" :weight bold :height 120)))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-mml-face ((t (:foreground "ForestGreen")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:background "grey90" :foreground "black" :box (:line-width 1 :style none) :width condensed)))) + '(mode-line-buffer-id ((t (:bold t :background "grey75" :foreground "black" :box (:line-width -1 :style released-button) :weight bold)))) + '(mode-line-mousable ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button))))) + '(mode-line-mousable-minor-mode ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button))))) + '(mouse ((t (:background "black")))) + '(mpg123-face-cur ((t (:background "#004080" :foreground "yellow")))) + '(mpg123-face-slider ((t (:background "yellow" :foreground "black")))) + '(primary-selection ((t (:background "lightgoldenrod2")))) + '(reb-match-0 ((t (:background "lightblue")))) + '(reb-match-1 ((t (:background "aquamarine")))) + '(reb-match-2 ((t (:background "springgreen")))) + '(reb-match-3 ((t (:background "yellow")))) + '(region ((t (:background "#aa0000" :foreground "white")))) + '(scroll-bar ((t (:background "grey75")))) + '(secondary-selection ((t (:background "yellow")))) + '(sgml-comment-face ((t (:italic t :foreground "SeaGreen" :slant italic)))) + '(sgml-doctype-face ((t (:bold t :foreground "FireBrick" :weight bold)))) + '(sgml-end-tag-face ((t (:background "white" :foreground "SlateBlue" :height 116)))) + '(sgml-entity-face ((t (:stipple nil :background "SlateBlue" :foreground "Red" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 116 :width normal)))) + '(sgml-ignored-face ((t (nil)))) + '(sgml-ms-end-face ((t (nil)))) + '(sgml-ms-start-face ((t (nil)))) + '(sgml-pi-face ((t (:bold t :foreground "gray40" :weight bold)))) + '(sgml-sgml-face ((t (:bold t :foreground "gray40" :weight bold)))) + '(sgml-short-ref-face ((t (nil)))) + '(sgml-shortref-face ((t (:bold t :foreground "gray40" :weight bold)))) + '(sgml-start-tag-face ((t (:background "white" :foreground "SlateBlue" :height 116)))) + '(sh-heredoc-face ((t (:foreground "tan")))) + '(show-paren-match-face ((t (:background "gray80" :foreground "black")))) + '(show-paren-mismatch-face ((t (:background "red" :foreground "yellow")))) + '(show-tabs-space-face ((t (:foreground "yellow")))) + '(show-tabs-tab-face ((t (:foreground "red")))) + '(smerge-base-face ((t (:foreground "red")))) + '(smerge-markers-face ((t (:background "grey85")))) + '(smerge-mine-face ((t (:foreground "blue")))) + '(smerge-other-face ((t (:foreground "darkgreen")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(strokes-char-face ((t (:background "lightgray")))) + '(term-black ((t (:background "white" :foreground "black")))) + '(term-blackbg ((t (:background "black" :foreground "black")))) + '(term-blue ((t (:background "white" :foreground "blue")))) + '(term-bluebg ((t (:background "blue" :foreground "black")))) + '(term-bold ((t (:bold t :background "white" :foreground "black")))) + '(term-cyan ((t (:background "white" :foreground "cyan")))) + '(term-cyanbg ((t (:background "cyan" :foreground "black")))) + '(term-default ((t (:background "white" :foreground "black")))) + '(term-default-bg ((t (:foreground "black")))) + '(term-default-bg-inv ((t (:foreground "black")))) + '(term-default-fg ((t (:background "white")))) + '(term-default-fg-inv ((t (:background "white")))) + '(term-green ((t (:background "white" :foreground "green")))) + '(term-greenbg ((t (:background "green" :foreground "black")))) + '(term-invisible ((t (:foreground "black")))) + '(term-invisible-inv ((t (:foreground "black")))) + '(term-magenta ((t (:background "white" :foreground "magenta")))) + '(term-magentabg ((t (:background "magenta" :foreground "black")))) + '(term-red ((t (:background "white" :foreground "red")))) + '(term-redbg ((t (:background "red" :foreground "black")))) + '(term-underline ((t (:background "white" :foreground "black")))) + '(term-white ((t (:background "white" :foreground "white")))) + '(term-whitebg ((t (:background "white" :foreground "black")))) + '(term-yellow ((t (:background "white" :foreground "yellow")))) + '(term-yellowbg ((t (:background "yellow" :foreground "black")))) + '(tex-math-face ((t (:foreground "RosyBrown")))) + '(texinfo-heading-face ((t (:foreground "Blue")))) + '(tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button))))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:foreground "navy" :underline t)))) + + '(vcursor ((t (:background "cyan" :foreground "blue" :underline t)))) + '(vhdl-font-lock-attribute-face ((t (:foreground "Orchid")))) + '(vhdl-font-lock-directive-face ((t (:foreground "CadetBlue")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4")))) + '(vhdl-font-lock-function-face ((t (:foreground "Orchid4")))) + '(vhdl-font-lock-prompt-face ((t (:bold t :foreground "Red" :weight bold)))) + '(vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Orange" :weight bold)))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-speedbar-architecture-face ((t (:foreground "Blue")))) + '(vhdl-speedbar-architecture-selected-face ((t (:foreground "Blue" :underline t)))) + '(vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod")))) + '(vhdl-speedbar-configuration-selected-face ((t (:foreground "DarkGoldenrod" :underline t)))) + '(vhdl-speedbar-entity-face ((t (:foreground "ForestGreen")))) + '(vhdl-speedbar-entity-selected-face ((t (:foreground "ForestGreen" :underline t)))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "Brown")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:foreground "Brown" :underline t)))) + '(vhdl-speedbar-package-face ((t (:foreground "Grey50")))) + '(vhdl-speedbar-package-selected-face ((t (:foreground "Grey50" :underline t)))) + '(viper-minibuffer-emacs-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-minibuffer-insert-face ((t (:background "pink" :foreground "Black")))) + '(viper-minibuffer-vi-face ((t (:background "grey" :foreground "DarkGreen")))) + '(viper-replace-overlay-face ((t (:background "darkseagreen2" :foreground "Black")))) + '(viper-search-face ((t (:background "khaki" :foreground "Black")))) + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85")))) + '(woman-addition-face ((t (:foreground "orange")))) + '(woman-bold-face ((t (:bold t :foreground "blue" :weight bold)))) + '(woman-italic-face ((t (:italic t :foreground "red" :underline t :slant italic)))) + '(woman-unknown-face ((t (:foreground "brown")))) + '(zmacs-region ((t (:background "lightgoldenrod2"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'whateveryouwant) + +;;; whateveryouwant-theme.el ends here diff --git a/replace-colorthemes/wheat-theme.el b/replace-colorthemes/wheat-theme.el new file mode 100644 index 0000000..87847cb --- /dev/null +++ b/replace-colorthemes/wheat-theme.el @@ -0,0 +1,274 @@ +;;; wheat-theme.el --- wheat theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of wheat theme from `color-themes' + +;;; Code: + +(deftheme wheat + "wheat theme") + +(custom-theme-set-faces + 'wheat + + '(default ((t (:background "Wheat" :foreground "black")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:foreground "black")))) + + '(Man-overstrike-face ((t (:bold t)))) + '(Man-underline-face ((t (:underline t)))) + '(apropos-keybinding-face ((t (:underline t)))) + '(apropos-label-face ((t (:italic t)))) + '(apropos-match-face ((t (:background "paleturquoise")))) + '(apropos-property-face ((t (:bold t :italic t)))) + '(apropos-symbol-face ((t (:bold t)))) + '(goto-address-mail-face ((t (:italic t)))) + '(goto-address-mail-mouse-face ((t (:background "paleturquoise")))) + '(goto-address-url-face ((t (:bold t)))) + '(goto-address-url-mouse-face ((t (:background "darkseagreen2")))) + '(help-highlight-face ((t (:underline t)))) + '(list-matching-lines-face ((t (:bold t)))) + '(view-highlight-face ((t (:background "darkseagreen2")))) + + + '(default ((t (nil)))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:bold t :italic t)))) + '(calendar-today-face ((t (:underline t)))) + '(cperl-array-face ((t (:foreground "Blue" :background "lightyellow2" :bold t)))) + '(cperl-hash-face ((t (:foreground "Red" :background "lightyellow2" :bold t :italic t)))) + '(cperl-nonoverridable-face ((t (:foreground "chartreuse3")))) + '(custom-button-face ((t (nil)))) + '(custom-changed-face ((t (:foreground "white" :background "blue")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:foreground "blue" :underline t)))) + '(custom-group-tag-face-1 ((t (:foreground "red" :underline t)))) + '(custom-invalid-face ((t (:foreground "yellow" :background "red")))) + '(custom-modified-face ((t (:foreground "white" :background "blue")))) + '(custom-rogue-face ((t (:foreground "pink" :background "black")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:foreground "blue" :background "white")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:bold t :underline t)))) + '(custom-variable-tag-face ((t (:foreground "blue" :underline t)))) + '(diary-face ((t (:foreground "red")))) + '(ediff-current-diff-face-A ((t (:foreground "firebrick" :background "pale green")))) + '(ediff-current-diff-face-Ancestor ((t (:foreground "Black" :background "VioletRed")))) + '(ediff-current-diff-face-B ((t (:foreground "DarkOrchid" :background "Yellow")))) + '(ediff-current-diff-face-C ((t (:foreground "Navy" :background "Pink")))) + '(ediff-even-diff-face-A ((t (:foreground "Black" :background "light grey")))) + '(ediff-even-diff-face-Ancestor ((t (:foreground "White" :background "Grey")))) + '(ediff-even-diff-face-B ((t (:foreground "White" :background "Grey")))) + '(ediff-even-diff-face-C ((t (:foreground "Black" :background "light grey")))) + '(ediff-fine-diff-face-A ((t (:foreground "Navy" :background "sky blue")))) + '(ediff-fine-diff-face-Ancestor ((t (:foreground "Black" :background "Green")))) + '(ediff-fine-diff-face-B ((t (:foreground "Black" :background "cyan")))) + '(ediff-fine-diff-face-C ((t (:foreground "Black" :background "Turquoise")))) + '(ediff-odd-diff-face-A ((t (:foreground "White" :background "Grey")))) + '(ediff-odd-diff-face-Ancestor ((t (:foreground "Black" :background "light grey")))) + '(ediff-odd-diff-face-B ((t (:foreground "Black" :background "light grey")))) + '(ediff-odd-diff-face-C ((t (:foreground "White" :background "Grey")))) + '(eshell-ls-archive-face ((t (:foreground "Orchid" :bold t)))) + '(eshell-ls-backup-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-clutter-face ((t (:foreground "OrangeRed" :bold t)))) + '(eshell-ls-directory-face ((t (:foreground "Blue" :bold t)))) + '(eshell-ls-executable-face ((t (:foreground "ForestGreen" :bold t)))) + '(eshell-ls-missing-face ((t (:foreground "Red" :bold t)))) + '(eshell-ls-product-face ((t (:foreground "OrangeRed")))) + '(eshell-ls-readonly-face ((t (:foreground "Brown")))) + '(eshell-ls-special-face ((t (:foreground "Magenta" :bold t)))) + '(eshell-ls-symlink-face ((t (:foreground "DarkCyan" :bold t)))) + '(eshell-ls-unreadable-face ((t (:foreground "Grey30")))) + '(eshell-prompt-face ((t (:foreground "Red" :bold t)))) + '(eshell-test-failed-face ((t (:foreground "OrangeRed" :bold t)))) + '(eshell-test-ok-face ((t (:foreground "Green" :bold t)))) + '(excerpt ((t (:italic t)))) + '(fixed ((t (:bold t)))) + '(flyspell-duplicate-face ((t (:foreground "Gold3" :bold t :underline t)))) + '(flyspell-incorrect-face ((t (:foreground "OrangeRed" :bold t :underline t)))) + '(font-lock-builtin-face ((t (:foreground "Orchid")))) + '(font-lock-comment-face ((t (:foreground "Firebrick")))) + '(font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(font-lock-function-name-face ((t (:foreground "Blue")))) + '(font-lock-keyword-face ((t (:foreground "Purple")))) + '(font-lock-string-face ((t (:foreground "RosyBrown")))) + '(font-lock-type-face ((t (:foreground "ForestGreen")))) + '(font-lock-variable-name-face ((t (:foreground "DarkGoldenrod")))) + '(font-lock-warning-face ((t (:foreground "Red" :bold t)))) + '(fringe ((t (:background "grey95")))) + '(gnus-cite-attribution-face ((t (:italic t)))) + '(gnus-cite-face-1 ((t (:foreground "MidnightBlue")))) + '(gnus-cite-face-10 ((t (:foreground "medium purple")))) + '(gnus-cite-face-11 ((t (:foreground "turquoise")))) + '(gnus-cite-face-2 ((t (:foreground "firebrick")))) + '(gnus-cite-face-3 ((t (:foreground "dark green")))) + '(gnus-cite-face-4 ((t (:foreground "OrangeRed")))) + '(gnus-cite-face-5 ((t (:foreground "dark khaki")))) + '(gnus-cite-face-6 ((t (:foreground "dark violet")))) + '(gnus-cite-face-7 ((t (:foreground "SteelBlue4")))) + '(gnus-cite-face-8 ((t (:foreground "magenta")))) + '(gnus-cite-face-9 ((t (:foreground "violet")))) + '(gnus-emphasis-bold ((t (:bold t)))) + '(gnus-emphasis-bold-italic ((t (:bold t :italic t)))) + '(gnus-emphasis-italic ((t (:italic t)))) + '(gnus-emphasis-underline ((t (:underline t)))) + '(gnus-emphasis-underline-bold ((t (:bold t :underline t)))) + '(gnus-emphasis-underline-bold-italic ((t (:bold t :italic t :underline t)))) + '(gnus-emphasis-underline-italic ((t (:italic t :underline t)))) + '(gnus-group-mail-1-empty-face ((t (:foreground "DeepPink3")))) + '(gnus-group-mail-1-face ((t (:foreground "DeepPink3" :bold t)))) + '(gnus-group-mail-2-empty-face ((t (:foreground "HotPink3")))) + '(gnus-group-mail-2-face ((t (:foreground "HotPink3" :bold t)))) + '(gnus-group-mail-3-empty-face ((t (:foreground "magenta4")))) + '(gnus-group-mail-3-face ((t (:foreground "magenta4" :bold t)))) + '(gnus-group-mail-low-empty-face ((t (:foreground "DeepPink4")))) + '(gnus-group-mail-low-face ((t (:foreground "DeepPink4" :bold t)))) + '(gnus-group-news-1-empty-face ((t (:foreground "ForestGreen")))) + '(gnus-group-news-1-face ((t (:foreground "ForestGreen" :bold t)))) + '(gnus-group-news-2-empty-face ((t (:foreground "CadetBlue4")))) + '(gnus-group-news-2-face ((t (:foreground "CadetBlue4" :bold t)))) + '(gnus-group-news-3-empty-face ((t (nil)))) + '(gnus-group-news-3-face ((t (:bold t)))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkGreen")))) + '(gnus-group-news-low-face ((t (:foreground "DarkGreen" :bold t)))) + '(gnus-header-content-face ((t (:foreground "indianred4" :italic t)))) + '(gnus-header-from-face ((t (:foreground "red3")))) + '(gnus-header-name-face ((t (:foreground "maroon")))) + '(gnus-header-newsgroups-face ((t (:foreground "MidnightBlue" :italic t)))) + '(gnus-header-subject-face ((t (:foreground "red4")))) + '(gnus-signature-face ((t (:italic t)))) + '(gnus-splash-face ((t (:foreground "ForestGreen")))) + '(gnus-summary-cancelled-face ((t (:foreground "yellow" :background "black")))) + '(gnus-summary-high-ancient-face ((t (:foreground "RoyalBlue" :bold t)))) + '(gnus-summary-high-read-face ((t (:foreground "DarkGreen" :bold t)))) + '(gnus-summary-high-ticked-face ((t (:foreground "firebrick" :bold t)))) + '(gnus-summary-high-unread-face ((t (:bold t)))) + '(gnus-summary-low-ancient-face ((t (:foreground "RoyalBlue" :italic t)))) + '(gnus-summary-low-read-face ((t (:foreground "DarkGreen" :italic t)))) + '(gnus-summary-low-ticked-face ((t (:foreground "firebrick" :italic t)))) + '(gnus-summary-low-unread-face ((t (:italic t)))) + '(gnus-summary-normal-ancient-face ((t (:foreground "RoyalBlue")))) + '(gnus-summary-normal-read-face ((t (:foreground "DarkGreen")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "firebrick")))) + '(gnus-summary-normal-unread-face ((t (nil)))) + '(gnus-summary-selected-face ((t (:underline t)))) + '(highlight ((t (:background "darkseagreen2")))) + '(highlight-changes-delete-face ((t (:foreground "red" :underline t)))) + '(highlight-changes-face ((t (:foreground "red")))) + '(highline-face ((t (:background "paleturquoise")))) + '(holiday-face ((t (:background "pink")))) + '(info-menu-5 ((t (:underline t)))) + '(info-node ((t (:bold t :italic t)))) + '(info-xref ((t (:bold t)))) + '(italic ((t (:italic t)))) + '(makefile-space-face ((t (:background "hotpink")))) + '(message-cited-text-face ((t (:foreground "red")))) + '(message-header-cc-face ((t (:foreground "MidnightBlue")))) + '(message-header-name-face ((t (:foreground "cornflower blue")))) + '(message-header-newsgroups-face ((t (:foreground "blue4" :bold t :italic t)))) + '(message-header-other-face ((t (:foreground "steel blue")))) + '(message-header-subject-face ((t (:foreground "navy blue" :bold t)))) + '(message-header-to-face ((t (:foreground "MidnightBlue" :bold t)))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-separator-face ((t (:foreground "brown")))) + '(mode-line ((t (:foreground "white" :background "black")))) + '(mode-line-buffer-id ((t (:foreground "white" :background "black")))) + '(mode-line-mousable ((t (:foreground "white" :background "black")))) + '(mode-line-mousable-minor-mode ((t (:foreground "white" :background "black")))) + '(region ((t (:background "gray")))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:foreground "white" :background "purple")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(term-black ((t (:foreground "black")))) + '(term-blackbg ((t (:background "black")))) + '(term-blue ((t (:foreground "blue")))) + '(term-bluebg ((t (:background "blue")))) + '(term-bold ((t (:bold t)))) + '(term-cyan ((t (:foreground "cyan")))) + '(term-cyanbg ((t (:background "cyan")))) + '(term-default-bg ((t (nil)))) + '(term-default-bg-inv ((t (nil)))) + '(term-default-fg ((t (nil)))) + '(term-default-fg-inv ((t (nil)))) + '(term-green ((t (:foreground "green")))) + '(term-greenbg ((t (:background "green")))) + '(term-invisible ((t (nil)))) + '(term-invisible-inv ((t (nil)))) + '(term-magenta ((t (:foreground "magenta")))) + '(term-magentabg ((t (:background "magenta")))) + '(term-red ((t (:foreground "red")))) + '(term-redbg ((t (:background "red")))) + '(term-underline ((t (:underline t)))) + '(term-white ((t (:foreground "white")))) + '(term-whitebg ((t (:background "white")))) + '(term-yellow ((t (:foreground "yellow")))) + '(term-yellowbg ((t (:background "yellow")))) + '(underline ((t (:underline t)))) + '(vcursor ((t (:foreground "blue" :background "cyan" :underline t)))) + '(vhdl-font-lock-attribute-face ((t (:foreground "Orchid")))) + '(vhdl-font-lock-directive-face ((t (:foreground "CadetBlue")))) + '(vhdl-font-lock-enumvalue-face ((t (:foreground "Gold4")))) + '(vhdl-font-lock-function-face ((t (:foreground "Orchid4")))) + '(vhdl-font-lock-prompt-face ((t (:foreground "Red" :bold t)))) + '(vhdl-font-lock-reserved-words-face ((t (:foreground "Orange" :bold t)))) + '(vhdl-font-lock-translate-off-face ((t (:background "LightGray")))) + '(vhdl-speedbar-architecture-face ((t (:foreground "Blue")))) + '(vhdl-speedbar-architecture-selected-face ((t (:foreground "Blue" :underline t)))) + '(vhdl-speedbar-configuration-face ((t (:foreground "DarkGoldenrod")))) + '(vhdl-speedbar-configuration-selected-face ((t (:foreground "DarkGoldenrod" :underline t)))) + '(vhdl-speedbar-entity-face ((t (:foreground "ForestGreen")))) + '(vhdl-speedbar-entity-selected-face ((t (:foreground "ForestGreen" :underline t)))) + '(vhdl-speedbar-instantiation-face ((t (:foreground "Brown")))) + '(vhdl-speedbar-instantiation-selected-face ((t (:foreground "Brown" :underline t)))) + '(vhdl-speedbar-package-face ((t (:foreground "Grey50")))) + '(vhdl-speedbar-package-selected-face ((t (:foreground "Grey50" :underline t)))) + '(viper-minibuffer-emacs-face ((t (:foreground "Black" :background "darkseagreen2")))) + '(viper-minibuffer-insert-face ((t (:foreground "Black" :background "pink")))) + '(viper-minibuffer-vi-face ((t (:foreground "DarkGreen" :background "grey")))) + '(viper-replace-overlay-face ((t (:foreground "Black" :background "darkseagreen2")))) + '(viper-search-face ((t (:foreground "Black" :background "khaki")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'wheat) + +;;; wheat-theme.el ends here diff --git a/replace-colorthemes/word-perfect-theme.el b/replace-colorthemes/word-perfect-theme.el new file mode 100644 index 0000000..8c9e004 --- /dev/null +++ b/replace-colorthemes/word-perfect-theme.el @@ -0,0 +1,154 @@ +;;; word-perfect-theme.el --- word-perfect theme + +;; Copyright (C) 2001 by Thomas Gehrlein +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of word-perfect theme from `color-themes' + +;;; Code: + +(deftheme word-perfect + "word-perfect theme") + +(custom-theme-set-faces + 'word-perfect + + '(default ((t (:background "blue4" :foreground "white")))) + '(mouse ((t (:foreground "black")))) + '(cursor ((t (:background "gold")))) + '(border ((t (:foreground "black")))) + + '(ecb-source-in-directories-buffer-face ((t (:foreground "LightBlue1")))) + '(gnus-mouse-face ((t (:background "steel blue" :foreground "black")))) + '(goto-address-mail-face ((t (:italic t :foreground "yellow2")))) + '(goto-address-mail-mouse-face ((t (:background "yellow2" :foreground "black")))) + '(goto-address-url-face ((t (:bold t :foreground "white")))) + '(goto-address-url-mouse-face ((t (:background "steel blue" :foreground "black")))) + '(list-matching-lines-face ((t (:bold t :foreground "white")))) + '(view-highlight-face ((t (:background "steel blue" :foreground "black")))) + + '(bbdb-field-name ((t (:foreground "lime green")))) + '(bbdb-field-value ((t (:foreground "white")))) + '(bbdb-name ((t (:underline t :foreground "lime green")))) + '(bold ((t (:bold t :foreground "white")))) + '(bold-italic ((t (:italic t :bold t :foreground "yellow")))) + '(calendar-today-face ((t (:underline t :foreground "deep sky blue")))) + '(diary-face ((t (:foreground "gold")))) + '(ecb-sources-face ((t (:foreground "LightBlue1")))) + '(edb-inter-field-face ((t (:foreground "deep sky blue")))) + '(edb-normal-summary-face ((t (:foreground "gold")))) + '(emacs-wiki-bad-link-face ((t (:underline "coral" :bold t :foreground "coral")))) + '(emacs-wiki-link-face ((t (:underline "cyan" :bold t :foreground "cyan")))) + '(font-lock-builtin-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-comment-face ((t (:foreground "deep sky blue")))) + '(font-lock-constant-face ((t (:foreground "lime green")))) + '(font-lock-doc-face ((t (:foreground "gold")))) + '(font-lock-doc-string-face ((t (:foreground "gold")))) + '(font-lock-function-name-face ((t (:background "blue4" :foreground "IndianRed")))) + '(font-lock-keyword-face ((t (:foreground "lime green")))) + '(font-lock-preprocessor-face ((t (:foreground "lime green")))) + '(font-lock-reference-face ((t (:foreground "LightSteelBlue")))) + '(font-lock-string-face ((t (:foreground "gold")))) + '(font-lock-type-face ((t (:foreground "lime green")))) + '(font-lock-variable-name-face ((t (:foreground "LightGoldenrod")))) + '(font-lock-warning-face ((t (:bold t :foreground "firebrick")))) + '(gnus-emphasis-bold ((t (:foreground "yellow2")))) + '(gnus-emphasis-bold-italic ((t (:foreground "yellow2")))) + '(gnus-emphasis-italic ((t (:foreground "yellow2")))) + '(gnus-emphasis-underline ((t (:foreground "yellow2")))) + '(gnus-emphasis-underline-bold ((t (:foreground "yellow2")))) + '(gnus-emphasis-underline-bold-italic ((t (:foreground "yellow2")))) + '(gnus-emphasis-underline-italic ((t (:foreground "yellow2")))) + '(gnus-group-mail-1-empty-face ((t (:foreground "aquamarine1")))) + '(gnus-group-mail-1-face ((t (:bold t :foreground "aquamarine1")))) + '(gnus-group-mail-2-empty-face ((t (:foreground "aquamarine2")))) + '(gnus-group-mail-2-face ((t (:bold t :foreground "aquamarine2")))) + '(gnus-group-mail-3-empty-face ((t (:foreground "aquamarine3")))) + '(gnus-group-mail-3-face ((t (:bold t :foreground "aquamarine3")))) + '(gnus-group-mail-low-empty-face ((t (:foreground "aquamarine4")))) + '(gnus-group-mail-low-face ((t (:bold t :foreground "aquamarine4")))) + '(gnus-group-news-1-empty-face ((t (:foreground "PaleTurquoise")))) + '(gnus-group-news-1-face ((t (:bold t :foreground "PaleTurquoise")))) + '(gnus-group-news-2-empty-face ((t (:foreground "turquoise")))) + '(gnus-group-news-2-face ((t (:bold t :foreground "turquoise")))) + '(gnus-group-news-3-empty-face ((t (:foreground "deep sky blue")))) + '(gnus-group-news-3-face ((t (:bold t :foreground "deep sky blue")))) + '(gnus-group-news-low-empty-face ((t (:foreground "DarkTurquoise")))) + '(gnus-group-news-low-face ((t (:bold t :foreground "DarkTurquoise")))) + '(gnus-header-content-face ((t (:foreground "gold")))) + '(gnus-header-from-face ((t (:foreground "gold")))) + '(gnus-header-name-face ((t (:foreground "deep sky blue")))) + '(gnus-header-newsgroups-face ((t (:foreground "gold")))) + '(gnus-header-subject-face ((t (:foreground "gold")))) + '(gnus-signature-face ((t (:foreground "gold")))) + '(gnus-splash-face ((t (:foreground "firebrick")))) + '(gnus-summary-cancelled-face ((t (:background "black" :foreground "deep sky blue")))) + '(gnus-summary-high-ancient-face ((t (:bold t :foreground "deep sky blue")))) + '(gnus-summary-high-read-face ((t (:bold t :foreground "deep sky blue")))) + '(gnus-summary-high-ticked-face ((t (:bold t :foreground "deep sky blue")))) + '(gnus-summary-high-unread-face ((t (:bold t :foreground "lime green")))) + '(gnus-summary-low-ancient-face ((t (:italic t :foreground "deep sky blue")))) + '(gnus-summary-low-read-face ((t (:italic t :foreground "deep sky blue")))) + '(gnus-summary-low-ticked-face ((t (:italic t :foreground "deep sky blue")))) + '(gnus-summary-low-unread-face ((t (:italic t :foreground "lime green")))) + '(gnus-summary-normal-ancient-face ((t (:foreground "deep sky blue")))) + '(gnus-summary-normal-read-face ((t (:foreground "deep sky blue")))) + '(gnus-summary-normal-ticked-face ((t (:foreground "deep sky blue")))) + '(gnus-summary-normal-unread-face ((t (:foreground "lime green")))) + '(gnus-summary-selected-face ((t (:underline t :foreground "gold")))) + '(highlight ((t (:background "steel blue" :foreground "black")))) + '(holiday-face ((t (:background "blue4" :foreground "IndianRed1")))) + '(info-menu-5 ((t (:underline t :foreground "gold")))) + '(info-node ((t (:italic t :bold t :foreground "gold")))) + '(info-xref ((t (:bold t :foreground "gold")))) + '(isearch ((t (:background "firebrick" :foreground "white")))) + '(italic ((t (:italic t :foreground "yellow2")))) + '(message-cited-text-face ((t (:foreground "gold")))) + '(message-header-cc-face ((t (:bold t :foreground "green4")))) + '(message-header-name-face ((t (:foreground "deep sky blue")))) + '(message-header-newsgroups-face ((t (:italic t :bold t :foreground "gold")))) + '(message-header-other-face ((t (:foreground "gold")))) + '(message-header-subject-face ((t (:foreground "gold")))) + '(message-header-to-face ((t (:bold t :foreground "gold")))) + '(message-header-xheader-face ((t (:foreground "blue")))) + '(message-separator-face ((t (:foreground "lime green")))) + '(mode-line ((t (:foreground "white" :background "black")))) + '(mode-line-buffer-id ((t (:foreground "white" :background "black")))) + '(mode-line-mousable ((t (:foreground "white" :background "black")))) + '(mode-line-mousable-minor-mode ((t (:foreground "white" :background "black")))) + '(overlay-empty-face ((t (nil)))) + '(primary-selection ((t (:background "firebrick" :foreground "white")))) + '(region ((t (:background "firebrick" :foreground "white")))) + '(secondary-selection ((t (:background "yellow2" :foreground "black")))) + '(semantic-dirty-token-face ((t (:background "gray10")))) + '(show-paren-match-face ((t (:background "deep sky blue" :foreground "black")))) + '(show-paren-mismatch-face ((t (:background "firebrick" :foreground "white")))) + '(underline ((t (:underline t :background "blue4" :foreground "white"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'word-perfect) + +;;; word-perfect-theme.el ends here diff --git a/replace-colorthemes/xemacs-theme.el b/replace-colorthemes/xemacs-theme.el new file mode 100644 index 0000000..0ddac72 --- /dev/null +++ b/replace-colorthemes/xemacs-theme.el @@ -0,0 +1,121 @@ +;;; xemacs-theme.el --- xemacs theme + +;; Copyright (C) 2005, 2006 Xavier Maillard +;; Copyright (C) 2005, 2006 Brian Palmer +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of xemacs theme from `color-themes' + +;;; Code: + +(deftheme xemacs + "xemacs theme") + +(custom-theme-set-faces + 'xemacs + + '(default ((t (:background "gray80" :foreground "black")))) + '(cursor ((t (:background "Red3")))) + '(border ((t (:foreground "black")))) + + '(blue ((t (:foreground "blue")))) + '(bold ((t (:bold t)))) + '(bold-italic ((t (:italic t :bold t)))) + '(border-glyph ((t (nil)))) + '(custom-button-face ((t (:bold t)))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:underline t)))) + '(custom-group-tag-face ((t (:underline t :foreground "blue")))) + '(custom-group-tag-face-1 ((t (:underline t :foreground "red")))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:underline t :bold t)))) + '(custom-variable-tag-face ((t (:underline t :foreground "blue")))) + '(dired-face-boring ((t (:foreground "Gray65")))) + '(dired-face-directory ((t (:bold t)))) + '(dired-face-executable ((t (:foreground "SeaGreen")))) + '(dired-face-flagged ((t (:background "LightSlateGray")))) + '(dired-face-marked ((t (:background "PaleVioletRed")))) + '(dired-face-permissions ((t (:background "grey75" :foreground "black")))) + '(dired-face-setuid ((t (:foreground "Red")))) + '(dired-face-socket ((t (:foreground "magenta")))) + '(dired-face-symlink ((t (:foreground "cyan")))) + '(font-lock-builtin-face ((t (:foreground "red3")))) + '(font-lock-comment-face ((t (:foreground "blue4")))) + '(font-lock-constant-face ((t (:foreground "red3")))) + '(font-lock-doc-string-face ((t (:foreground "green4")))) + '(font-lock-function-name-face ((t (:foreground "brown4")))) + '(font-lock-keyword-face ((t (:foreground "red4")))) + '(font-lock-preprocessor-face ((t (:foreground "blue3")))) + '(font-lock-reference-face ((t (:foreground "red3")))) + '(font-lock-string-face ((t (:foreground "green4")))) + '(font-lock-type-face ((t (:foreground "steelblue")))) + '(font-lock-variable-name-face ((t (:foreground "magenta4")))) + '(font-lock-warning-face ((t (:bold t :foreground "Red")))) + '(green ((t (:foreground "green")))) + '(gui-button-face ((t (:background "grey75" :foreground "black")))) + '(gui-element ((t (:background "Gray80")))) + '(highlight ((t (:background "darkseagreen2")))) + '(info-node ((t (:italic t :bold t)))) + '(info-xref ((t (:bold t)))) + '(isearch ((t (:background "paleturquoise")))) + '(italic ((t (:italic t)))) + '(left-margin ((t (nil)))) + '(list-mode-item-selected ((t (:background "gray68")))) + '(mode-line ((t (:background "Gray80")))) + '(mode-line-buffer-id ((t (:background "Gray80" :foreground "blue4")))) + '(mode-line-mousable ((t (:background "Gray80" :foreground "firebrick")))) + '(mode-line-mousable-minor-mode ((t (:background "Gray80" :foreground "green4")))) + '(paren-blink-off ((t (:foreground "gray80")))) + '(paren-match ((t (:background "darkseagreen2")))) + '(paren-mismatch ((t (:background "DeepPink" :foreground "black")))) + '(pointer ((t (nil)))) + '(primary-selection ((t (:background "gray65")))) + '(red ((t (:foreground "red")))) + '(region ((t (:background "gray65")))) + '(right-margin ((t (nil)))) + '(secondary-selection ((t (:background "paleturquoise")))) + '(text-cursor ((t (:background "Red3" :foreground "gray80")))) + '(toolbar ((t (:background "Gray80")))) + '(underline ((t (:underline t)))) + '(vertical-divider ((t (:background "Gray80")))) + '(widget-button-face ((t (:bold t)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(yellow ((t (:foreground "yellow")))) + '(zmacs-region ((t (:background "gray65"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'xemacs) + +;;; xemacs-theme.el ends here diff --git a/replace-colorthemes/xp-theme.el b/replace-colorthemes/xp-theme.el new file mode 100644 index 0000000..e2c0efb --- /dev/null +++ b/replace-colorthemes/xp-theme.el @@ -0,0 +1,191 @@ +;;; xp-theme.el --- xp theme + +;; Copyright (C) 2002 by Girish Bharadwaj +;; Copyright (C) 2013 by Syohei YOSHIDA + +;; Author: Syohei YOSHIDA +;; URL: https://github.com/emacs-jp/replace-colorthemes +;; Version: 0.01 + +;; 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 . + +;;; Commentary: +;; +;; Port of xp theme from `color-themes' + +;;; Code: + +(deftheme xp + "xp theme") + +(custom-theme-set-faces + 'xp + + '(default ((t (:background "lightyellow2" :foreground "gray20")))) + '(mouse ((t (:background "black")))) + '(cursor ((t (:background "black")))) + '(border ((t (:background "black")))) + + '(help-highlight-face ((t (:underline t)))) + '(list-matching-lines-face ((t (:bold t :weight bold)))) + '(view-highlight-face ((t (:background "darkseagreen2")))) + '(widget-mouse-face ((t (:background "darkseagreen2")))) + + '(bg:erc-color-face0 ((t (:background "White")))) + '(bg:erc-color-face1 ((t (:background "black")))) + '(bg:erc-color-face10 ((t (:background "lightblue1")))) + '(bg:erc-color-face11 ((t (:background "cyan")))) + '(bg:erc-color-face12 ((t (:background "blue")))) + '(bg:erc-color-face13 ((t (:background "deeppink")))) + '(bg:erc-color-face14 ((t (:background "gray50")))) + '(bg:erc-color-face15 ((t (:background "gray90")))) + '(bg:erc-color-face2 ((t (:background "blue4")))) + '(bg:erc-color-face3 ((t (:background "green4")))) + '(bg:erc-color-face4 ((t (:background "red")))) + '(bg:erc-color-face5 ((t (:background "brown")))) + '(bg:erc-color-face6 ((t (:background "purple")))) + '(bg:erc-color-face7 ((t (:background "orange")))) + '(bg:erc-color-face8 ((t (:background "yellow")))) + '(bg:erc-color-face9 ((t (:background "green")))) + '(bold ((t (:bold t :weight bold)))) + '(bold-italic ((t (:italic t :bold t :slant italic :weight bold)))) + '(button ((t (:underline t)))) + '(comint-highlight-input ((t (:bold t :weight bold)))) + '(comint-highlight-prompt ((t (:foreground "dark blue")))) + '(custom-button-face ((t (:background "lightgrey" :foreground "black" + :box (:line-width 2 :style released-button))))) + '(custom-button-pressed-face ((t (:background "lightgrey" :foreground "black" + :box (:line-width 2 :style pressed-button))))) + '(custom-changed-face ((t (:background "blue" :foreground "white")))) + '(custom-comment-face ((t (:background "gray85")))) + '(custom-comment-tag-face ((t (:foreground "blue4")))) + '(custom-documentation-face ((t (nil)))) + '(custom-face-tag-face ((t (:bold t :family "helv" :weight bold :height 1.2)))) + '(custom-group-tag-face ((t (:bold t :foreground "blue" :weight bold :height 1.2)))) + '(custom-group-tag-face-1 ((t (:bold t :family "helv" :foreground "red" :weight bold :height 1.2)))) + '(custom-invalid-face ((t (:background "red" :foreground "yellow")))) + '(custom-modified-face ((t (:background "blue" :foreground "white")))) + '(custom-rogue-face ((t (:background "black" :foreground "pink")))) + '(custom-saved-face ((t (:underline t)))) + '(custom-set-face ((t (:background "white" :foreground "blue")))) + '(custom-state-face ((t (:foreground "dark green")))) + '(custom-variable-button-face ((t (:bold t :underline t :weight bold)))) + '(custom-variable-tag-face ((t (:bold t :family "helv" :foreground "blue" :weight bold :height 1.2)))) + '(erc-action-face ((t (:bold t :weight bold)))) + '(erc-bold-face ((t (:bold t :weight bold)))) + '(erc-default-face ((t (nil)))) + '(erc-direct-msg-face ((t (:foreground "IndianRed")))) + '(erc-error-face ((t (:background "Red" :foreground "White")))) + '(erc-input-face ((t (:foreground "brown")))) + '(erc-inverse-face ((t (:background "Black" :foreground "White")))) + '(erc-notice-face ((t (:bold t :foreground "SlateBlue" :weight bold)))) + '(erc-prompt-face ((t (:bold t :background "lightBlue2" :foreground "Black" :weight bold)))) + '(erc-timestamp-face ((t (:bold t :foreground "green" :weight bold)))) + '(erc-underline-face ((t (:underline t)))) + '(fg:erc-color-face0 ((t (:foreground "White")))) + '(fg:erc-color-face1 ((t (:foreground "black")))) + '(fg:erc-color-face10 ((t (:foreground "lightblue1")))) + '(fg:erc-color-face11 ((t (:foreground "cyan")))) + '(fg:erc-color-face12 ((t (:foreground "blue")))) + '(fg:erc-color-face13 ((t (:foreground "deeppink")))) + '(fg:erc-color-face14 ((t (:foreground "gray50")))) + '(fg:erc-color-face15 ((t (:foreground "gray90")))) + '(fg:erc-color-face2 ((t (:foreground "blue4")))) + '(fg:erc-color-face3 ((t (:foreground "green4")))) + '(fg:erc-color-face4 ((t (:foreground "red")))) + '(fg:erc-color-face5 ((t (:foreground "brown")))) + '(fg:erc-color-face6 ((t (:foreground "purple")))) + '(fg:erc-color-face7 ((t (:foreground "orange")))) + '(fg:erc-color-face8 ((t (:foreground "yellow")))) + '(fg:erc-color-face9 ((t (:foreground "green")))) + '(fixed-pitch ((t (:family "courier")))) + '(font-lock-builtin-face ((t (:foreground "magenta3" :underline t :height 0.9)))) + '(font-lock-comment-face ((t (:italic t :foreground "gray60" :slant oblique :height 0.9)))) + '(font-lock-constant-face ((t (:bold t :foreground "medium purple" :weight bold :height 0.9)))) + '(font-lock-function-name-face ((t (:bold t :foreground "black" :weight bold)))) + '(font-lock-keyword-face ((t (:bold t :foreground "blue" :weight bold)))) + '(font-lock-string-face ((t (:foreground "red" :height 0.9)))) + '(font-lock-type-face ((t (:foreground "Royalblue")))) + '(font-lock-variable-name-face ((t (:bold t :foreground "maroon" :weight bold :height 0.9)))) + '(font-lock-warning-face ((t (:bold t :foreground "Red" :weight bold)))) + '(fringe ((t (:background "dodgerblue")))) + '(header-line ((t (:underline "red" :overline "red" :background "grey90" :foreground "grey20" :box nil)))) + '(highlight ((t (:background "darkseagreen2")))) + '(isearch ((t (:background "magenta2" :foreground "lightskyblue1")))) + '(isearch-lazy-highlight-face ((t (:background "paleturquoise")))) + '(italic ((t (:italic t :slant italic)))) + '(jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan")))) + '(jde-db-active-breakpoint-face ((t (:background "red" :foreground "black")))) + '(jde-db-requested-breakpoint-face ((t (:background "yellow" :foreground "black")))) + '(jde-db-spec-breakpoint-face ((t (:background "green" :foreground "black")))) + '(jde-java-font-lock-api-face ((t (:foreground "dark goldenrod")))) + '(jde-java-font-lock-bold-face ((t (:bold t :weight bold)))) + '(jde-java-font-lock-code-face ((t (nil)))) + '(jde-java-font-lock-constant-face ((t (:foreground "CadetBlue")))) + '(jde-java-font-lock-doc-tag-face ((t (:foreground "green4")))) + '(jde-java-font-lock-italic-face ((t (:italic t :slant italic)))) + '(jde-java-font-lock-link-face ((t (:foreground "cadetblue" :underline t :slant normal)))) + '(jde-java-font-lock-modifier-face ((t (:foreground "Orchid")))) + '(jde-java-font-lock-number-face ((t (:foreground "RosyBrown")))) + '(jde-java-font-lock-operator-face ((t (:foreground "medium blue")))) + '(jde-java-font-lock-package-face ((t (:foreground "blue3")))) + '(jde-java-font-lock-pre-face ((t (nil)))) + '(jde-java-font-lock-underline-face ((t (:underline t)))) + '(menu ((t (nil)))) + '(minibuffer-prompt ((t (:foreground "dark blue")))) + '(mode-line ((t (:background "dodgerblue" :foreground "black" :overline "red" :underline "red")))) + '(mode-line-buffer-id ((t (:background "dodgerblue" :foreground "black")))) + '(mode-line-mousable ((t (:background "dodgerblue" :foreground "black")))) + '(mode-line-mousable-minor-mode ((t (:background "dodgerblue" :foreground "black")))) + '(mode-line-inactive ((t (:italic t :underline "red" :overline "red" :background "white" :foreground "cadetblue" :box (:line-width -1 :color "grey75") :slant oblique :weight light)))) + '(primary-selection ((t (:background "lightgoldenrod2")))) + '(region ((t (:background "lightgoldenrod2")))) + '(scroll-bar ((t (nil)))) + '(secondary-selection ((t (:background "yellow")))) + '(semantic-dirty-token-face ((t (:background "lightyellow")))) + '(semantic-unmatched-syntax-face ((t (:underline "red")))) + '(senator-intangible-face ((t (:foreground "gray25")))) + '(senator-momentary-highlight-face ((t (:background "gray70")))) + '(senator-read-only-face ((t (:background "#CCBBBB")))) + '(show-paren-match-face ((t (:background "turquoise")))) + '(show-paren-mismatch-face ((t (:background "purple" :foreground "white")))) + '(speedbar-button-face ((t (:foreground "green4")))) + '(speedbar-directory-face ((t (:foreground "blue4")))) + '(speedbar-file-face ((t (:foreground "cyan4")))) + '(speedbar-highlight-face ((t (:background "green")))) + '(speedbar-selected-face ((t (:foreground "red" :underline t)))) + '(speedbar-tag-face ((t (:foreground "brown")))) + '(template-message-face ((t (:bold t :weight bold)))) + '(tool-bar ((t (:background "grey75" :foreground "black" + :box (:line-width 1 :style released-button))))) + '(tooltip ((t (:background "lightyellow" :foreground "black")))) + '(trailing-whitespace ((t (:background "red")))) + '(underline ((t (:underline t)))) + '(variable-pitch ((t (:family "helv")))) + '(widget-button-face ((t (:bold t :weight bold)))) + '(widget-button-pressed-face ((t (:foreground "red")))) + '(widget-documentation-face ((t (:foreground "dark green")))) + '(widget-field-face ((t (:background "gray85")))) + '(widget-inactive-face ((t (:foreground "dim gray")))) + '(widget-single-line-field-face ((t (:background "gray85")))) + '(zmacs-region ((t (:background "lightgoldenrod2"))))) + +;;;###autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'xp) + +;;; xp-theme.el ends here