emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* org-mode color schemes with white or light background and black foregroung
@ 2010-05-04 11:57 Daniel Martins
  2010-05-04 20:46 ` Sébastien Vauban
  2010-05-05  7:55 ` Sébastien Vauban
  0 siblings, 2 replies; 7+ messages in thread
From: Daniel Martins @ 2010-05-04 11:57 UTC (permalink / raw)
  To: Sébastien Vauban; +Cc: emacs-orgmode


[-- Attachment #1.1: Type: text/plain, Size: 2290 bytes --]

Some time ago Carsten sent a file with with his colours patterns with black
background.

I would like to know if someone has a similar pattern when using black
foregroung and a lighter backgroung (not necessarily white).

Could you share it with us?

Daniel



2010/5/4 Sébastien Vauban <wxhgmqzgwmuf@spammotel.com>

> Hi Mikael,
>
> Mikael Fornius wrote:
> > I have not tried it but I found this variable:
> >
> > org-agenda-deadline-faces
> >
> > "Faces for showing deadlines in the agenda."
> >
> > maybe it solves your problem?
>
> Excellent hint...
>
>
> I've customized it that way:
>
> --8<---------------cut here---------------start------------->8---
>     (setq org-agenda-deadline-faces
>          '((1.1 . sva-org-deadline-yesterday)
>            (1.0 . sva-org-deadline-today)
>            (0.5 . sva-org-deadline-tomorrow)
>            (0.0 . sva-org-deadline-later)))
> --8<---------------cut here---------------end--------------->8---
>
> and have added the following colors in my theme:
>
> --8<---------------cut here---------------start------------->8---
>      (sva-org-deadline-yesterday ((t (:foreground "white" :background
> "rgb:D8/00/00" :weight bold))))
>     (sva-org-deadline-today ((t (:foreground "white" :background
> "rgb:E9/A3/6A" :weight bold))))
>     (sva-org-deadline-tomorrow ((t (:foreground "black" :background
> "#B4F1B3" :weight bold))))
>     (sva-org-deadline-later ((t (:foreground "black" :background
> "#AACAFC"))))
> --8<---------------cut here---------------end--------------->8---
>
> And that quite works well following my needs.
>
> It's just a bit tricky to understand and correctly setup the "fractions"
> above, in the `org-agenda-deadline-faces'... It would be easy, and would
> make
> more sense, if we could directly enter "days specifications" there, instead
> of
> fractions (for example, "0" for today, "-1" for yesterday, and so on).
>
> But it works. And I thank you for your help.
>
> Best regards,
>  Seb
>
> --
> Sébastien Vauban
>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>

[-- Attachment #1.2: Type: text/html, Size: 3177 bytes --]

[-- Attachment #2: Type: text/plain, Size: 201 bytes --]

_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

^ permalink raw reply	[flat|nested] 7+ messages in thread

* Re: org-mode color schemes with white or light background and black foregroung
  2010-05-04 11:57 org-mode color schemes with white or light background and black foregroung Daniel Martins
@ 2010-05-04 20:46 ` Sébastien Vauban
  2010-05-05 16:00   ` Simao M
  2010-05-05  7:55 ` Sébastien Vauban
  1 sibling, 1 reply; 7+ messages in thread
From: Sébastien Vauban @ 2010-05-04 20:46 UTC (permalink / raw)
  To: emacs-orgmode-mXXj517/zsQ

Hi Daniel,

Daniel Martins wrote:
> Some time ago Carsten sent a file with with his colours patterns with black
> background.
>
> I would like to know if someone has a similar pattern when using black
> foregroung and a lighter backgroung (not necessarily white).
>
> Could you share it with us?

Sure. Here is mine.

--8<---------------cut here---------------start------------->8---
;;; color-theme-sva.el --- my color theme

;; Copyright (C) 2003-2010 Sebastien Vauban
;; Time-stamp: <2010-05-04 Tue 10:40 sva on mundaneum>

;; Author: Sebastien Vauban
;; Keywords: emacs, color theme, config

;; $Revision: 3731 $
;; $Date: 2010-04-28 14:28:34 +0200 (Wed, 28 Apr 2010) $

;; This file is NOT part of GNU Emacs.

;; This file 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 2 of
;; the License, or (at your option) any later version.

;; This file is distributed in the hope that it will be
;; useful, but WITHOUT ANY WARRANTY; without even the implied
;; warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
;; PURPOSE.  See the GNU General Public License for more details.

;; You should have received a copy of the GNU General Public
;; License along with this file; if not, write to the Free
;; Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
;; MA 02111-1307, USA.

;;; Code:

