Pastebin launched a little side project called HostCabi.net, check it out ;-)Don't like ads? PRO users don't see any ads ;-)
Guest

Untitled

By: a guest on Feb 27th, 2012  |  syntax: None  |  size: 13.70 KB  |  hits: 27  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1.  
  2. ;; -*- emacs-lisp -*-
  3. ;;
  4. ;;
  5. ;; name: color-theme-light
  6. ;; date: Sat Oct 23 2010 11:30:16 GMT+1100 (VLAT)
  7. ;;
  8. ;;
  9. ;; To use this theme save this code into a
  10. ;; file named color-theme-light.el and place it
  11. ;; in a directory in your load-path
  12. ;;
  13. ;;    (require 'color-theme-light)
  14. ;;    (color-theme-light)
  15. ;;
  16.  
  17.  
  18. (require 'color-theme)
  19.  
  20. (defun color-theme-light ()
  21.   "Generated with http://color-theme-select.heroku.com/ on Sat Oct 23 2010 11:30:15 GMT+1100 (VLAT)  
  22. Color theme by vic, created 2010-08-20."
  23.   (interactive)
  24.   (color-theme-install
  25.     '(color-theme-light
  26.       (
  27.        (background-color . "white")
  28.        (background-mode . "light")
  29.        (border-color . "black")
  30.        (cursor-color . "#141312")
  31.        (foreground-color . "black")
  32.        (mouse-color . "#141312")
  33.       )
  34.       (
  35.        (Man-overstrike-face . "bold")
  36.        (Man-reverse-face . "highlight")
  37.        (Man-underline-face . "underline")
  38.        (ebnf-except-border-color . "Black")
  39.        (ebnf-line-color . "Black")
  40.        (ebnf-non-terminal-border-color . "Black")
  41.        (ebnf-repeat-border-color . "Black")
  42.        (ebnf-special-border-color . "Black")
  43.        (ebnf-terminal-border-color . "Black")
  44.        (list-matching-lines-buffer-name-face . "underline")
  45.        (list-matching-lines-face . "match")
  46.        (org-goto-interface . "outline")
  47.        (ps-line-number-color . "black")
  48.        (ps-zebra-color . 0.95)
  49.        (term-default-bg-color . "white")
  50.        (term-default-fg-color . "black")
  51.        (view-highlight-face . "highlight")
  52.        (widget-mouse-face . "highlight")
  53.       )
  54.       (default  ((t (:background "white" :foreground "black" :slant normal :weight normal :height 120 :width normal :foundry "unknown" :family "DejaVu Sans Mono"))))
  55.       (bold  ((t (:bold t :weight bold))))
  56.       (bold-italic  ((t (:italic t :slant italic :weight bold))))
  57.       (buffer-menu-buffer  ((t (:bold t :weight bold))))
  58.       (button  ((t (:underline t))))
  59.       (c-nonbreakable-space-face  ((t (:bold t :background "Red1" :weight bold))))
  60.       (comint-highlight-input  ((t (:bold t :weight bold))))
  61.       (comint-highlight-prompt  ((t (:foreground "dark blue"))))
  62.       (completions-common-part  ((t (:family "DejaVu Sans Mono" :foundry "unknown" :width normal :weight normal :slant normal :foreground "black" :background "white" :height 120))))
  63.       (completions-first-difference  ((t (:bold t :weight bold))))
  64.       (custom-button  ((t (:background "lightgrey" :foreground "black" :box ( :line-width 2 :style released-button )))))
  65.       (custom-button-mouse  ((t (:background "grey90" :foreground "black" :box ( :line-width 2 :style released-button )))))
  66.       (custom-button-pressed  ((t (:background "lightgrey" :foreground "black" :box ( :line-width 2 :style pressed-button )))))
  67.       (custom-button-pressed-unraised  ((t (:underline t :foreground "magenta4"))))
  68.       (custom-button-unraised  ((t (:underline t))))
  69.       (custom-changed  ((t (:background "blue1" :foreground "white"))))
  70.       (custom-comment  ((t (:background "gray85"))))
  71.       (custom-comment-tag  ((t (:foreground "blue4"))))
  72.       (custom-face-tag  ((t (:bold t :weight bold :foreground "blue1"))))
  73.       (custom-group-tag  ((t (:bold t :family "Sans Serif" :foreground "blue1" :weight bold :height 1.2))))
  74.       (custom-group-tag-1  ((t (:bold t :family "Sans Serif" :foreground "red1" :weight bold :height 1.2))))
  75.       (custom-invalid  ((t (:background "red1" :foreground "yellow1"))))
  76.       (custom-link  ((t (:underline t :foreground "blue1"))))
  77.       (custom-modified  ((t (:background "blue1" :foreground "white"))))
  78.       (custom-rogue  ((t (:background "black" :foreground "pink"))))
  79.       (custom-saved  ((t (:underline t))))
  80.       (custom-set  ((t (:background "white" :foreground "blue1"))))
  81.       (custom-state  ((t (:foreground "dark green"))))
  82.       (custom-themed  ((t (:background "blue1" :foreground "white"))))
  83.       (custom-variable-button  ((t (:bold t :underline t :weight bold))))
  84.       (custom-variable-tag  ((t (:bold t :foreground "blue1" :weight bold))))
  85.       (custom-visibility  ((t (:underline t :foreground "blue1" :height 0.8))))
  86.       (diff-context  ((t (:foreground "grey50"))))
  87.       (diff-file-header  ((t (:bold t :background "grey70" :weight bold))))
  88.       (diff-function  ((t (:background "grey80"))))
  89.       (diff-header  ((t (:background "grey80"))))
  90.       (diff-hunk-header  ((t (:background "grey80"))))
  91.       (diff-index  ((t (:bold t :weight bold :background "grey70"))))
  92.       (diff-nonexistent  ((t (:bold t :weight bold :background "grey70"))))
  93.       (diff-refine-change  ((t (:background "grey85"))))
  94.       (dired-directory  ((t (:foreground "Blue1"))))
  95.       (dired-flagged  ((t (:bold t :weight bold :foreground "Red1"))))
  96.       (dired-header  ((t (:foreground "ForestGreen"))))
  97.       (dired-ignored  ((t (:foreground "grey50"))))
  98.       (dired-mark  ((t (:foreground "CadetBlue"))))
  99.       (dired-marked  ((t (:bold t :weight bold :foreground "Red1"))))
  100.       (dired-perm-write  ((t (:foreground "Firebrick"))))
  101.       (dired-symlink  ((t (:foreground "Purple"))))
  102.       (dired-warning  ((t (:bold t :weight bold :foreground "Red1"))))
  103.       (eldoc-highlight-function-argument  ((t (:bold t :weight bold))))
  104.       (escape-glyph  ((t (:foreground "brown"))))
  105.       (eshell-ls-archive  ((t (:bold t :foreground "Orchid" :weight bold))))
  106.       (eshell-ls-backup  ((t (:foreground "OrangeRed"))))
  107.       (eshell-ls-clutter  ((t (:bold t :foreground "OrangeRed" :weight bold))))
  108.       (eshell-ls-directory  ((t (:bold t :foreground "Blue" :weight bold))))
  109.       (eshell-ls-executable  ((t (:bold t :foreground "ForestGreen" :weight bold))))
  110.       (eshell-ls-missing  ((t (:bold t :foreground "Red" :weight bold))))
  111.       (eshell-ls-product  ((t (:foreground "OrangeRed"))))
  112.       (eshell-ls-readonly  ((t (:foreground "Brown"))))
  113.       (eshell-ls-special  ((t (:bold t :foreground "Magenta" :weight bold))))
  114.       (eshell-ls-symlink  ((t (:bold t :foreground "Dark Cyan" :weight bold))))
  115.       (eshell-ls-unreadable  ((t (:foreground "Grey30"))))
  116.       (eshell-prompt  ((t (:bold t :foreground "Red" :weight bold))))
  117.       (file-name-shadow  ((t (:foreground "grey50"))))
  118.       (fixed-pitch  ((t (:family "Monospace"))))
  119.       (font-lock-builtin-face  ((t (:foreground "Orchid"))))
  120.       (font-lock-comment-delimiter-face  ((t (:foreground "Firebrick"))))
  121.       (font-lock-comment-face  ((t (:foreground "Firebrick"))))
  122.       (font-lock-constant-face  ((t (:foreground "CadetBlue"))))
  123.       (font-lock-doc-face  ((t (:foreground "RosyBrown"))))
  124.       (font-lock-function-name-face  ((t (:foreground "Blue1"))))
  125.       (font-lock-keyword-face  ((t (:foreground "Purple"))))
  126.       (font-lock-preprocessor-face  ((t (:foreground "Orchid"))))
  127.       (font-lock-regexp-grouping-backslash  ((t (:bold t :weight bold))))
  128.       (font-lock-regexp-grouping-construct  ((t (:bold t :weight bold))))
  129.       (font-lock-string-face  ((t (:foreground "RosyBrown"))))
  130.       (font-lock-type-face  ((t (:foreground "ForestGreen"))))
  131.       (font-lock-variable-name-face  ((t (:foreground "DarkGoldenrod"))))
  132.       (font-lock-warning-face  ((t (:bold t :foreground "Red1" :weight bold))))
  133.       (fringe  ((t (:background "grey95"))))
  134.       (header-line  ((t (:box ( :line-width -1 :style released-button ) :background "grey90" :foreground "grey20"))))
  135.       (help-argument-name  ((t (:italic t :slant italic))))
  136.       (highlight  ((t (:background "darkseagreen2"))))
  137.       (ido-first-match  ((t (:bold t :weight bold))))
  138.       (ido-incomplete-regexp  ((t (:bold t :weight bold :foreground "Red1"))))
  139.       (ido-indicator  ((t (:background "red1" :foreground "yellow1" :width condensed))))
  140.       (ido-only-match  ((t (:foreground "ForestGreen"))))
  141.       (ido-subdir  ((t (:foreground "red1"))))
  142.       (info-header-node  ((t (:italic t :weight bold :slant italic :foreground "brown"))))
  143.       (info-header-xref  ((t (:foreground "blue1" :underline t))))
  144.       (info-menu-header  ((t (:bold t :family "Sans Serif" :weight bold))))
  145.       (info-menu-star  ((t (:foreground "red1"))))
  146.       (info-node  ((t (:italic t :foreground "brown" :slant italic :weight bold))))
  147.       (info-title-1  ((t (:bold t :weight bold :family "Sans Serif" :height 1.728))))
  148.       (info-title-2  ((t (:bold t :family "Sans Serif" :weight bold :height 1.44))))
  149.       (info-title-3  ((t (:bold t :weight bold :family "Sans Serif" :height 1.2))))
  150.       (info-title-4  ((t (:bold t :family "Sans Serif" :weight bold))))
  151.       (info-xref  ((t (:underline t :foreground "blue1"))))
  152.       (isearch  ((t (:background "magenta3" :foreground "lightskyblue1"))))
  153.       (isearch-fail  ((t (:background "RosyBrown1"))))
  154.       (italic  ((t (:italic t :slant italic))))
  155.       (lazy-highlight  ((t (:background "paleturquoise"))))
  156.       (link  ((t (:foreground "blue1" :underline t))))
  157.       (link-visited  ((t (:underline t :foreground "magenta4"))))
  158.       (match  ((t (:background "yellow1"))))
  159.       (minibuffer-prompt  ((t (:foreground "medium blue"))))
  160.       (mode-line  ((t (:background "grey75" :foreground "black" :box ( :line-width -1 :style released-button )))))
  161.       (mode-line-buffer-id  ((t (:bold t :weight bold))))
  162.       (mode-line-emphasis  ((t (:bold t :weight bold))))
  163.       (mode-line-highlight  ((t (:box ( )))))
  164.       (mode-line-inactive  ((t (:background "grey90" :foreground "grey20" :box ( :line-width -1 :color "grey75" :style nil ) :weight light))))
  165.       (next-error  ((t (:background "lightgoldenrod2"))))
  166.       (nobreak-space  ((t (:foreground "brown" :underline t))))
  167.       (org-agenda-column-dateline  ((t (:family "DejaVu Sans Mono" :weight normal :slant normal :background "grey90" :height 120))))
  168.       (org-agenda-date  ((t (:foreground "Blue1"))))
  169.       (org-agenda-date-weekend  ((t (:bold t :foreground "Blue1" :weight bold))))
  170.       (org-agenda-dimmed-todo-face  ((t (:foreground "grey50"))))
  171.       (org-agenda-restriction-lock  ((t (:background "yellow1"))))
  172.       (org-agenda-structure  ((t (:foreground "Blue1"))))
  173.       (org-archived  ((t (:foreground "grey50"))))
  174.       (org-clock-overlay  ((t (:background "yellow1"))))
  175.       (org-code  ((t (:foreground "grey50"))))
  176.       (org-column  ((t (:background "grey90" :slant normal :weight normal :height 120 :family "DejaVu Sans Mono"))))
  177.       (org-column-title  ((t (:bold t :background "grey90" :underline t :weight bold))))
  178.       (org-date  ((t (:foreground "Purple" :underline t))))
  179.       (org-done  ((t (:bold t :foreground "ForestGreen" :weight bold))))
  180.       (org-drawer  ((t (:foreground "Blue1"))))
  181.       (org-ellipsis  ((t (:foreground "DarkGoldenrod" :underline t))))
  182.       (org-footnote  ((t (:foreground "Purple" :underline t))))
  183.       (org-formula  ((t (:foreground "Firebrick"))))
  184.       (org-headline-done  ((t (:foreground "RosyBrown"))))
  185.       (org-hide  ((t (:foreground "white"))))
  186.       (org-latex-and-export-specials  ((t (:foreground "SaddleBrown"))))
  187.       (org-level-1  ((t (:foreground "Blue1"))))
  188.       (org-level-2  ((t (:foreground "DarkGoldenrod"))))
  189.       (org-level-3  ((t (:foreground "Purple"))))
  190.       (org-level-4  ((t (:foreground "Firebrick"))))
  191.       (org-level-5  ((t (:foreground "ForestGreen"))))
  192.       (org-level-6  ((t (:foreground "CadetBlue"))))
  193.       (org-level-7  ((t (:foreground "Orchid"))))
  194.       (org-level-8  ((t (:foreground "RosyBrown"))))
  195.       (org-link  ((t (:foreground "Purple" :underline t))))
  196.       (org-scheduled  ((t (:foreground "DarkGreen"))))
  197.       (org-scheduled-previously  ((t (:foreground "Firebrick"))))
  198.       (org-scheduled-today  ((t (:foreground "DarkGreen"))))
  199.       (org-sexp-date  ((t (:foreground "Purple"))))
  200.       (org-special-keyword  ((t (:foreground "RosyBrown"))))
  201.       (org-table  ((t (:foreground "Blue1"))))
  202.       (org-tag  ((t (:bold t :weight bold))))
  203.       (org-target  ((t (:underline t))))
  204.       (org-time-grid  ((t (:foreground "DarkGoldenrod"))))
  205.       (org-todo  ((t (:bold t :foreground "Red1" :weight bold))))
  206.       (org-upcoming-deadline  ((t (:foreground "Firebrick"))))
  207.       (org-verbatim  ((t (:foreground "grey50" :underline t))))
  208.       (org-warning  ((t (:bold t :weight bold :foreground "Red1"))))
  209.       (outline-1  ((t (:foreground "Blue1"))))
  210.       (outline-2  ((t (:foreground "DarkGoldenrod"))))
  211.       (outline-3  ((t (:foreground "Purple"))))
  212.       (outline-4  ((t (:foreground "Firebrick"))))
  213.       (outline-5  ((t (:foreground "ForestGreen"))))
  214.       (outline-6  ((t (:foreground "CadetBlue"))))
  215.       (outline-7  ((t (:foreground "Orchid"))))
  216.       (outline-8  ((t (:foreground "RosyBrown"))))
  217.       (query-replace  ((t (:foreground "lightskyblue1" :background "magenta3"))))
  218.       (region  ((t (:background "lightgoldenrod2"))))
  219.       (secondary-selection  ((t (:background "yellow1"))))
  220.       (sgml-namespace  ((t (:foreground "Orchid"))))
  221.       (shadow  ((t (:foreground "grey50"))))
  222.       (speedbar-button-face  ((t (:foreground "green4"))))
  223.       (speedbar-directory-face  ((t (:foreground "blue4"))))
  224.       (speedbar-file-face  ((t (:foreground "cyan4"))))
  225.       (speedbar-highlight-face  ((t (:background "green"))))
  226.       (speedbar-selected-face  ((t (:foreground "red" :underline t))))
  227.       (speedbar-separator-face  ((t (:background "blue" :foreground "white" :overline "gray"))))
  228.       (speedbar-tag-face  ((t (:foreground "brown"))))
  229.       (tool-bar  ((t (:background "grey75" :foreground "black" :box ( :line-width 1 :style released-button )))))
  230.       (tooltip  ((t (:family "Sans Serif" :background "lightyellow" :foreground "black"))))
  231.       (trailing-whitespace  ((t (:background "red1"))))
  232.       (underline  ((t (:underline t))))
  233.       (variable-pitch  ((t (:family "Sans Serif"))))
  234.       (widget-button  ((t (:bold t :weight bold))))
  235.       (widget-button-pressed  ((t (:foreground "red1"))))
  236.       (widget-documentation  ((t (:foreground "dark green"))))
  237.       (widget-field  ((t (:background "gray85"))))
  238.       (widget-inactive  ((t (:foreground "grey50"))))
  239.       (widget-single-line-field  ((t (:background "gray85"))))
  240.      )
  241.   )
  242. )
  243.  
  244. (provide 'color-theme-light)