Guest User

Untitled

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