(require 'color-theme)

(defun color-theme-sva ()
  "Color theme by Sebastien Vauban."
  (interactive)
  (color-theme-install
   '(color-theme-sva
     ;; frame parameters
     ((background-color . "white")
      (background-mode . light)
      (border-color . "black")
      (cursor-color . "rgb:15/FF/00")
      (foreground-color . "black")
      (mouse-color . "black"))

     ;; faces
     (default ((t (nil))))
     (bold ((t (:weight bold))))
     (bold-italic ((t (:italic t :slant italic :weight bold))))
     (italic ((t (:italic t :slant italic))))
     (underline ((t (:underline t))))

     (highlight ((t (:background "rgb:FF/FF/A0"))))  ;; yellow
     ;; used by hlt package of Drew Adams

     (recover-this-file ((t (:background "red"))))

     ;; non-breaking space
     (nobreak-space ((t (:background "rgb:C6/C3/C6" :foreground "green"))))

     ;; bbdb
     (bbdb-company ((t (:foreground "steel blue" :italic t))))
     (bbdb-field-name ((t (:foreground "steel blue" :weight bold))))
     (bbdb-field-value ((t (:foreground "steel blue"))))
     (bbdb-name ((t (:foreground "rgb:FF/66/33" :underline t))))

     ;; browse-kill-ring
     (browse-kill-ring-separator-face ((t (:foreground "slate gray" :weight bold))))

     ;; calendar
     (calendar-today-face ((t (:weight bold :background "yellow"))))
     (diary-face ((t (:foreground "dark cyan"))))
     (holiday-face ((t (:foreground "red"))))

     ;; column-marker
     (column-marker-1-face ((t (:background "DarkSeaGreen1"))))
     (column-marker-2-face ((t (:background "LemonChiffon"))))
     (column-marker-3-face ((t (:background "MistyRose"))))

     (comint-highlight-input ((t (:weight bold))))
     (comint-highlight-prompt ((t (:foreground "blue"))))

     ;; custom
     (custom-saved-face ((t (:underline t))))
     (custom-state-face ((t (:foreground "green4"))))
     (custom-button-pressed-face ((t (:background "lightgray"
                                      :foreground "black"
                                      :box (:line-width 2
                                            :style pressed-button)))))
     (custom-modified-face ((t (:background "blue" :foreground "white"))))
     (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
     (custom-set-face ((t (:background "white" :foreground "blue"))))
     (custom-changed-face ((t (:background "blue" :foreground "white"))))
     (custom-rogue-face ((t (:background "black" :foreground "pink"))))
     (custom-face-tag-face ((t (:underline t))))
     (custom-variable-button-face ((t (:underline t :weight bold))))

     ;; cvs
     (cvs-filename-face ((t (:foreground "blue4"))))
     (cvs-handled-face ((t (:foreground "pink"))))
     (cvs-header-face ((t (:foreground "blue4" :weight bold))))
     (cvs-marked-face ((t (:foreground "green3" :weight bold))))
     (cvs-msg-face ((t (:italic t :foreground "gray55"))))
     (cvs-need-action-face ((t (:foreground "orange"))))
     (cvs-unknown-face ((t (:foreground "red"))))

     ;; subversion
     (svn-status-marked-face ((t (:foreground "green3" :weight bold))))
     (svn-status-marked-popup-face ((t (:foreground "green3" :weight bold))))
     (svn-status-update-available-face ((t (:foreground "orange"))))
     (svn-status-directory-face ((t (:background "rgb:FF/F5/8F"
                                     :foreground "blue" :weight bold))))
     (svn-status-filename-face ((t (:foreground "magenta3"))))
     (svn-status-symlink-face  ((t (:foreground "cyan"))))
     (svn-status-locked-face ((t (:foreground "red" :weight bold))))
     (svn-status-switched-face ((t (:italic t :foreground "gray55"))))

     ;; diff
     (diff-added ((t (:background "rgb:DD/FF/DD" :foreground "DarkGreen"))))
     (diff-hunk-header ((t (:background "rgb:EA/F2/F5" :foreground "rgb:99/99/99"))))
     (diff-index ((t (:background "rgb:EA/F2/F5" :foreground "rgb:99/99/99"))))
     (diff-indicator-added ((t (:background "rgb:AA/FF/AA"))))
     (diff-indicator-removed ((t (:background "rgb:FF/AA/AA"))))
     (diff-removed ((t (:background "rgb:FF/DD/DD" :foreground "DarkMagenta"))))

     ;; dircolors
     (dircolors-face-asm ((t (:foreground "blue3"))))
     (dircolors-face-backup ((t (:foreground "blue3"))))
     (dircolors-face-compress ((t (:foreground "red"))))
     (dircolors-face-dir ((t (:foreground "blue" :weight bold))))
     (dircolors-face-doc ((t (:foreground "gold"))))
     (dircolors-face-dos ((t (:foreground "green3"))))
     (dircolors-face-emacs ((t (:foreground "turquoise3"))))
     (dircolors-face-html ((t (:foreground "gold"))))
     (dircolors-face-img ((t (:foreground "magenta3"))))
     (dircolors-face-lang ((t (:foreground "turquoise3"))))
     (dircolors-face-lang-interface ((t (:foreground "turquoise3"))))
     (dircolors-face-make ((t (:foreground "green3"))))
     (dircolors-face-objet ((t (:foreground "blue3"))))
     (dircolors-face-package ((t (:foreground "red"))))
     (dircolors-face-paddb ((t (:foreground "blue3"))))
     (dircolors-face-ps ((t (:foreground "gold"))))
     (dircolors-face-sound ((t (:foreground "magenta3"))))
     (dircolors-face-tar ((t (:foreground "red"))))
     (dircolors-face-yacc ((t (:foreground "turquoise3"))))

     ;; dired
     (dired-face-boring ((t (:foreground "Gray65"))))
     (dired-face-directory ((t (:weight bold))))
     (dired-face-executable ((t (:foreground "SeaGreen"))))
     (dired-face-flagged ((t (:background "LightSlateGray"))))
     (dired-face-header ((t (:background "gray75" :foreground "black"))))
     (dired-face-marked ((t (:background "PaleVioletRed"))))
     (dired-face-permissions ((t (:background "gray75" :foreground "black"))))
     (dired-face-setuid ((t (:foreground "Red"))))
     (dired-face-socket ((t (:foreground "magenta"))))
     (dired-face-symlink ((t (:foreground "cyan"))))

     ;; dired+
     (diredp-date-time ((t (:foreground "rgb:33/64/4E"))))
     (diredp-dir-heading ((t (:background "rgb:FF/F5/8F" :foreground "blue"
                                          :weight bold))))
     (diredp-dir-priv ((t (:background "rgb:FF/F5/8F" :foreground "blue"
                                       :weight bold))))
     (diredp-file-name ((t (:foreground "black"))))
     (diredp-file-suffix ((t (:foreground "rgb:7B/46/8E"))))
     (diredp-flag-mark-line ((t (:foreground "red" :weight bold))))

     ;; emacs wiki
     (emacs-wiki-bad-link-face ((t (:foreground "red" :weight bold))))
     (emacs-wiki-header-1 ((t (:weight bold :height 1.4))))
     (emacs-wiki-header-2 ((t (:weight bold :height 1.3))))
     (emacs-wiki-header-3 ((t (:height 1.2))))
     (emacs-wiki-header-4 ((t (:height 1.1))))
     (emacs-wiki-header-5 ((t (:height 1.0))))
     (emacs-wiki-header-6 ((t (:height 0.9))))
     (emacs-wiki-link-face ((t (:foreground "blue" :underline t))))

     ;; flypell
     (flyspell-duplicate-face ((t (:foreground "Gold3" :underline t
                                   :weight bold))))
     (flyspell-incorrect-face ((t (:foreground "red" :underline t
                                   :weight bold))))

     ;; TeX
     (tex-verbatim ((t (:foreground "tan1"))))

     ;; LaTeX
     (font-latex-bold-face ((t (:foreground "medium sea green" :weight bold))))
     (font-latex-math-face ((t (:foreground "black"))))
     (font-latex-sedate-face ((t (:foreground "gray45"))))
     (font-latex-verbatim-face ((t (:foreground "tan1"))))
     (font-latex-sectioning-1-face ((t (:foreground "cornflower blue" :weight bold :height 2.7 :family "Arial"))))
     (font-latex-sectioning-2-face ((t (:foreground "cornflower blue" :weight bold :height 1.8 :family "Arial"))))
     (font-latex-sectioning-3-face ((t (:foreground "LimeGreen" :weight bold :height 1.6 :family "Arial"))))
     (font-latex-sectioning-4-face ((t (:foreground "orange" :weight bold :height 1.3 :family "Arial"))))
     (font-latex-sectioning-5-face ((t (:foreground "IndianRed1"))))

     ;;
     (font-lock-comment-face ((t (:foreground "red"))))
     (font-lock-constant-face ((t (:foreground "dark cyan"))))
  ;; (font-lock-doc-string-face ((t (:foreground "yellow"))))
     (font-lock-function-name-face ((t (:foreground "blue"))))
     (font-lock-keyword-face ((t (:foreground "purple1"))))
  ;; (font-lock-preprocessor-face ((t (:foreground "yellow"))))
     (font-lock-reference-face ((t (:foreground "dark cyan"))))
     (font-lock-string-face ((t (:foreground "green4"))))
     (font-lock-type-face ((t (:foreground "forest green"))))
     (font-lock-variable-name-face ((t (:foreground "magenta"))))
     (font-lock-warning-face ((t (:weight bold :foreground "red"))))

     (pesche-space ((t (:background "LemonChiffon"))))
     (pesche-tab ((t (:background "Gold"))))

     (fringe ((t (:foreground "rgb:AF/B7/BA" :background "rgb:DD/EE/FF"))))
     (linum ((t (:foreground "rgb:AF/B7/BA" :background "rgb:DD/EE/FF"))))

     (gnus-splash-face ((t (:foreground "gold"))))

     ;; Gnus group buffer
     (gnus-group-mail-1-empty-face ((t (:foreground "rgb:50/50/B0"))))
     (gnus-group-mail-1-face ((t (:foreground "rgb:FF/50/B0" :weight bold))))
     (gnus-group-mail-2-empty-face ((t (:foreground "rgb:66/00/66"))))
     (gnus-group-mail-2-face ((t (:foreground "rgb:FF/00/66" :weight bold))))
     (gnus-group-mail-3-empty-face ((t (:foreground "rgb:00/77/77"))))
     (gnus-group-mail-3-face ((t (:foreground "rgb:FF/77/77" :weight bold))))

     (gnus-group-news-1-empty-face ((t (:foreground "rgb:50/50/B0"))))
     (gnus-group-news-1-face ((t (:foreground "rgb:FF/50/B0" :weight bold))))
     (gnus-group-news-2-empty-face ((t (:foreground "rgb:66/00/66"))))
     (gnus-group-news-2-face ((t (:foreground "rgb:FF/00/66" :weight bold))))
     (gnus-group-news-3-empty-face ((t (:foreground "rgb:00/77/77"))))
     (gnus-group-news-3-face ((t (:foreground "rgb:FF/77/77" :weight bold))))
     (gnus-group-news-4-empty-face ((t (:foreground "rgb:99/00/00"))))
     (gnus-group-news-4-face ((t (:foreground "rgb:FF/00/00" :weight bold))))
     (gnus-group-news-5-empty-face ((t (:foreground "rgb:00/00/99"))))
     (gnus-group-news-5-face ((t (:foreground "rgb:FF/00/99" :weight bold))))
     (gnus-group-news-6-empty-face ((t (:foreground "rgb:BB/66/00"))))
     (gnus-group-news-6-face ((t (:foreground "rgb:FF/66/00" :weight bold))))

     ;; Gnus summary buffer
     (hl-line ((t (:background "rgb:D4/EA/FF"))))  ;; light blue
     (gnus-summary-selected-face ((t (:foreground "rgb:FF/66/33" :weight bold))))
     (gnus-summary-high-unread-face ((t (:foreground "blue" :weight bold))))
     (gnus-summary-high-read-face ((t (:foreground "rgb:80/00/80" :weight bold))))
     (gnus-summary-high-ticked-face ((t (:foreground "hot pink" :weight bold))))
     (gnus-summary-high-ancient-face ((t (:foreground "rgb:77/77/99" :weight bold))))
     (gnus-summary-normal-unread-face ((t (:foreground "blue"))))
     (gnus-summary-normal-read-face ((t (:foreground "rgb:80/00/80"))))
     (gnus-summary-normal-ticked-face ((t (:foreground "hot pink"))))
     (gnus-summary-normal-ancient-face ((t (:foreground "rgb:77/77/99"))))
     (gnus-summary-low-unread-face ((t (:low t :foreground "blue" :italic t))))
     (gnus-summary-low-read-face ((t (:low t :foreground "rgb:80/00/80" :italic t))))
     (gnus-summary-low-ticked-face ((t (:low t :foreground "hot pink" :italic t))))
     (gnus-summary-low-ancient-face ((t (:low t :foreground "rgb:77/77/99" :italic t))))
     (gnus-summary-cancelled-face ((t (:italic t :foreground "gray55" :strike-through t))))

     ;; Gnus article buffer
     (gnus-header-name-face ((t (:foreground "rgb:33/99/CC" :weight bold :family "Arial"))))
     (gnus-header-from-face ((t (:foreground "blue" :family "Arial"))))
     (gnus-header-subject-face ((t (:foreground "rgb:FF/66/33" :weight bold))))
     (gnus-header-newsgroups-face ((t (:foreground "rgb:33/99/CC" :family "Arial"))))
     (gnus-header-content-face ((t (:foreground "rgb:33/99/CC" :family "Arial"))))
     (gnus-cite-attribution-face ((t (:foreground "rgb:50/50/B0"))))
     (gnus-cite-face-1 ((t (:foreground "rgb:50/50/B0"))))
     (gnus-cite-face-2 ((t (:foreground "rgb:66/00/66"))))
     (gnus-cite-face-3 ((t (:foreground "rgb:00/77/77"))))
     (gnus-cite-face-4 ((t (:foreground "rgb:99/00/00"))))
     (gnus-cite-face-5 ((t (:foreground "rgb:00/00/99"))))
     (gnus-cite-face-6 ((t (:foreground "rgb:BB/66/00"))))
     (gnus-cite-face-7 ((t (:foreground "rgb:50/50/B0"))))
     (gnus-cite-face-8 ((t (:foreground "rgb:66/00/66"))))
     (gnus-cite-face-9 ((t (:foreground "rgb:00/77/77"))))
     (gnus-cite-face-10 ((t (:foreground "rgb:99/00/00"))))
     (gnus-signature-face ((t (:foreground "rgb:7F/7F/7F"))))
     (gnus-emphasis-bold ((t (:weight bold))))

     (widget-button-face ((t (:weight bold))))
     (widget-button-pressed-face ((t (:foreground "red"))))
     (widget-documentation-face ((t (:foreground "green4"))))
     (widget-field-face ((t (:background "gray85"))))
     (widget-inactive-face ((t (:foreground "dim gray"))))
     (widget-single-line-field-face ((t (:background "gray85"))))
;;     (widget-mouse-face . highlight)

     ;; when replying
     (message-header-name-face ((t (:foreground "rgb:33/99/CC" :weight bold
                                    :family "Arial"))))
     (message-header-to-face ((t (:foreground "blue" :family "Arial"))))
     (message-header-cc-face ((t (:foreground "blue" :family "Arial"))))
     (message-header-subject-face ((t (:foreground "rgb:FF/66/33" :weight bold))))
     (message-header-newsgroups-face ((t (:foreground "rgb:33/99/CC"
                                          :family "Arial"))))
     (message-header-xheader-face ((t (:foreground "red"))))
     (message-header-other-face ((t (:foreground "rgb:33/99/CC"
                                     :family "Arial"))))
     (message-separator-face ((t (:foreground "red" :weight bold :family "Arial"))))
     (message-cited-text-face ((t (:foreground "rgb:50/50/B0"))))
     (message-mml-face ((t (:foreground "forest green"))))

     ;; Gnus/Message
     (gnus-emphasis-highlight-words ((t (:background "black"
                                         :foreground "yellow"))))
     (gnus-picon-face ((t (:background "white" :foreground "yellow"))))
     (gnus-picon-xbm-face ((t (:background "white" :foreground "yellow"))))
     (gnus-x-face ((t (:background "white" :foreground "black"))))

     (html-helper-bold-face ((t (:foreground "black" :weight bold))))
     (html-helper-italic-face ((t (:foreground "black" :slant italic))))
     (html-helper-underline-face ((t (:foreground "black" :underline t))))
     (html-tag-face ((t (:foreground "blue"))))

     (nxml-attribute-local-name-face ((t (:foreground "magenta"))))
     (nxml-attribute-value-delimiter-face ((t (:foreground "green4"))))
     (nxml-attribute-value-face ((t (:foreground "green4"))))
     (nxml-comment-content-face  ((t (:foreground "red" :slant italic))))
     (nxml-comment-delimiter-face ((t (:foreground "red"))))
     (nxml-element-local-name-face ((t (:foreground "blue"))))
     (nxml-processing-instruction-delimiter-face ((t (:foreground "purple1"))))
     (nxml-processing-instruction-target-face ((t (:foreground "purple1"))))
     (nxml-tag-delimiter-face ((t (:foreground "blue"))))
     (nxml-tag-slash-face ((t (:foreground "blue"))))

     (anything-header ((t (:family "Sans Serif" :foreground "white" :weight bold :height 1.3 :background "rgb:66/66/99"))))

     ;; Info
     (info-header-node ((t (:foreground "orange" :underline t)))) ; nodes in header
     (info-header-xref ((t (:foreground "dodger blue" :underline t)))) ; cross references in header
     (info-menu-header ((t (:foreground "red" :underline t)))) ; menu titles (headers) -- major topics
     (info-menu-star ((t (:foreground "black")))) ; every 3rd menu item
     (info-node ((t (:foreground "blue" :underline t)))) ; node names
     (info-xref ((t (:foreground "blue" :weight bold :underline t)))) ; unvisited cross-references
     (info-xref-visited ((t (:foreground "magenta4" :weight bold)))) ; previously visited cross-references

     ;; info+
     (info-quoted-name ((t (:foreground "dark cyan")))) ; quoted names (`...')
     (info-string ((t (:foreground "green4")))) ; strings ("...")
;;;  (info-menu ()) ; menu items
;;;  (info-file ()) ; file heading labels

;;;      And for reference items in the Elisp manual,
;;;      you can customize these faces:
;;;          info-elisp-user-option-ref-item  - label `User Option'
;;;          info-elisp-variable-ref-item     - label `Variable'
;;;          info-elisp-command-ref-item      - label `Command'
;;;          info-elisp-function-ref-item     - label `Function'
;;;          info-elisp-macro-ref-item        - label `Macro'
;;;          info-elisp-special-form-ref-item - label `Special Form'
;;;          info-elisp-syntax-class-item     - label `Syntax Class'
;;;          info-elisp-reference-item        - other reference labels

     ;; highlighting matches
     (match ((t (:background "yellow" :foreground "rgb:EE/66/00" :weight bold))))
     (isearch ((t (:background "yellow" :foreground "rgb:EE/66/00" :weight bold))))
     (isearch-lazy-highlight-face ((t (:background "rgb:CC/FF/FF"
                                       :foreground "blue"
                                       :weight bold)))) ;; for GNU Emacs
     (isearch-secondary ((t (:background "rgb:CC/FF/FF"
                             :foreground "blue"
                             :weight bold)))) ;; for XEmacs

     ;; make
     (makefile-space-face ((t (:background "hotpink"))))

     ;; GNU Emacs mode-line
     (mode-line ((t (:background "rgb:00/97/CB" :foreground "rgb:FF/C7/7F"
                     :box (:line-width 1 :color "rgb:9E/AB/B6")
                     :weight normal))))
     (mode-line-inactive ((t (:background "rgb:00/63/82" :foreground "rgb:61/7A/82"
                             :box (:line-width 1 :color "rgb:9E/AB/B6")
                             :weight normal))))
     (mode-line-highlight ((t (:foreground "yellow"))))
     (mode-line-buffer-id ((t (:foreground "white"))))

     ;; XEmacs modeline
     (modeline-mousable ((t (:foreground "firebrick"))))  ; major-mode string
     (modeline-mousable-minor-mode ((t (:foreground "green4"))))

     ;; Muse
     (muse-verbatim ((t (:foreground "tan1"))))
     (muse-header-1 ((t (:foreground "red"))))  ; blue4

     (muse-header-2 ((t (:inherit variable-pitch :foreground "LightBlue2" :weight bold :height 1.3))))
     (muse-header-3 ((t (:inherit variable-pitch :foreground "LightSkyBlue2" :height 1.2))))
     (muse-header-4 ((t (:inherit variable-pitch :foreground "LightSkyBlue3" :slant italic :height 1.1))))
     (muse-header-5 ((t (:inherit variable-pitch :foreground "LightSkyBlue3" :height 1.0))))

     ;; org
     (org-agenda-date ((t (:background "LightSkyBlue"))))
     (org-agenda-date-today ((t (:background "yellow" :slant normal :weight bold))))
     (org-agenda-date-weekend ((t (:foreground "white" :background "blue4" :weight bold))))
     (org-code ((t (:foreground "blue"))))

     (org-column ((t (:background "gold" :height 80 :family "Consolas"))))
     (org-agenda-column-dateline ((t (:background "deep sky blue" :height 80 :family "Consolas"))))

     (org-done ((t (:foreground "green3" :weight bold :strike-through t))))
     (org-latex-and-export-specials ((t (:foreground "tan1"))))
     (org-level-1 ((t (:foreground "cornflower blue" :weight bold :height 1.8 :family "Arial"))))
     (org-level-2 ((t (:foreground "LimeGreen" :weight bold :height 1.6 :family "Arial"))))
     (org-level-3 ((t (:foreground "orange" :weight bold :height 1.3 :family "Arial"))))
     (org-level-4 ((t (:foreground "IndianRed1"))))
     (org-level-5 ((t (:foreground "cornflower blue"))))
     (org-level-6 ((t (:foreground "LimeGreen"))))
     (org-level-7 ((t (:foreground "orange"))))
     (org-level-8 ((t (:foreground "IndianRed1"))))
     (org-headline-done ((t (:foreground "rgb:AA/AA/AA" :weight bold :height 1.3 :family "Arial" :strike-through t))))
     (org-agenda-diary ((t (:foreground "DarkGreen" :background "lightblue" :weight bold))))
     (org-scheduled ((t (:foreground "blue" :weight bold))))
     (org-scheduled-today ((t (:foreground "DarkGreen" :weight bold))))
     (org-scheduled-previously ((t (:foreground "red" :weight bold))))
     (org-upcoming-deadline ((t (:foreground "white" :background "rgb:E9/A3/6A" :weight bold))))
     (org-warning ((t (:foreground "white" :background "rgb:D8/00/00" :weight bold))))

     (sva-org-deadline-yesterday ((t (:foreground "white" :background "rgb:D8/00/00" :weight bold))))
     (sva-org-deadline-today ((t (:foreground "white" :background "rgb:E9/A3/6A" :weight bold))))
     (sva-org-deadline-tomorrow ((t (:foreground "black" :background "#B4F1B3" :weight bold))))
     (sva-org-deadline-later ((t (:foreground "black" :background "#AACAFC"))))

     (org-special-keyword ((t (:foreground "red"))))
     (org-tag ((t (:foreground "rgb:81/6A/7D" :background "rgb:F7/B8/DE" :italic t))))
     (org-time-grid ((t (:foreground "gray60"))))
     (org-mode-line-clock ((t (:background "rgb:FF/90/00" :foreground "white")))) ; orange
     (org-mode-line-clock-overrun ((t (:background "red" :foreground "white"))))

     (org-dim ((t (:foreground "rgb:AA/AA/AA"))))
     (org-document-title ((t (:foreground "blue" :weight bold))))
     (org-document-info-keyword ((t (:foreground "rgb:AA/AA/AA"))))
     (org-document-info ((t (:foreground "blue4"))))

     ;; non-standard faces
     (sva-org-todo-kwd-face ((t (:foreground "gold" :background "tomato" :weight bold))))
     (sva-org-someday-kwd-face ((t (:foreground "gold" :background "tomato" :weight bold))))
     (sva-org-started-kwd-face ((t (:foreground "cyan" :background "steelblue" :weight bold))))
     (sva-org-waiting-kwd-face ((t (:foreground "gold" :background "magenta2" :weight bold))))
     (sva-org-delegated-kwd-face ((t (:foreground "gold" :background "magenta2" :weight bold))))
     (sva-org-deferred-kwd-face ((t (:foreground "gold" :background "magenta2" :weight bold))))
     (sva-org-done-kwd-face ((t (:foreground "rgb:AA/AA/AA" :background "black" :weight bold))))
     (sva-org-canceled-kwd-face ((t (:foreground "rgb:AA/AA/AA" :background "black" :weight bold))))

     (sva-org-quote-kwd-face ((t (:foreground "yellow" :background "red" :weight bold))))
     (sva-org-quoted-kwd-face ((t (:foreground "yellow" :background "red" :weight bold))))
     (sva-org-approved-kwd-face ((t (:foreground "gray50" :background "gray30" :weight bold))))
     (sva-org-expired-kwd-face ((t (:foreground "gray50" :background "gray30" :weight bold))))
     (sva-org-rejected-kwd-face ((t (:foreground "gray50" :background "gray30" :weight bold))))

     (sva-org-openpo-kwd-face ((t (:foreground "cyan" :background "steelblue" :weight bold))))
     (sva-org-closedpo-kwd-face ((t (:foreground "gray50" :background "gray30" :weight bold))))

     ;; pretty print ^L
     (pp^L-highlight ((t (:inherit shadow :strike-through t))))

     ;; selection
     (region ((t (:background "seashell2")))) ;; for GNU Emacs
     (zmacs-region ((t (:background "seashell2")))) ;; for XEmacs
     (secondary-selection ((t (:background "paleturquoise"))))

     ;; for `cat <<EOF' in shell scripts
     (sh-heredoc ((t (:foreground "tan1"))))

     ;; parentheses
     (paren-face-match ((t (:background "chartreuse"))))
     (paren-face-mismatch ((t (:background "purple" :foreground "white"
                               :weight bold))))
     (paren-face-no-match ((t (:background "purple" :foreground "white"
                               :weight bold))))
     (show-paren-match-face ((t (:background "chartreuse"))))
     (show-paren-mismatch-face ((t (:background "purple" :foreground "white"
                                    :weight bold))))

     ;; shell
     (shell-prompt-face ((t (:weight bold :foreground "yellow"))))
     (shell-option-face ((t (:foreground "forest green"))))
     (shell-output-face ((t (:foreground "black"))))
     (shell-output-2-face ((t (:foreground "blue"))))
     (shell-output-3-face ((t (:foreground "purple"))))

     ;; speedbar
     (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"))))

     ;; tool-bar
     (tool-bar ((t (:background "gray75" :foreground "black" :box
                                (:line-width 1 :style released-button)))))

     ;; tooltip
     (tooltip ((t (:background "lightyellow" :foreground "black"))))

     ;; show trailing whitespace
     (trailing-whitespace ((t (:background "LemonChiffon"))))

     ;; mouseless browsing
     (w3m-link-numbering ((t (:foreground "rgb:B4/C7/EB"))))

     ;; w3m
     (w3m-anchor ((t (:foreground "blue"))))
     (w3m-current-anchor ((t (:foreground "blue" :weight bold :underline t))))
     (w3m-arrived-anchor ((t (:foreground "purple1"))))
     (w3m-form ((t (:foreground "tan1" :underline t))))
     (w3m-bold ((t (:foreground "medium sea green" :weight bold))))

     (w3m-header-line-location-content-face ((t (:foreground "purple2"))))
     (w3m-header-line-location-title-face ((t (:foreground "cadet blue"))))
     (w3m-image-face ((t (:foreground "DarkSeaGreen2" :weight bold))))
     (w3m-strike-through-face ((t (:strike-through t))))
     (w3m-underline-face ((t (:underline t))))
;;;      (w3m-tab-background-face ((t (:background "rgb:21/36/4B"))))
;;;      (w3m-tab-selected-face ((t (:background "Gray85" :foreground "black" :box (:line-width 1 :style nil)))))
;;;      (w3m-tab-selected-retrieving-face ((t (:background "Gray85" :foreground "white" :box (:line-width -1 :style nil)))))
;;;      (w3m-tab-unselected-face ((t (:background "Gray70" :foreground "Gray20" :box (:line-width 1 :style nil)))))
;;;      (w3m-tab-unselected-retrieving-face ((t (:background "Gray50" :foreground "white" :box (:line-width -1 :style nil)))))
     (w3m-bitmap-image-face ((t (:foreground "gray4" :background "green"))))
;;;      (w3m-form-button-face ((t (:background "lightgray" :foreground "black"))))
     (w3m-form-button-face ((t (:foreground "gray4" :background "light gray" :weight bold :underline t))))
;;;      (w3m-form-button-mouse-face ((t (:background "orange"))))
     (w3m-form-button-mouse-face ((t (:background "DarkGreen" :foreground "light gray" :underline t))))
;;;      (w3m-form-button-pressed-face ((t (:background "yellow"))))
     (w3m-form-button-pressed-face ((t (:foreground "gray4" :background "light gray" :weight bold :underline t))))
;;;      (w3m-history-current-url-face ((t (:background "SkyBlue4" :foreground "LightSkyBlue"))))
     (w3m-history-current-url-face ((t (:foreground "lemon chiffon"))))


     ;; IRC
     (circe-originator-face ((t (:foreground "blue"))))
     (circe-highlight-all-nicks-face ((t (:foreground "blue")))) ; other nicks
     (circe-highlight-nick-face ((t (:foreground "firebrick")))) ; message with my nick cited
     (lui-highlight-face ((t (:foreground "red")))) ; my nick
     (circe-my-message-face ((t (:foreground "red"))))
     (lui-time-stamp-face ((t (:foreground "orange"))))
     (lui-button-face ((t (:foreground "blue" :underline t))))

     )))

(provide 'color-theme-sva)

;;; color-theme-sva.el ends here
--8<---------------cut here---------------end--------------->8---

Any comment is welcome!

Best regards,
  Seb

-- 
Sébastien Vauban



_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode-mXXj517/zsQ@public.gmane.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

^ permalink raw reply	[flat|nested] 7+ messages in thread

* Re: org-mode color schemes with white or light background and black foregroung
  2010-05-04 11:57 org-mode color schemes with white or light background and black foregroung Daniel Martins
  2010-05-04 20:46 ` Sébastien Vauban
@ 2010-05-05  7:55 ` Sébastien Vauban
  1 sibling, 0 replies; 7+ messages in thread
From: Sébastien Vauban @ 2010-05-05  7:55 UTC (permalink / raw)
  To: emacs-orgmode-mXXj517/zsQ

Hi Daniel,

Daniel Martins wrote:
> Some time ago Carsten sent a file with with his colours patterns with black
> background.
>
> I would like to know if someone has a similar pattern when using black
> foregroung and a lighter backgroung (not necessarily white).
>
> Could you share it with us?

Sure. Here's the one I'm using:

    http://www.mygooglest.com/fni/color-theme-fni.el

Best regards,
  Seb

-- 
Sébastien Vauban



_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode-mXXj517/zsQ@public.gmane.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode

^ permalink raw reply	[flat|nested] 7+ messages in thread

* Re: Re: org-mode color schemes with white or light background and black foregroung
  2010-05-04 20:46 ` Sébastien Vauban
@ 2010-05-05 16:00   ` Simao M
  2010-05-05 21:25     ` Eric Schulte
  0 siblings, 1 reply; 7+ messages in thread
From: Simao M @ 2010-05-05 16:00 UTC (permalink / raw)
  To: Sébastien Vauban; +Cc: emacs-orgmode

Screenshot please? :)

2010/5/4 Sébastien Vauban <wxhgmqzgwmuf@spammotel.com>:
> Hi Daniel,
>
> Daniel Martins wrote:
>> Some time ago Carsten sent a file with with his colours patterns with black
>> background.
>>
>> I would like to know if someone has a similar pattern when using black
>> foregroung and a lighter backgroung (not necessarily white).
>>
>> Could you share it with us?
>
> Sure. Here is mine.
>
> --8<---------------cut here---------------start------------->8---
> ;;; color-theme-sva.el --- my color theme
>
> ;; Copyright (C) 2003-2010 Sebastien Vauban
> ;; Time-stamp: <2010-05-04 Tue 10:40 sva on mundaneum>
>
> ;; Author: Sebastien Vauban
> ;; Keywords: emacs, color theme, config
>
> ;; $Revision: 3731 $
> ;; $Date: 2010-04-28 14:28:34 +0200 (Wed, 28 Apr 2010) $
>
> ;; This file is NOT part of GNU Emacs.
>
> ;; This file 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 2 of
> ;; the License, or (at your option) any later version.
>
> ;; This file is distributed in the hope that it will be
> ;; useful, but WITHOUT ANY WARRANTY; without even the implied
> ;; warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
> ;; PURPOSE.  See the GNU General Public License for more details.
>
> ;; You should have received a copy of the GNU General Public
> ;; License along with this file; if not, write to the Free
> ;; Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
> ;; MA 02111-1307, USA.
>
> ;;; Code:
>
> (require 'color-theme)
>
> (defun color-theme-sva ()
>  "Color theme by Sebastien Vauban."
>  (interactive)
>  (color-theme-install
>   '(color-theme-sva
>     ;; frame parameters
>     ((background-color . "white")
>      (background-mode . light)
>      (border-color . "black")
>      (cursor-color . "rgb:15/FF/00")
>      (foreground-color . "black")
>      (mouse-color . "black"))
>
>     ;; faces
>     (default ((t (nil))))
>     (bold ((t (:weight bold))))
>     (bold-italic ((t (:italic t :slant italic :weight bold))))
>     (italic ((t (:italic t :slant italic))))
>     (underline ((t (:underline t))))
>
>     (highlight ((t (:background "rgb:FF/FF/A0"))))  ;; yellow
>     ;; used by hlt package of Drew Adams
>
>     (recover-this-file ((t (:background "red"))))
>
>     ;; non-breaking space
>     (nobreak-space ((t (:background "rgb:C6/C3/C6" :foreground "green"))))
>
>     ;; bbdb
>     (bbdb-company ((t (:foreground "steel blue" :italic t))))
>     (bbdb-field-name ((t (:foreground "steel blue" :weight bold))))
>     (bbdb-field-value ((t (:foreground "steel blue"))))
>     (bbdb-name ((t (:foreground "rgb:FF/66/33" :underline t))))
>
>     ;; browse-kill-ring
>     (browse-kill-ring-separator-face ((t (:foreground "slate gray" :weight bold))))
>
>     ;; calendar
>     (calendar-today-face ((t (:weight bold :background "yellow"))))
>     (diary-face ((t (:foreground "dark cyan"))))
>     (holiday-face ((t (:foreground "red"))))
>
>     ;; column-marker
>     (column-marker-1-face ((t (:background "DarkSeaGreen1"))))
>     (column-marker-2-face ((t (:background "LemonChiffon"))))
>     (column-marker-3-face ((t (:background "MistyRose"))))
>
>     (comint-highlight-input ((t (:weight bold))))
>     (comint-highlight-prompt ((t (:foreground "blue"))))
>
>     ;; custom
>     (custom-saved-face ((t (:underline t))))
>     (custom-state-face ((t (:foreground "green4"))))
>     (custom-button-pressed-face ((t (:background "lightgray"
>                                      :foreground "black"
>                                      :box (:line-width 2
>                                            :style pressed-button)))))
>     (custom-modified-face ((t (:background "blue" :foreground "white"))))
>     (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
>     (custom-set-face ((t (:background "white" :foreground "blue"))))
>     (custom-changed-face ((t (:background "blue" :foreground "white"))))
>     (custom-rogue-face ((t (:background "black" :foreground "pink"))))
>     (custom-face-tag-face ((t (:underline t))))
>     (custom-variable-button-face ((t (:underline t :weight bold))))
>
>     ;; cvs
>     (cvs-filename-face ((t (:foreground "blue4"))))
>     (cvs-handled-face ((t (:foreground "pink"))))
>     (cvs-header-face ((t (:foreground "blue4" :weight bold))))
>     (cvs-marked-face ((t (:foreground "green3" :weight bold))))
>     (cvs-msg-face ((t (:italic t :foreground "gray55"))))
>     (cvs-need-action-face ((t (:foreground "orange"))))
>     (cvs-unknown-face ((t (:foreground "red"))))
>
>     ;; subversion
>     (svn-status-marked-face ((t (:foreground "green3" :weight bold))))
>     (svn-status-marked-popup-face ((t (:foreground "green3" :weight bold))))
>     (svn-status-update-available-face ((t (:foreground "orange"))))
>     (svn-status-directory-face ((t (:background "rgb:FF/F5/8F"
>                                     :foreground "blue" :weight bold))))
>     (svn-status-filename-face ((t (:foreground "magenta3"))))
>     (svn-status-symlink-face  ((t (:foreground "cyan"))))
>     (svn-status-locked-face ((t (:foreground "red" :weight bold))))
>     (svn-status-switched-face ((t (:italic t :foreground "gray55"))))
>
>     ;; diff
>     (diff-added ((t (:background "rgb:DD/FF/DD" :foreground "DarkGreen"))))
>     (diff-hunk-header ((t (:background "rgb:EA/F2/F5" :foreground "rgb:99/99/99"))))
>     (diff-index ((t (:background "rgb:EA/F2/F5" :foreground "rgb:99/99/99"))))
>     (diff-indicator-added ((t (:background "rgb:AA/FF/AA"))))
>     (diff-indicator-removed ((t (:background "rgb:FF/AA/AA"))))
>     (diff-removed ((t (:background "rgb:FF/DD/DD" :foreground "DarkMagenta"))))
>
>     ;; dircolors
>     (dircolors-face-asm ((t (:foreground "blue3"))))
>     (dircolors-face-backup ((t (:foreground "blue3"))))
>     (dircolors-face-compress ((t (:foreground "red"))))
>     (dircolors-face-dir ((t (:foreground "blue" :weight bold))))
>     (dircolors-face-doc ((t (:foreground "gold"))))
>     (dircolors-face-dos ((t (:foreground "green3"))))
>     (dircolors-face-emacs ((t (:foreground "turquoise3"))))
>     (dircolors-face-html ((t (:foreground "gold"))))
>     (dircolors-face-img ((t (:foreground "magenta3"))))
>     (dircolors-face-lang ((t (:foreground "turquoise3"))))
>     (dircolors-face-lang-interface ((t (:foreground "turquoise3"))))
>     (dircolors-face-make ((t (:foreground "green3"))))
>     (dircolors-face-objet ((t (:foreground "blue3"))))
>     (dircolors-face-package ((t (:foreground "red"))))
>     (dircolors-face-paddb ((t (:foreground "blue3"))))
>     (dircolors-face-ps ((t (:foreground "gold"))))
>     (dircolors-face-sound ((t (:foreground "magenta3"))))
>     (dircolors-face-tar ((t (:foreground "red"))))
>     (dircolors-face-yacc ((t (:foreground "turquoise3"))))
>
>     ;; dired
>     (dired-face-boring ((t (:foreground "Gray65"))))
>     (dired-face-directory ((t (:weight bold))))
>     (dired-face-executable ((t (:foreground "SeaGreen"))))
>     (dired-face-flagged ((t (:background "LightSlateGray"))))
>     (dired-face-header ((t (:background "gray75" :foreground "black"))))
>     (dired-face-marked ((t (:background "PaleVioletRed"))))
>     (dired-face-permissions ((t (:background "gray75" :foreground "black"))))
>     (dired-face-setuid ((t (:foreground "Red"))))
>     (dired-face-socket ((t (:foreground "magenta"))))
>     (dired-face-symlink ((t (:foreground "cyan"))))
>
>     ;; dired+
>     (diredp-date-time ((t (:foreground "rgb:33/64/4E"))))
>     (diredp-dir-heading ((t (:background "rgb:FF/F5/8F" :foreground "blue"
>                                          :weight bold))))
>     (diredp-dir-priv ((t (:background "rgb:FF/F5/8F" :foreground "blue"
>                                       :weight bold))))
>     (diredp-file-name ((t (:foreground "black"))))
>     (diredp-file-suffix ((t (:foreground "rgb:7B/46/8E"))))
>     (diredp-flag-mark-line ((t (:foreground "red" :weight bold))))
>
>     ;; emacs wiki
>     (emacs-wiki-bad-link-face ((t (:foreground "red" :weight bold))))
>     (emacs-wiki-header-1 ((t (:weight bold :height 1.4))))
>     (emacs-wiki-header-2 ((t (:weight bold :height 1.3))))
>     (emacs-wiki-header-3 ((t (:height 1.2))))
>     (emacs-wiki-header-4 ((t (:height 1.1))))
>     (emacs-wiki-header-5 ((t (:height 1.0))))
>     (emacs-wiki-header-6 ((t (:height 0.9))))
>     (emacs-wiki-link-face ((t (:foreground "blue" :underline t))))
>
>     ;; flypell
>     (flyspell-duplicate-face ((t (:foreground "Gold3" :underline t
>                                   :weight bold))))
>     (flyspell-incorrect-face ((t (:foreground "red" :underline t
>                                   :weight bold))))
>
>     ;; TeX
>     (tex-verbatim ((t (:foreground "tan1"))))
>
>     ;; LaTeX
>     (font-latex-bold-face ((t (:foreground "medium sea green" :weight bold))))
>     (font-latex-math-face ((t (:foreground "black"))))
>     (font-latex-sedate-face ((t (:foreground "gray45"))))
>     (font-latex-verbatim-face ((t (:foreground "tan1"))))
>     (font-latex-sectioning-1-face ((t (:foreground "cornflower blue" :weight bold :height 2.7 :family "Arial"))))
>     (font-latex-sectioning-2-face ((t (:foreground "cornflower blue" :weight bold :height 1.8 :family "Arial"))))
>     (font-latex-sectioning-3-face ((t (:foreground "LimeGreen" :weight bold :height 1.6 :family "Arial"))))
>     (font-latex-sectioning-4-face ((t (:foreground "orange" :weight bold :height 1.3 :family "Arial"))))
>     (font-latex-sectioning-5-face ((t (:foreground "IndianRed1"))))
>
>     ;;
>     (font-lock-comment-face ((t (:foreground "red"))))
>     (font-lock-constant-face ((t (:foreground "dark cyan"))))
>  ;; (font-lock-doc-string-face ((t (:foreground "yellow"))))
>     (font-lock-function-name-face ((t (:foreground "blue"))))
>     (font-lock-keyword-face ((t (:foreground "purple1"))))
>  ;; (font-lock-preprocessor-face ((t (:foreground "yellow"))))
>     (font-lock-reference-face ((t (:foreground "dark cyan"))))
>     (font-lock-string-face ((t (:foreground "green4"))))
>     (font-lock-type-face ((t (:foreground "forest green"))))
>     (font-lock-variable-name-face ((t (:foreground "magenta"))))
>     (font-lock-warning-face ((t (:weight bold :foreground "red"))))
>
>     (pesche-space ((t (:background "LemonChiffon"))))
>     (pesche-tab ((t (:background "Gold"))))
>
>     (fringe ((t (:foreground "rgb:AF/B7/BA" :background "rgb:DD/EE/FF"))))
>     (linum ((t (:foreground "rgb:AF/B7/BA" :background "rgb:DD/EE/FF"))))
>
>     (gnus-splash-face ((t (:foreground "gold"))))
>
>     ;; Gnus group buffer
>     (gnus-group-mail-1-empty-face ((t (:foreground "rgb:50/50/B0"))))
>     (gnus-group-mail-1-face ((t (:foreground "rgb:FF/50/B0" :weight bold))))
>     (gnus-group-mail-2-empty-face ((t (:foreground "rgb:66/00/66"))))
>     (gnus-group-mail-2-face ((t (:foreground "rgb:FF/00/66" :weight bold))))
>     (gnus-group-mail-3-empty-face ((t (:foreground "rgb:00/77/77"))))
>     (gnus-group-mail-3-face ((t (:foreground "rgb:FF/77/77" :weight bold))))
>
>     (gnus-group-news-1-empty-face ((t (:foreground "rgb:50/50/B0"))))
>     (gnus-group-news-1-face ((t (:foreground "rgb:FF/50/B0" :weight bold))))
>     (gnus-group-news-2-empty-face ((t (:foreground "rgb:66/00/66"))))
>     (gnus-group-news-2-face ((t (:foreground "rgb:FF/00/66" :weight bold))))
>     (gnus-group-news-3-empty-face ((t (:foreground "rgb:00/77/77"))))
>     (gnus-group-news-3-face ((t (:foreground "rgb:FF/77/77" :weight bold))))
>     (gnus-group-news-4-empty-face ((t (:foreground "rgb:99/00/00"))))
>     (gnus-group-news-4-face ((t (:foreground "rgb:FF/00/00" :weight bold))))
>     (gnus-group-news-5-empty-face ((t (:foreground "rgb:00/00/99"))))
>     (gnus-group-news-5-face ((t (:foreground "rgb:FF/00/99" :weight bold))))
>     (gnus-group-news-6-empty-face ((t (:foreground "rgb:BB/66/00"))))
>     (gnus-group-news-6-face ((t (:foreground "rgb:FF/66/00" :weight bold))))
>
>     ;; Gnus summary buffer
>     (hl-line ((t (:background "rgb:D4/EA/FF"))))  ;; light blue
>     (gnus-summary-selected-face ((t (:foreground "rgb:FF/66/33" :weight bold))))
>     (gnus-summary-high-unread-face ((t (:foreground "blue" :weight bold))))
>     (gnus-summary-high-read-face ((t (:foreground "rgb:80/00/80" :weight bold))))
>     (gnus-summary-high-ticked-face ((t (:foreground "hot pink" :weight bold))))
>     (gnus-summary-high-ancient-face ((t (:foreground "rgb:77/77/99" :weight bold))))
>     (gnus-summary-normal-unread-face ((t (:foreground "blue"))))
>     (gnus-summary-normal-read-face ((t (:foreground "rgb:80/00/80"))))
>     (gnus-summary-normal-ticked-face ((t (:foreground "hot pink"))))
>     (gnus-summary-normal-ancient-face ((t (:foreground "rgb:77/77/99"))))
>     (gnus-summary-low-unread-face ((t (:low t :foreground "blue" :italic t))))
>     (gnus-summary-low-read-face ((t (:low t :foreground "rgb:80/00/80" :italic t))))
>     (gnus-summary-low-ticked-face ((t (:low t :foreground "hot pink" :italic t))))
>     (gnus-summary-low-ancient-face ((t (:low t :foreground "rgb:77/77/99" :italic t))))
>     (gnus-summary-cancelled-face ((t (:italic t :foreground "gray55" :strike-through t))))
>
>     ;; Gnus article buffer
>     (gnus-header-name-face ((t (:foreground "rgb:33/99/CC" :weight bold :family "Arial"))))
>     (gnus-header-from-face ((t (:foreground "blue" :family "Arial"))))
>     (gnus-header-subject-face ((t (:foreground "rgb:FF/66/33" :weight bold))))
>     (gnus-header-newsgroups-face ((t (:foreground "rgb:33/99/CC" :family "Arial"))))
>     (gnus-header-content-face ((t (:foreground "rgb:33/99/CC" :family "Arial"))))
>     (gnus-cite-attribution-face ((t (:foreground "rgb:50/50/B0"))))
>     (gnus-cite-face-1 ((t (:foreground "rgb:50/50/B0"))))
>     (gnus-cite-face-2 ((t (:foreground "rgb:66/00/66"))))
>     (gnus-cite-face-3 ((t (:foreground "rgb:00/77/77"))))
>     (gnus-cite-face-4 ((t (:foreground "rgb:99/00/00"))))
>     (gnus-cite-face-5 ((t (:foreground "rgb:00/00/99"))))
>     (gnus-cite-face-6 ((t (:foreground "rgb:BB/66/00"))))
>     (gnus-cite-face-7 ((t (:foreground "rgb:50/50/B0"))))
>     (gnus-cite-face-8 ((t (:foreground "rgb:66/00/66"))))
>     (gnus-cite-face-9 ((t (:foreground "rgb:00/77/77"))))
>     (gnus-cite-face-10 ((t (:foreground "rgb:99/00/00"))))
>     (gnus-signature-face ((t (:foreground "rgb:7F/7F/7F"))))
>     (gnus-emphasis-bold ((t (:weight bold))))
>
>     (widget-button-face ((t (:weight bold))))
>     (widget-button-pressed-face ((t (:foreground "red"))))
>     (widget-documentation-face ((t (:foreground "green4"))))
>     (widget-field-face ((t (:background "gray85"))))
>     (widget-inactive-face ((t (:foreground "dim gray"))))
>     (widget-single-line-field-face ((t (:background "gray85"))))
> ;;     (widget-mouse-face . highlight)
>
>     ;; when replying
>     (message-header-name-face ((t (:foreground "rgb:33/99/CC" :weight bold
>                                    :family "Arial"))))
>     (message-header-to-face ((t (:foreground "blue" :family "Arial"))))
>     (message-header-cc-face ((t (:foreground "blue" :family "Arial"))))
>     (message-header-subject-face ((t (:foreground "rgb:FF/66/33" :weight bold))))
>     (message-header-newsgroups-face ((t (:foreground "rgb:33/99/CC"
>                                          :family "Arial"))))
>     (message-header-xheader-face ((t (:foreground "red"))))
>     (message-header-other-face ((t (:foreground "rgb:33/99/CC"
>                                     :family "Arial"))))
>     (message-separator-face ((t (:foreground "red" :weight bold :family "Arial"))))
>     (message-cited-text-face ((t (:foreground "rgb:50/50/B0"))))
>     (message-mml-face ((t (:foreground "forest green"))))
>
>     ;; Gnus/Message
>     (gnus-emphasis-highlight-words ((t (:background "black"
>                                         :foreground "yellow"))))
>     (gnus-picon-face ((t (:background "white" :foreground "yellow"))))
>     (gnus-picon-xbm-face ((t (:background "white" :foreground "yellow"))))
>     (gnus-x-face ((t (:background "white" :foreground "black"))))
>
>     (html-helper-bold-face ((t (:foreground "black" :weight bold))))
>     (html-helper-italic-face ((t (:foreground "black" :slant italic))))
>     (html-helper-underline-face ((t (:foreground "black" :underline t))))
>     (html-tag-face ((t (:foreground "blue"))))
>
>     (nxml-attribute-local-name-face ((t (:foreground "magenta"))))
>     (nxml-attribute-value-delimiter-face ((t (:foreground "green4"))))
>     (nxml-attribute-value-face ((t (:foreground "green4"))))
>     (nxml-comment-content-face  ((t (:foreground "red" :slant italic))))
>     (nxml-comment-delimiter-face ((t (:foreground "red"))))
>     (nxml-element-local-name-face ((t (:foreground "blue"))))
>     (nxml-processing-instruction-delimiter-face ((t (:foreground "purple1"))))
>     (nxml-processing-instruction-target-face ((t (:foreground "purple1"))))
>     (nxml-tag-delimiter-face ((t (:foreground "blue"))))
>     (nxml-tag-slash-face ((t (:foreground "blue"))))
>
>     (anything-header ((t (:family "Sans Serif" :foreground "white" :weight bold :height 1.3 :background "rgb:66/66/99"))))
>
>     ;; Info
>     (info-header-node ((t (:foreground "orange" :underline t)))) ; nodes in header
>     (info-header-xref ((t (:foreground "dodger blue" :underline t)))) ; cross references in header
>     (info-menu-header ((t (:foreground "red" :underline t)))) ; menu titles (headers) -- major topics
>     (info-menu-star ((t (:foreground "black")))) ; every 3rd menu item
>     (info-node ((t (:foreground "blue" :underline t)))) ; node names
>     (info-xref ((t (:foreground "blue" :weight bold :underline t)))) ; unvisited cross-references
>     (info-xref-visited ((t (:foreground "magenta4" :weight bold)))) ; previously visited cross-references
>
>     ;; info+
>     (info-quoted-name ((t (:foreground "dark cyan")))) ; quoted names (`...')
>     (info-string ((t (:foreground "green4")))) ; strings ("...")
> ;;;  (info-menu ()) ; menu items
> ;;;  (info-file ()) ; file heading labels
>
> ;;;      And for reference items in the Elisp manual,
> ;;;      you can customize these faces:
> ;;;          info-elisp-user-option-ref-item  - label `User Option'
> ;;;          info-elisp-variable-ref-item     - label `Variable'
> ;;;          info-elisp-command-ref-item      - label `Command'
> ;;;          info-elisp-function-ref-item     - label `Function'
> ;;;          info-elisp-macro-ref-item        - label `Macro'
> ;;;          info-elisp-special-form-ref-item - label `Special Form'
> ;;;          info-elisp-syntax-class-item     - label `Syntax Class'
> ;;;          info-elisp-reference-item        - other reference labels
>
>     ;; highlighting matches
>     (match ((t (:background "yellow" :foreground "rgb:EE/66/00" :weight bold))))
>     (isearch ((t (:background "yellow" :foreground "rgb:EE/66/00" :weight bold))))
>     (isearch-lazy-highlight-face ((t (:background "rgb:CC/FF/FF"
>                                       :foreground "blue"
>                                       :weight bold)))) ;; for GNU Emacs
>     (isearch-secondary ((t (:background "rgb:CC/FF/FF"
>                             :foreground "blue"
>                             :weight bold)))) ;; for XEmacs
>
>     ;; make
>     (makefile-space-face ((t (:background "hotpink"))))
>
>     ;; GNU Emacs mode-line
>     (mode-line ((t (:background "rgb:00/97/CB" :foreground "rgb:FF/C7/7F"
>                     :box (:line-width 1 :color "rgb:9E/AB/B6")
>                     :weight normal))))
>     (mode-line-inactive ((t (:background "rgb:00/63/82" :foreground "rgb:61/7A/82"
>                             :box (:line-width 1 :color "rgb:9E/AB/B6")
>                             :weight normal))))
>     (mode-line-highlight ((t (:foreground "yellow"))))
>     (mode-line-buffer-id ((t (:foreground "white"))))
>
>     ;; XEmacs modeline
>     (modeline-mousable ((t (:foreground "firebrick"))))  ; major-mode string
>     (modeline-mousable-minor-mode ((t (:foreground "green4"))))
>
>     ;; Muse
>     (muse-verbatim ((t (:foreground "tan1"))))
>     (muse-header-1 ((t (:foreground "red"))))  ; blue4
>
>     (muse-header-2 ((t (:inherit variable-pitch :foreground "LightBlue2" :weight bold :height 1.3))))
>     (muse-header-3 ((t (:inherit variable-pitch :foreground "LightSkyBlue2" :height 1.2))))
>     (muse-header-4 ((t (:inherit variable-pitch :foreground "LightSkyBlue3" :slant italic :height 1.1))))
>     (muse-header-5 ((t (:inherit variable-pitch :foreground "LightSkyBlue3" :height 1.0))))
>
>     ;; org
>     (org-agenda-date ((t (:background "LightSkyBlue"))))
>     (org-agenda-date-today ((t (:background "yellow" :slant normal :weight bold))))
>     (org-agenda-date-weekend ((t (:foreground "white" :background "blue4" :weight bold))))
>     (org-code ((t (:foreground "blue"))))
>
>     (org-column ((t (:background "gold" :height 80 :family "Consolas"))))
>     (org-agenda-column-dateline ((t (:background "deep sky blue" :height 80 :family "Consolas"))))
>
>     (org-done ((t (:foreground "green3" :weight bold :strike-through t))))
>     (org-latex-and-export-specials ((t (:foreground "tan1"))))
>     (org-level-1 ((t (:foreground "cornflower blue" :weight bold :height 1.8 :family "Arial"))))
>     (org-level-2 ((t (:foreground "LimeGreen" :weight bold :height 1.6 :family "Arial"))))
>     (org-level-3 ((t (:foreground "orange" :weight bold :height 1.3 :family "Arial"))))
>     (org-level-4 ((t (:foreground "IndianRed1"))))
>     (org-level-5 ((t (:foreground "cornflower blue"))))
>     (org-level-6 ((t (:foreground "LimeGreen"))))
>     (org-level-7 ((t (:foreground "orange"))))
>     (org-level-8 ((t (:foreground "IndianRed1"))))
>     (org-headline-done ((t (:foreground "rgb:AA/AA/AA" :weight bold :height 1.3 :family "Arial" :strike-through t))))
>     (org-agenda-diary ((t (:foreground "DarkGreen" :background "lightblue" :weight bold))))
>     (org-scheduled ((t (:foreground "blue" :weight bold))))
>     (org-scheduled-today ((t (:foreground "DarkGreen" :weight bold))))
>     (org-scheduled-previously ((t (:foreground "red" :weight bold))))
>     (org-upcoming-deadline ((t (:foreground "white" :background "rgb:E9/A3/6A" :weight bold))))
>     (org-warning ((t (:foreground "white" :background "rgb:D8/00/00" :weight bold))))
>
>     (sva-org-deadline-yesterday ((t (:foreground "white" :background "rgb:D8/00/00" :weight bold))))
>     (sva-org-deadline-today ((t (:foreground "white" :background "rgb:E9/A3/6A" :weight bold))))
>     (sva-org-deadline-tomorrow ((t (:foreground "black" :background "#B4F1B3" :weight bold))))
>     (sva-org-deadline-later ((t (:foreground "black" :background "#AACAFC"))))
>
>     (org-special-keyword ((t (:foreground "red"))))
>     (org-tag ((t (:foreground "rgb:81/6A/7D" :background "rgb:F7/B8/DE" :italic t))))
>     (org-time-grid ((t (:foreground "gray60"))))
>     (org-mode-line-clock ((t (:background "rgb:FF/90/00" :foreground "white")))) ; orange
>     (org-mode-line-clock-overrun ((t (:background "red" :foreground "white"))))
>
>     (org-dim ((t (:foreground "rgb:AA/AA/AA"))))
>     (org-document-title ((t (:foreground "blue" :weight bold))))
>     (org-document-info-keyword ((t (:foreground "rgb:AA/AA/AA"))))
>     (org-document-info ((t (:foreground "blue4"))))
>
>     ;; non-standard faces
>     (sva-org-todo-kwd-face ((t (:foreground "gold" :background "tomato" :weight bold))))
>     (sva-org-someday-kwd-face ((t (:foreground "gold" :background "tomato" :weight bold))))
>     (sva-org-started-kwd-face ((t (:foreground "cyan" :background "steelblue" :weight bold))))
>     (sva-org-waiting-kwd-face ((t (:foreground "gold" :background "magenta2" :weight bold))))
>     (sva-org-delegated-kwd-face ((t (:foreground "gold" :background "magenta2" :weight bold))))
>     (sva-org-deferred-kwd-face ((t (:foreground "gold" :background "magenta2" :weight bold))))
>     (sva-org-done-kwd-face ((t (:foreground "rgb:AA/AA/AA" :background "black" :weight bold))))
>     (sva-org-canceled-kwd-face ((t (:foreground "rgb:AA/AA/AA" :background "black" :weight bold))))
>
>     (sva-org-quote-kwd-face ((t (:foreground "yellow" :background "red" :weight bold))))
>     (sva-org-quoted-kwd-face ((t (:foreground "yellow" :background "red" :weight bold))))
>     (sva-org-approved-kwd-face ((t (:foreground "gray50" :background "gray30" :weight bold))))
>     (sva-org-expired-kwd-face ((t (:foreground "gray50" :background "gray30" :weight bold))))
>     (sva-org-rejected-kwd-face ((t (:foreground "gray50" :background "gray30" :weight bold))))
>
>     (sva-org-openpo-kwd-face ((t (:foreground "cyan" :background "steelblue" :weight bold))))
>     (sva-org-closedpo-kwd-face ((t (:foreground "gray50" :background "gray30" :weight bold))))
>
>     ;; pretty print ^L
>     (pp^L-highlight ((t (:inherit shadow :strike-through t))))
>
>     ;; selection
>     (region ((t (:background "seashell2")))) ;; for GNU Emacs
>     (zmacs-region ((t (:background "seashell2")))) ;; for XEmacs
>     (secondary-selection ((t (:background "paleturquoise"))))
>
>     ;; for `cat <<EOF' in shell scripts
>     (sh-heredoc ((t (:foreground "tan1"))))
>
>     ;; parentheses
>     (paren-face-match ((t (:background "chartreuse"))))
>     (paren-face-mismatch ((t (:background "purple" :foreground "white"
>                               :weight bold))))
>     (paren-face-no-match ((t (:background "purple" :foreground "white"
>                               :weight bold))))
>     (show-paren-match-face ((t (:background "chartreuse"))))
>     (show-paren-mismatch-face ((t (:background "purple" :foreground "white"
>                                    :weight bold))))
>
>     ;; shell
>     (shell-prompt-face ((t (:weight bold :foreground "yellow"))))
>     (shell-option-face ((t (:foreground "forest green"))))
>     (shell-output-face ((t (:foreground "black"))))
>     (shell-output-2-face ((t (:foreground "blue"))))
>     (shell-output-3-face ((t (:foreground "purple"))))
>
>     ;; speedbar
>     (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"))))
>
>     ;; tool-bar
>     (tool-bar ((t (:background "gray75" :foreground "black" :box
>                                (:line-width 1 :style released-button)))))
>
>     ;; tooltip
>     (tooltip ((t (:background "lightyellow" :foreground "black"))))
>
>     ;; show trailing whitespace
>     (trailing-whitespace ((t (:background "LemonChiffon"))))
>
>     ;; mouseless browsing
>     (w3m-link-numbering ((t (:foreground "rgb:B4/C7/EB"))))
>
>     ;; w3m
>     (w3m-anchor ((t (:foreground "blue"))))
>     (w3m-current-anchor ((t (:foreground "blue" :weight bold :underline t))))
>     (w3m-arrived-anchor ((t (:foreground "purple1"))))
>     (w3m-form ((t (:foreground "tan1" :underline t))))
>     (w3m-bold ((t (:foreground "medium sea green" :weight bold))))
>
>     (w3m-header-line-location-content-face ((t (:foreground "purple2"))))
>     (w3m-header-line-location-title-face ((t (:foreground "cadet blue"))))
>     (w3m-image-face ((t (:foreground "DarkSeaGreen2" :weight bold))))
>     (w3m-strike-through-face ((t (:strike-through t))))
>     (w3m-underline-face ((t (:underline t))))
> ;;;      (w3m-tab-background-face ((t (:background "rgb:21/36/4B"))))
> ;;;      (w3m-tab-selected-face ((t (:background "Gray85" :foreground "black" :box (:line-width 1 :style nil)))))
> ;;;      (w3m-tab-selected-retrieving-face ((t (:background "Gray85" :foreground "white" :box (:line-width -1 :style nil)))))
> ;;;      (w3m-tab-unselected-face ((t (:background "Gray70" :foreground "Gray20" :box (:line-width 1 :style nil)))))
> ;;;      (w3m-tab-unselected-retrieving-face ((t (:background "Gray50" :foreground "white" :box (:line-width -1 :style nil)))))
>     (w3m-bitmap-image-face ((t (:foreground "gray4" :background "green"))))
> ;;;      (w3m-form-button-face ((t (:background "lightgray" :foreground "black"))))
>     (w3m-form-button-face ((t (:foreground "gray4" :background "light gray" :weight bold :underline t))))
> ;;;      (w3m-form-button-mouse-face ((t (:background "orange"))))
>     (w3m-form-button-mouse-face ((t (:background "DarkGreen" :foreground "light gray" :underline t))))
> ;;;      (w3m-form-button-pressed-face ((t (:background "yellow"))))
>     (w3m-form-button-pressed-face ((t (:foreground "gray4" :background "light gray" :weight bold :underline t))))
> ;;;      (w3m-history-current-url-face ((t (:background "SkyBlue4" :foreground "LightSkyBlue"))))
>     (w3m-history-current-url-face ((t (:foreground "lemon chiffon"))))
>
>
>     ;; IRC
>     (circe-originator-face ((t (:foreground "blue"))))
>     (circe-highlight-all-nicks-face ((t (:foreground "blue")))) ; other nicks
>     (circe-highlight-nick-face ((t (:foreground "firebrick")))) ; message with my nick cited
>     (lui-highlight-face ((t (:foreground "red")))) ; my nick
>     (circe-my-message-face ((t (:foreground "red"))))
>     (lui-time-stamp-face ((t (:foreground "orange"))))
>     (lui-button-face ((t (:foreground "blue" :underline t))))
>
>     )))
>
> (provide 'color-theme-sva)
>
> ;;; color-theme-sva.el ends here
> --8<---------------cut here---------------end--------------->8---
>
> Any comment is welcome!
>
> Best regards,
>  Seb
>
> --
> Sébastien Vauban
>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>

^ permalink raw reply	[flat|nested] 7+ messages in thread

* Re: Re: org-mode color schemes with white or light background and black foregroung
  2010-05-05 16:00   ` Simao M
@ 2010-05-05 21:25     ` Eric Schulte
  2010-05-06  8:06       ` Bastien
  0 siblings, 1 reply; 7+ messages in thread
From: Eric Schulte @ 2010-05-05 21:25 UTC (permalink / raw)
  To: Simao M; +Cc: Sébastien Vauban, emacs-orgmode

Maybe this would make a good Worg page, a collection of org-mode
screenshots along with the required color-theme.el file?

If we get such a page going, I'd be happy to add my own dark color
theme.

Best -- Eric

Simao M <simao.mml@gmail.com> writes:

> Screenshot please? :)
>
> 2010/5/4 Sébastien Vauban <wxhgmqzgwmuf@spammotel.com>:
>> Hi Daniel,
>>
>> Daniel Martins wrote:
>>> Some time ago Carsten sent a file with with his colours patterns with black
>>> background.
>>>
>>> I would like to know if someone has a similar pattern when using black
>>> foregroung and a lighter backgroung (not necessarily white).
>>>
>>> Could you share it with us?
>>
>> Sure. Here is mine.
>>
>> --8<---------------cut here---------------start------------->8---
>> ;;; color-theme-sva.el --- my color theme
>>
>> ;; Copyright (C) 2003-2010 Sebastien Vauban
>> ;; Time-stamp: <2010-05-04 Tue 10:40 sva on mundaneum>
>>
>> ;; Author: Sebastien Vauban
>> ;; Keywords: emacs, color theme, config
>>
>> ;; $Revision: 3731 $
>> ;; $Date: 2010-04-28 14:28:34 +0200 (Wed, 28 Apr 2010) $
>>
>> ;; This file is NOT part of GNU Emacs.
>>
>> ;; This file 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 2 of
>> ;; the License, or (at your option) any later version.
>>
>> ;; This file is distributed in the hope that it will be
>> ;; useful, but WITHOUT ANY WARRANTY; without even the implied
>> ;; warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
>> ;; PURPOSE.  See the GNU General Public License for more details.
>>
>> ;; You should have received a copy of the GNU General Public
>> ;; License along with this file; if not, write to the Free
>> ;; Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
>> ;; MA 02111-1307, USA.
>>
>> ;;; Code:
>>
>> (require 'color-theme)
>>
>> (defun color-theme-sva ()
>>  "Color theme by Sebastien Vauban."
>>  (interactive)
>>  (color-theme-install
>>   '(color-theme-sva
>>     ;; frame parameters
>>     ((background-color . "white")
>>      (background-mode . light)
>>      (border-color . "black")
>>      (cursor-color . "rgb:15/FF/00")
>>      (foreground-color . "black")
>>      (mouse-color . "black"))
>>
>>     ;; faces
>>     (default ((t (nil))))
>>     (bold ((t (:weight bold))))
>>     (bold-italic ((t (:italic t :slant italic :weight bold))))
>>     (italic ((t (:italic t :slant italic))))
>>     (underline ((t (:underline t))))
>>
>>     (highlight ((t (:background "rgb:FF/FF/A0"))))  ;; yellow
>>     ;; used by hlt package of Drew Adams
>>
>>     (recover-this-file ((t (:background "red"))))
>>
>>     ;; non-breaking space
>>     (nobreak-space ((t (:background "rgb:C6/C3/C6" :foreground "green"))))
>>
>>     ;; bbdb
>>     (bbdb-company ((t (:foreground "steel blue" :italic t))))
>>     (bbdb-field-name ((t (:foreground "steel blue" :weight bold))))
>>     (bbdb-field-value ((t (:foreground "steel blue"))))
>>     (bbdb-name ((t (:foreground "rgb:FF/66/33" :underline t))))
>>
>>     ;; browse-kill-ring
>>     (browse-kill-ring-separator-face ((t (:foreground "slate gray" :weight bold))))
>>
>>     ;; calendar
>>     (calendar-today-face ((t (:weight bold :background "yellow"))))
>>     (diary-face ((t (:foreground "dark cyan"))))
>>     (holiday-face ((t (:foreground "red"))))
>>
>>     ;; column-marker
>>     (column-marker-1-face ((t (:background "DarkSeaGreen1"))))
>>     (column-marker-2-face ((t (:background "LemonChiffon"))))
>>     (column-marker-3-face ((t (:background "MistyRose"))))
>>
>>     (comint-highlight-input ((t (:weight bold))))
>>     (comint-highlight-prompt ((t (:foreground "blue"))))
>>
>>     ;; custom
>>     (custom-saved-face ((t (:underline t))))
>>     (custom-state-face ((t (:foreground "green4"))))
>>     (custom-button-pressed-face ((t (:background "lightgray"
>>                                      :foreground "black"
>>                                      :box (:line-width 2
>>                                            :style pressed-button)))))
>>     (custom-modified-face ((t (:background "blue" :foreground "white"))))
>>     (custom-invalid-face ((t (:background "red" :foreground "yellow"))))
>>     (custom-set-face ((t (:background "white" :foreground "blue"))))
>>     (custom-changed-face ((t (:background "blue" :foreground "white"))))
>>     (custom-rogue-face ((t (:background "black" :foreground "pink"))))
>>     (custom-face-tag-face ((t (:underline t))))
>>     (custom-variable-button-face ((t (:underline t :weight bold))))
>>
>>     ;; cvs
>>     (cvs-filename-face ((t (:foreground "blue4"))))
>>     (cvs-handled-face ((t (:foreground "pink"))))
>>     (cvs-header-face ((t (:foreground "blue4" :weight bold))))
>>     (cvs-marked-face ((t (:foreground "green3" :weight bold))))
>>     (cvs-msg-face ((t (:italic t :foreground "gray55"))))
>>     (cvs-need-action-face ((t (:foreground "orange"))))
>>     (cvs-unknown-face ((t (:foreground "red"))))
>>
>>     ;; subversion
>>     (svn-status-marked-face ((t (:foreground "green3" :weight bold))))
>>     (svn-status-marked-popup-face ((t (:foreground "green3" :weight bold))))
>>     (svn-status-update-available-face ((t (:foreground "orange"))))
>>     (svn-status-directory-face ((t (:background "rgb:FF/F5/8F"
>>                                     :foreground "blue" :weight bold))))
>>     (svn-status-filename-face ((t (:foreground "magenta3"))))
>>     (svn-status-symlink-face  ((t (:foreground "cyan"))))
>>     (svn-status-locked-face ((t (:foreground "red" :weight bold))))
>>     (svn-status-switched-face ((t (:italic t :foreground "gray55"))))
>>
>>     ;; diff
>>     (diff-added ((t (:background "rgb:DD/FF/DD" :foreground "DarkGreen"))))
>>     (diff-hunk-header ((t (:background "rgb:EA/F2/F5" :foreground "rgb:99/99/99"))))
>>     (diff-index ((t (:background "rgb:EA/F2/F5" :foreground "rgb:99/99/99"))))
>>     (diff-indicator-added ((t (:background "rgb:AA/FF/AA"))))
>>     (diff-indicator-removed ((t (:background "rgb:FF/AA/AA"))))
>>     (diff-removed ((t (:background "rgb:FF/DD/DD" :foreground "DarkMagenta"))))
>>
>>     ;; dircolors
>>     (dircolors-face-asm ((t (:foreground "blue3"))))
>>     (dircolors-face-backup ((t (:foreground "blue3"))))
>>     (dircolors-face-compress ((t (:foreground "red"))))
>>     (dircolors-face-dir ((t (:foreground "blue" :weight bold))))
>>     (dircolors-face-doc ((t (:foreground "gold"))))
>>     (dircolors-face-dos ((t (:foreground "green3"))))
>>     (dircolors-face-emacs ((t (:foreground "turquoise3"))))
>>     (dircolors-face-html ((t (:foreground "gold"))))
>>     (dircolors-face-img ((t (:foreground "magenta3"))))
>>     (dircolors-face-lang ((t (:foreground "turquoise3"))))
>>     (dircolors-face-lang-interface ((t (:foreground "turquoise3"))))
>>     (dircolors-face-make ((t (:foreground "green3"))))
>>     (dircolors-face-objet ((t (:foreground "blue3"))))
>>     (dircolors-face-package ((t (:foreground "red"))))
>>     (dircolors-face-paddb ((t (:foreground "blue3"))))
>>     (dircolors-face-ps ((t (:foreground "gold"))))
>>     (dircolors-face-sound ((t (:foreground "magenta3"))))
>>     (dircolors-face-tar ((t (:foreground "red"))))
>>     (dircolors-face-yacc ((t (:foreground "turquoise3"))))
>>
>>     ;; dired
>>     (dired-face-boring ((t (:foreground "Gray65"))))
>>     (dired-face-directory ((t (:weight bold))))
>>     (dired-face-executable ((t (:foreground "SeaGreen"))))
>>     (dired-face-flagged ((t (:background "LightSlateGray"))))
>>     (dired-face-header ((t (:background "gray75" :foreground "black"))))
>>     (dired-face-marked ((t (:background "PaleVioletRed"))))
>>     (dired-face-permissions ((t (:background "gray75" :foreground "black"))))
>>     (dired-face-setuid ((t (:foreground "Red"))))
>>     (dired-face-socket ((t (:foreground "magenta"))))
>>     (dired-face-symlink ((t (:foreground "cyan"))))
>>
>>     ;; dired+
>>     (diredp-date-time ((t (:foreground "rgb:33/64/4E"))))
>>     (diredp-dir-heading ((t (:background "rgb:FF/F5/8F" :foreground "blue"
>>                                          :weight bold))))
>>     (diredp-dir-priv ((t (:background "rgb:FF/F5/8F" :foreground "blue"
>>                                       :weight bold))))
>>     (diredp-file-name ((t (:foreground "black"))))
>>     (diredp-file-suffix ((t (:foreground "rgb:7B/46/8E"))))
>>     (diredp-flag-mark-line ((t (:foreground "red" :weight bold))))
>>
>>     ;; emacs wiki
>>     (emacs-wiki-bad-link-face ((t (:foreground "red" :weight bold))))
>>     (emacs-wiki-header-1 ((t (:weight bold :height 1.4))))
>>     (emacs-wiki-header-2 ((t (:weight bold :height 1.3))))
>>     (emacs-wiki-header-3 ((t (:height 1.2))))
>>     (emacs-wiki-header-4 ((t (:height 1.1))))
>>     (emacs-wiki-header-5 ((t (:height 1.0))))
>>     (emacs-wiki-header-6 ((t (:height 0.9))))
>>     (emacs-wiki-link-face ((t (:foreground "blue" :underline t))))
>>
>>     ;; flypell
>>     (flyspell-duplicate-face ((t (:foreground "Gold3" :underline t
>>                                   :weight bold))))
>>     (flyspell-incorrect-face ((t (:foreground "red" :underline t
>>                                   :weight bold))))
>>
>>     ;; TeX
>>     (tex-verbatim ((t (:foreground "tan1"))))
>>
>>     ;; LaTeX
>>     (font-latex-bold-face ((t (:foreground "medium sea green" :weight bold))))
>>     (font-latex-math-face ((t (:foreground "black"))))
>>     (font-latex-sedate-face ((t (:foreground "gray45"))))
>>     (font-latex-verbatim-face ((t (:foreground "tan1"))))
>>     (font-latex-sectioning-1-face ((t (:foreground "cornflower blue" :weight bold :height 2.7 :family "Arial"))))
>>     (font-latex-sectioning-2-face ((t (:foreground "cornflower blue" :weight bold :height 1.8 :family "Arial"))))
>>     (font-latex-sectioning-3-face ((t (:foreground "LimeGreen" :weight bold :height 1.6 :family "Arial"))))
>>     (font-latex-sectioning-4-face ((t (:foreground "orange" :weight bold :height 1.3 :family "Arial"))))
>>     (font-latex-sectioning-5-face ((t (:foreground "IndianRed1"))))
>>
>>     ;;
>>     (font-lock-comment-face ((t (:foreground "red"))))
>>     (font-lock-constant-face ((t (:foreground "dark cyan"))))
>>  ;; (font-lock-doc-string-face ((t (:foreground "yellow"))))
>>     (font-lock-function-name-face ((t (:foreground "blue"))))
>>     (font-lock-keyword-face ((t (:foreground "purple1"))))
>>  ;; (font-lock-preprocessor-face ((t (:foreground "yellow"))))
>>     (font-lock-reference-face ((t (:foreground "dark cyan"))))
>>     (font-lock-string-face ((t (:foreground "green4"))))
>>     (font-lock-type-face ((t (:foreground "forest green"))))
>>     (font-lock-variable-name-face ((t (:foreground "magenta"))))
>>     (font-lock-warning-face ((t (:weight bold :foreground "red"))))
>>
>>     (pesche-space ((t (:background "LemonChiffon"))))
>>     (pesche-tab ((t (:background "Gold"))))
>>
>>     (fringe ((t (:foreground "rgb:AF/B7/BA" :background "rgb:DD/EE/FF"))))
>>     (linum ((t (:foreground "rgb:AF/B7/BA" :background "rgb:DD/EE/FF"))))
>>
>>     (gnus-splash-face ((t (:foreground "gold"))))
>>
>>     ;; Gnus group buffer
>>     (gnus-group-mail-1-empty-face ((t (:foreground "rgb:50/50/B0"))))
>>     (gnus-group-mail-1-face ((t (:foreground "rgb:FF/50/B0" :weight bold))))
>>     (gnus-group-mail-2-empty-face ((t (:foreground "rgb:66/00/66"))))
>>     (gnus-group-mail-2-face ((t (:foreground "rgb:FF/00/66" :weight bold))))
>>     (gnus-group-mail-3-empty-face ((t (:foreground "rgb:00/77/77"))))
>>     (gnus-group-mail-3-face ((t (:foreground "rgb:FF/77/77" :weight bold))))
>>
>>     (gnus-group-news-1-empty-face ((t (:foreground "rgb:50/50/B0"))))
>>     (gnus-group-news-1-face ((t (:foreground "rgb:FF/50/B0" :weight bold))))
>>     (gnus-group-news-2-empty-face ((t (:foreground "rgb:66/00/66"))))
>>     (gnus-group-news-2-face ((t (:foreground "rgb:FF/00/66" :weight bold))))
>>     (gnus-group-news-3-empty-face ((t (:foreground "rgb:00/77/77"))))
>>     (gnus-group-news-3-face ((t (:foreground "rgb:FF/77/77" :weight bold))))
>>     (gnus-group-news-4-empty-face ((t (:foreground "rgb:99/00/00"))))
>>     (gnus-group-news-4-face ((t (:foreground "rgb:FF/00/00" :weight bold))))
>>     (gnus-group-news-5-empty-face ((t (:foreground "rgb:00/00/99"))))
>>     (gnus-group-news-5-face ((t (:foreground "rgb:FF/00/99" :weight bold))))
>>     (gnus-group-news-6-empty-face ((t (:foreground "rgb:BB/66/00"))))
>>     (gnus-group-news-6-face ((t (:foreground "rgb:FF/66/00" :weight bold))))
>>
>>     ;; Gnus summary buffer
>>     (hl-line ((t (:background "rgb:D4/EA/FF"))))  ;; light blue
>>     (gnus-summary-selected-face ((t (:foreground "rgb:FF/66/33" :weight bold))))
>>     (gnus-summary-high-unread-face ((t (:foreground "blue" :weight bold))))
>>     (gnus-summary-high-read-face ((t (:foreground "rgb:80/00/80" :weight bold))))
>>     (gnus-summary-high-ticked-face ((t (:foreground "hot pink" :weight bold))))
>>     (gnus-summary-high-ancient-face ((t (:foreground "rgb:77/77/99" :weight bold))))
>>     (gnus-summary-normal-unread-face ((t (:foreground "blue"))))
>>     (gnus-summary-normal-read-face ((t (:foreground "rgb:80/00/80"))))
>>     (gnus-summary-normal-ticked-face ((t (:foreground "hot pink"))))
>>     (gnus-summary-normal-ancient-face ((t (:foreground "rgb:77/77/99"))))
>>     (gnus-summary-low-unread-face ((t (:low t :foreground "blue" :italic t))))
>>     (gnus-summary-low-read-face ((t (:low t :foreground "rgb:80/00/80" :italic t))))
>>     (gnus-summary-low-ticked-face ((t (:low t :foreground "hot pink" :italic t))))
>>     (gnus-summary-low-ancient-face ((t (:low t :foreground "rgb:77/77/99" :italic t))))
>>     (gnus-summary-cancelled-face ((t (:italic t :foreground "gray55" :strike-through t))))
>>
>>     ;; Gnus article buffer
>>     (gnus-header-name-face ((t (:foreground "rgb:33/99/CC" :weight bold :family "Arial"))))
>>     (gnus-header-from-face ((t (:foreground "blue" :family "Arial"))))
>>     (gnus-header-subject-face ((t (:foreground "rgb:FF/66/33" :weight bold))))
>>     (gnus-header-newsgroups-face ((t (:foreground "rgb:33/99/CC" :family "Arial"))))
>>     (gnus-header-content-face ((t (:foreground "rgb:33/99/CC" :family "Arial"))))
>>     (gnus-cite-attribution-face ((t (:foreground "rgb:50/50/B0"))))
>>     (gnus-cite-face-1 ((t (:foreground "rgb:50/50/B0"))))
>>     (gnus-cite-face-2 ((t (:foreground "rgb:66/00/66"))))
>>     (gnus-cite-face-3 ((t (:foreground "rgb:00/77/77"))))
>>     (gnus-cite-face-4 ((t (:foreground "rgb:99/00/00"))))
>>     (gnus-cite-face-5 ((t (:foreground "rgb:00/00/99"))))
>>     (gnus-cite-face-6 ((t (:foreground "rgb:BB/66/00"))))
>>     (gnus-cite-face-7 ((t (:foreground "rgb:50/50/B0"))))
>>     (gnus-cite-face-8 ((t (:foreground "rgb:66/00/66"))))
>>     (gnus-cite-face-9 ((t (:foreground "rgb:00/77/77"))))
>>     (gnus-cite-face-10 ((t (:foreground "rgb:99/00/00"))))
>>     (gnus-signature-face ((t (:foreground "rgb:7F/7F/7F"))))
>>     (gnus-emphasis-bold ((t (:weight bold))))
>>
>>     (widget-button-face ((t (:weight bold))))
>>     (widget-button-pressed-face ((t (:foreground "red"))))
>>     (widget-documentation-face ((t (:foreground "green4"))))
>>     (widget-field-face ((t (:background "gray85"))))
>>     (widget-inactive-face ((t (:foreground "dim gray"))))
>>     (widget-single-line-field-face ((t (:background "gray85"))))
>> ;;     (widget-mouse-face . highlight)
>>
>>     ;; when replying
>>     (message-header-name-face ((t (:foreground "rgb:33/99/CC" :weight bold
>>                                    :family "Arial"))))
>>     (message-header-to-face ((t (:foreground "blue" :family "Arial"))))
>>     (message-header-cc-face ((t (:foreground "blue" :family "Arial"))))
>>     (message-header-subject-face ((t (:foreground "rgb:FF/66/33" :weight bold))))
>>     (message-header-newsgroups-face ((t (:foreground "rgb:33/99/CC"
>>                                          :family "Arial"))))
>>     (message-header-xheader-face ((t (:foreground "red"))))
>>     (message-header-other-face ((t (:foreground "rgb:33/99/CC"
>>                                     :family "Arial"))))
>>     (message-separator-face ((t (:foreground "red" :weight bold :family "Arial"))))
>>     (message-cited-text-face ((t (:foreground "rgb:50/50/B0"))))
>>     (message-mml-face ((t (:foreground "forest green"))))
>>
>>     ;; Gnus/Message
>>     (gnus-emphasis-highlight-words ((t (:background "black"
>>                                         :foreground "yellow"))))
>>     (gnus-picon-face ((t (:background "white" :foreground "yellow"))))
>>     (gnus-picon-xbm-face ((t (:background "white" :foreground "yellow"))))
>>     (gnus-x-face ((t (:background "white" :foreground "black"))))
>>
>>     (html-helper-bold-face ((t (:foreground "black" :weight bold))))
>>     (html-helper-italic-face ((t (:foreground "black" :slant italic))))
>>     (html-helper-underline-face ((t (:foreground "black" :underline t))))
>>     (html-tag-face ((t (:foreground "blue"))))
>>
>>     (nxml-attribute-local-name-face ((t (:foreground "magenta"))))
>>     (nxml-attribute-value-delimiter-face ((t (:foreground "green4"))))
>>     (nxml-attribute-value-face ((t (:foreground "green4"))))
>>     (nxml-comment-content-face  ((t (:foreground "red" :slant italic))))
>>     (nxml-comment-delimiter-face ((t (:foreground "red"))))
>>     (nxml-element-local-name-face ((t (:foreground "blue"))))
>>     (nxml-processing-instruction-delimiter-face ((t (:foreground "purple1"))))
>>     (nxml-processing-instruction-target-face ((t (:foreground "purple1"))))
>>     (nxml-tag-delimiter-face ((t (:foreground "blue"))))
>>     (nxml-tag-slash-face ((t (:foreground "blue"))))
>>
>>     (anything-header ((t (:family "Sans Serif" :foreground "white" :weight bold :height 1.3 :background "rgb:66/66/99"))))
>>
>>     ;; Info
>>     (info-header-node ((t (:foreground "orange" :underline t)))) ; nodes in header
>>     (info-header-xref ((t (:foreground "dodger blue" :underline t)))) ; cross references in header
>>     (info-menu-header ((t (:foreground "red" :underline t)))) ; menu titles (headers) -- major topics
>>     (info-menu-star ((t (:foreground "black")))) ; every 3rd menu item
>>     (info-node ((t (:foreground "blue" :underline t)))) ; node names
>>     (info-xref ((t (:foreground "blue" :weight bold :underline t)))) ; unvisited cross-references
>>     (info-xref-visited ((t (:foreground "magenta4" :weight bold)))) ; previously visited cross-references
>>
>>     ;; info+
>>     (info-quoted-name ((t (:foreground "dark cyan")))) ; quoted names (`...')
>>     (info-string ((t (:foreground "green4")))) ; strings ("...")
>> ;;;  (info-menu ()) ; menu items
>> ;;;  (info-file ()) ; file heading labels
>>
>> ;;;      And for reference items in the Elisp manual,
>> ;;;      you can customize these faces:
>> ;;;          info-elisp-user-option-ref-item  - label `User Option'
>> ;;;          info-elisp-variable-ref-item     - label `Variable'
>> ;;;          info-elisp-command-ref-item      - label `Command'
>> ;;;          info-elisp-function-ref-item     - label `Function'
>> ;;;          info-elisp-macro-ref-item        - label `Macro'
>> ;;;          info-elisp-special-form-ref-item - label `Special Form'
>> ;;;          info-elisp-syntax-class-item     - label `Syntax Class'
>> ;;;          info-elisp-reference-item        - other reference labels
>>
>>     ;; highlighting matches
>>     (match ((t (:background "yellow" :foreground "rgb:EE/66/00" :weight bold))))
>>     (isearch ((t (:background "yellow" :foreground "rgb:EE/66/00" :weight bold))))
>>     (isearch-lazy-highlight-face ((t (:background "rgb:CC/FF/FF"
>>                                       :foreground "blue"
>>                                       :weight bold)))) ;; for GNU Emacs
>>     (isearch-secondary ((t (:background "rgb:CC/FF/FF"
>>                             :foreground "blue"
>>                             :weight bold)))) ;; for XEmacs
>>
>>     ;; make
>>     (makefile-space-face ((t (:background "hotpink"))))
>>
>>     ;; GNU Emacs mode-line
>>     (mode-line ((t (:background "rgb:00/97/CB" :foreground "rgb:FF/C7/7F"
>>                     :box (:line-width 1 :color "rgb:9E/AB/B6")
>>                     :weight normal))))
>>     (mode-line-inactive ((t (:background "rgb:00/63/82" :foreground "rgb:61/7A/82"
>>                             :box (:line-width 1 :color "rgb:9E/AB/B6")
>>                             :weight normal))))
>>     (mode-line-highlight ((t (:foreground "yellow"))))
>>     (mode-line-buffer-id ((t (:foreground "white"))))
>>
>>     ;; XEmacs modeline
>>     (modeline-mousable ((t (:foreground "firebrick"))))  ; major-mode string
>>     (modeline-mousable-minor-mode ((t (:foreground "green4"))))
>>
>>     ;; Muse
>>     (muse-verbatim ((t (:foreground "tan1"))))
>>     (muse-header-1 ((t (:foreground "red"))))  ; blue4
>>
>>     (muse-header-2 ((t (:inherit variable-pitch :foreground "LightBlue2" :weight bold :height 1.3))))
>>     (muse-header-3 ((t (:inherit variable-pitch :foreground "LightSkyBlue2" :height 1.2))))
>>     (muse-header-4 ((t (:inherit variable-pitch :foreground "LightSkyBlue3" :slant italic :height 1.1))))
>>     (muse-header-5 ((t (:inherit variable-pitch :foreground "LightSkyBlue3" :height 1.0))))
>>
>>     ;; org
>>     (org-agenda-date ((t (:background "LightSkyBlue"))))
>>     (org-agenda-date-today ((t (:background "yellow" :slant normal :weight bold))))
>>     (org-agenda-date-weekend ((t (:foreground "white" :background "blue4" :weight bold))))
>>     (org-code ((t (:foreground "blue"))))
>>
>>     (org-column ((t (:background "gold" :height 80 :family "Consolas"))))
>>     (org-agenda-column-dateline ((t (:background "deep sky blue" :height 80 :family "Consolas"))))
>>
>>     (org-done ((t (:foreground "green3" :weight bold :strike-through t))))
>>     (org-latex-and-export-specials ((t (:foreground "tan1"))))
>>     (org-level-1 ((t (:foreground "cornflower blue" :weight bold :height 1.8 :family "Arial"))))
>>     (org-level-2 ((t (:foreground "LimeGreen" :weight bold :height 1.6 :family "Arial"))))
>>     (org-level-3 ((t (:foreground "orange" :weight bold :height 1.3 :family "Arial"))))
>>     (org-level-4 ((t (:foreground "IndianRed1"))))
>>     (org-level-5 ((t (:foreground "cornflower blue"))))
>>     (org-level-6 ((t (:foreground "LimeGreen"))))
>>     (org-level-7 ((t (:foreground "orange"))))
>>     (org-level-8 ((t (:foreground "IndianRed1"))))
>>     (org-headline-done ((t (:foreground "rgb:AA/AA/AA" :weight bold :height 1.3 :family "Arial" :strike-through t))))
>>     (org-agenda-diary ((t (:foreground "DarkGreen" :background "lightblue" :weight bold))))
>>     (org-scheduled ((t (:foreground "blue" :weight bold))))
>>     (org-scheduled-today ((t (:foreground "DarkGreen" :weight bold))))
>>     (org-scheduled-previously ((t (:foreground "red" :weight bold))))
>>     (org-upcoming-deadline ((t (:foreground "white" :background "rgb:E9/A3/6A" :weight bold))))
>>     (org-warning ((t (:foreground "white" :background "rgb:D8/00/00" :weight bold))))
>>
>>     (sva-org-deadline-yesterday ((t (:foreground "white" :background "rgb:D8/00/00" :weight bold))))
>>     (sva-org-deadline-today ((t (:foreground "white" :background "rgb:E9/A3/6A" :weight bold))))
>>     (sva-org-deadline-tomorrow ((t (:foreground "black" :background "#B4F1B3" :weight bold))))
>>     (sva-org-deadline-later ((t (:foreground "black" :background "#AACAFC"))))
>>
>>     (org-special-keyword ((t (:foreground "red"))))
>>     (org-tag ((t (:foreground "rgb:81/6A/7D" :background "rgb:F7/B8/DE" :italic t))))
>>     (org-time-grid ((t (:foreground "gray60"))))
>>     (org-mode-line-clock ((t (:background "rgb:FF/90/00" :foreground "white")))) ; orange
>>     (org-mode-line-clock-overrun ((t (:background "red" :foreground "white"))))
>>
>>     (org-dim ((t (:foreground "rgb:AA/AA/AA"))))
>>     (org-document-title ((t (:foreground "blue" :weight bold))))
>>     (org-document-info-keyword ((t (:foreground "rgb:AA/AA/AA"))))
>>     (org-document-info ((t (:foreground "blue4"))))
>>
>>     ;; non-standard faces
>>     (sva-org-todo-kwd-face ((t (:foreground "gold" :background "tomato" :weight bold))))
>>     (sva-org-someday-kwd-face ((t (:foreground "gold" :background "tomato" :weight bold))))
>>     (sva-org-started-kwd-face ((t (:foreground "cyan" :background "steelblue" :weight bold))))
>>     (sva-org-waiting-kwd-face ((t (:foreground "gold" :background "magenta2" :weight bold))))
>>     (sva-org-delegated-kwd-face ((t (:foreground "gold" :background "magenta2" :weight bold))))
>>     (sva-org-deferred-kwd-face ((t (:foreground "gold" :background "magenta2" :weight bold))))
>>     (sva-org-done-kwd-face ((t (:foreground "rgb:AA/AA/AA" :background "black" :weight bold))))
>>     (sva-org-canceled-kwd-face ((t (:foreground "rgb:AA/AA/AA" :background "black" :weight bold))))
>>
>>     (sva-org-quote-kwd-face ((t (:foreground "yellow" :background "red" :weight bold))))
>>     (sva-org-quoted-kwd-face ((t (:foreground "yellow" :background "red" :weight bold))))
>>     (sva-org-approved-kwd-face ((t (:foreground "gray50" :background "gray30" :weight bold))))
>>     (sva-org-expired-kwd-face ((t (:foreground "gray50" :background "gray30" :weight bold))))
>>     (sva-org-rejected-kwd-face ((t (:foreground "gray50" :background "gray30" :weight bold))))
>>
>>     (sva-org-openpo-kwd-face ((t (:foreground "cyan" :background "steelblue" :weight bold))))
>>     (sva-org-closedpo-kwd-face ((t (:foreground "gray50" :background "gray30" :weight bold))))
>>
>>     ;; pretty print ^L
>>     (pp^L-highlight ((t (:inherit shadow :strike-through t))))
>>
>>     ;; selection
>>     (region ((t (:background "seashell2")))) ;; for GNU Emacs
>>     (zmacs-region ((t (:background "seashell2")))) ;; for XEmacs
>>     (secondary-selection ((t (:background "paleturquoise"))))
>>
>>     ;; for `cat <<EOF' in shell scripts
>>     (sh-heredoc ((t (:foreground "tan1"))))
>>
>>     ;; parentheses
>>     (paren-face-match ((t (:background "chartreuse"))))
>>     (paren-face-mismatch ((t (:background "purple" :foreground "white"
>>                               :weight bold))))
>>     (paren-face-no-match ((t (:background "purple" :foreground "white"
>>                               :weight bold))))
>>     (show-paren-match-face ((t (:background "chartreuse"))))
>>     (show-paren-mismatch-face ((t (:background "purple" :foreground "white"
>>                                    :weight bold))))
>>
>>     ;; shell
>>     (shell-prompt-face ((t (:weight bold :foreground "yellow"))))
>>     (shell-option-face ((t (:foreground "forest green"))))
>>     (shell-output-face ((t (:foreground "black"))))
>>     (shell-output-2-face ((t (:foreground "blue"))))
>>     (shell-output-3-face ((t (:foreground "purple"))))
>>
>>     ;; speedbar
>>     (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"))))
>>
>>     ;; tool-bar
>>     (tool-bar ((t (:background "gray75" :foreground "black" :box
>>                                (:line-width 1 :style released-button)))))
>>
>>     ;; tooltip
>>     (tooltip ((t (:background "lightyellow" :foreground "black"))))
>>
>>     ;; show trailing whitespace
>>     (trailing-whitespace ((t (:background "LemonChiffon"))))
>>
>>     ;; mouseless browsing
>>     (w3m-link-numbering ((t (:foreground "rgb:B4/C7/EB"))))
>>
>>     ;; w3m
>>     (w3m-anchor ((t (:foreground "blue"))))
>>     (w3m-current-anchor ((t (:foreground "blue" :weight bold :underline t))))
>>     (w3m-arrived-anchor ((t (:foreground "purple1"))))
>>     (w3m-form ((t (:foreground "tan1" :underline t))))
>>     (w3m-bold ((t (:foreground "medium sea green" :weight bold))))
>>
>>     (w3m-header-line-location-content-face ((t (:foreground "purple2"))))
>>     (w3m-header-line-location-title-face ((t (:foreground "cadet blue"))))
>>     (w3m-image-face ((t (:foreground "DarkSeaGreen2" :weight bold))))
>>     (w3m-strike-through-face ((t (:strike-through t))))
>>     (w3m-underline-face ((t (:underline t))))
>> ;;;      (w3m-tab-background-face ((t (:background "rgb:21/36/4B"))))
>> ;;;      (w3m-tab-selected-face ((t (:background "Gray85" :foreground "black" :box (:line-width 1 :style nil)))))
>> ;;;      (w3m-tab-selected-retrieving-face ((t (:background "Gray85" :foreground "white" :box (:line-width -1 :style nil)))))
>> ;;;      (w3m-tab-unselected-face ((t (:background "Gray70" :foreground "Gray20" :box (:line-width 1 :style nil)))))
>> ;;;      (w3m-tab-unselected-retrieving-face ((t (:background "Gray50" :foreground "white" :box (:line-width -1 :style nil)))))
>>     (w3m-bitmap-image-face ((t (:foreground "gray4" :background "green"))))
>> ;;;      (w3m-form-button-face ((t (:background "lightgray" :foreground "black"))))
>>     (w3m-form-button-face ((t (:foreground "gray4" :background "light gray" :weight bold :underline t))))
>> ;;;      (w3m-form-button-mouse-face ((t (:background "orange"))))
>>     (w3m-form-button-mouse-face ((t (:background "DarkGreen" :foreground "light gray" :underline t))))
>> ;;;      (w3m-form-button-pressed-face ((t (:background "yellow"))))
>>     (w3m-form-button-pressed-face ((t (:foreground "gray4" :background "light gray" :weight bold :underline t))))
>> ;;;      (w3m-history-current-url-face ((t (:background "SkyBlue4" :foreground "LightSkyBlue"))))
>>     (w3m-history-current-url-face ((t (:foreground "lemon chiffon"))))
>>
>>
>>     ;; IRC
>>     (circe-originator-face ((t (:foreground "blue"))))
>>     (circe-highlight-all-nicks-face ((t (:foreground "blue")))) ; other nicks
>>     (circe-highlight-nick-face ((t (:foreground "firebrick")))) ; message with my nick cited
>>     (lui-highlight-face ((t (:foreground "red")))) ; my nick
>>     (circe-my-message-face ((t (:foreground "red"))))
>>     (lui-time-stamp-face ((t (:foreground "orange"))))
>>     (lui-button-face ((t (:foreground "blue" :underline t))))
>>
>>     )))
>>
>> (provide 'color-theme-sva)
>>
>> ;;; color-theme-sva.el ends here
>> --8<---------------cut here---------------end--------------->8---
>>
>> Any comment is welcome!
>>
>> Best regards,
>>  Seb
>>
>> --
>> Sébastien Vauban
>>
>>
>>
>> _______________________________________________
>> Emacs-orgmode mailing list
>> Please use `Reply All' to send replies to the list.
>> Emacs-orgmode@gnu.org
>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode

^ permalink raw reply	[flat|nested] 7+ messages in thread

* Re: Re: org-mode color schemes with white or light background and black foregroung
  2010-05-05 21:25     ` Eric Schulte
@ 2010-05-06  8:06       ` Bastien
  2010-05-10 22:55         ` Eric Schulte
  0 siblings, 1 reply; 7+ messages in thread
From: Bastien @ 2010-05-06  8:06 UTC (permalink / raw)
  To: Eric Schulte; +Cc: Simao M, emacs-orgmode, Sébastien Vauban

"Eric Schulte" <schulte.eric@gmail.com> writes:

> Maybe this would make a good Worg page, a collection of org-mode
> screenshots along with the required color-theme.el file?

I started something like this long ago:

  http://lumiere.ens.fr/~guerry/org-color-themes.php

But the right place is in Worg, maybe as a section in the
org-screenshots.org page.

  http://orgmode.org/worg/org-screenshots.php

> If we get such a page going, I'd be happy to add my own dark color
> theme.

Please edit Worg or send me your screenshots/color-themes and I'll put
this online.

Thanks!

-- 
 Bastien

^ permalink raw reply	[flat|nested] 7+ messages in thread

* Re: Re: org-mode color schemes with white or light background and black foregroung
  2010-05-06  8:06       ` Bastien
@ 2010-05-10 22:55         ` Eric Schulte
  0 siblings, 0 replies; 7+ messages in thread
From: Eric Schulte @ 2010-05-10 22:55 UTC (permalink / raw)
  To: Bastien; +Cc: Simao M, emacs-orgmode, Sébastien Vauban

I've started a place for color-theme collection on Worg -- which
includes a link to instructions for gettings and using the
color-theme.el color theme management package.

Please see http://orgmode.org/worg/org-color-themes.php

Hopefully this page will serve as a simple way for org-mode users to
share color themes.  The .org file includes instructions for adding your
new theme and screenshot which should be very straightforward.

Best -- Eric

Bastien <bastien.guerry@wikimedia.fr> writes:

> "Eric Schulte" <schulte.eric@gmail.com> writes:
>
>> Maybe this would make a good Worg page, a collection of org-mode
>> screenshots along with the required color-theme.el file?
>
> I started something like this long ago:
>
>   http://lumiere.ens.fr/~guerry/org-color-themes.php
>
> But the right place is in Worg, maybe as a section in the
> org-screenshots.org page.
>
>   http://orgmode.org/worg/org-screenshots.php
>
>> If we get such a page going, I'd be happy to add my own dark color
>> theme.
>
> Please edit Worg or send me your screenshots/color-themes and I'll put
> this online.
>
> Thanks!

^ permalink raw reply	[flat|nested] 7+ messages in thread

end of thread, other threads:[~2010-05-10 22:55 UTC | newest]

Thread overview: 7+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2010-05-04 11:57 org-mode color schemes with white or light background and black foregroung Daniel Martins
2010-05-04 20:46 ` Sébastien Vauban
2010-05-05 16:00   ` Simao M
2010-05-05 21:25     ` Eric Schulte
2010-05-06  8:06       ` Bastien
2010-05-10 22:55         ` Eric Schulte
2010-05-05  7:55 ` Sébastien Vauban

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).