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)