Re: [Orgmode] Re: org-mode color schemes with white or light background and black foregroung

[Eric Schulte]

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 <address@hidden> writes:

> Screenshot please? :)
>
> 2010/5/4 Sébastien Vauban <address@hidden>:
>> 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.
>> address@hidden
>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> address@hidden
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode