Guest User

Untitled

a guest
Feb 27th, 2012
49
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.28 KB | None | 0 0
  1.  
  2. ;; -*- emacs-lisp -*-
  3. ;;
  4. ;;
  5. ;; name: color-theme-vim-colors
  6. ;; date: Fri Oct 22 2010 09:52:58 GMT-0500 (CDT)
  7. ;;
  8. ;;
  9. ;; To use this theme save this code into a
  10. ;; file named color-theme-vim-colors.el and place it
  11. ;; in a directory in your load-path
  12. ;;
  13. ;; (require 'color-theme-vim-colors)
  14. ;; (color-theme-vim-colors)
  15. ;;
  16.  
  17.  
  18. (require 'color-theme)
  19.  
  20. (defun color-theme-vim-colors ()
  21. "Generated with http://color-theme-select.heroku.com/ on Fri Oct 22 2010 09:52:58 GMT-0500 (CDT)
  22. Color theme by Michael Soulier, created 2003-03-26."
  23. (interactive)
  24. (color-theme-install
  25. '(color-theme-vim-colors
  26. (
  27. (background-color . "#ffffff")
  28. (background-mode . "light")
  29. (border-color . "black")
  30. (cursor-color . "#000000")
  31. (foreground-color . "#000000")
  32. (mouse-color . "#000000")
  33. )
  34. (
  35. (Man-overstrike-face . "bold")
  36. (Man-underline-face . "underline")
  37. (apropos-keybinding-face . "underline")
  38. (apropos-label-face . "italic")
  39. (apropos-match-face . "secondary-selection")
  40. (apropos-property-face . "bold-italic")
  41. (apropos-symbol-face . "bold")
  42. (cperl-here-face . "font-lock-string-face")
  43. (cperl-invalid-face . quote,underline)
  44. (cperl-pod-face . "font-lock-comment-face")
  45. (cperl-pod-head-face . "font-lock-variable-name-face")
  46. (help-highlight-face . "underline")
  47. (ispell-highlight-face . "highlight")
  48. (list-matching-lines-face . "bold")
  49. (rpm-spec-dir-face . "rpm-spec-dir-face")
  50. (rpm-spec-doc-face . "rpm-spec-doc-face")
  51. (rpm-spec-ghost-face . "rpm-spec-ghost-face")
  52. (rpm-spec-macro-face . "rpm-spec-macro-face")
  53. (rpm-spec-package-face . "rpm-spec-package-face")
  54. (rpm-spec-tag-face . "rpm-spec-tag-face")
  55. (tags-tag-face . "default")
  56. (view-highlight-face . "highlight")
  57. (widget-mouse-face . "highlight")
  58. )
  59. (default ((t (:background "#ffffff" :foreground "#000000"))))
  60. (Info-title-4-face ((t (:bold [object Object]))))
  61. (bold ((t (:bold [object Object]))))
  62. (bold-italic ((t (:italic [object Object] :weight bold :slant italic))))
  63. (border ((t (:background "black"))))
  64. (comint-highlight-input ((t (:bold [object Object]))))
  65. (comint-highlight-prompt ((t (:foreground "dark blue"))))
  66. (cperl-array-face ((t (:foreground "brown"))))
  67. (cperl-hash-face ((t (:foreground "red"))))
  68. (cperl-nonoverridable-face ((t (:foreground "#008b8b"))))
  69. (cursor ((t (:background "#000000"))))
  70. (font-lock-builtin-face ((t (:foreground "purple"))))
  71. (font-lock-comment-face ((t (:foreground "blue"))))
  72. (font-lock-constant-face ((t (:foreground "green4"))))
  73. (font-lock-doc-face ((t (:background "#f2f2f2"))))
  74. (font-lock-function-name-face ((t (:foreground "#008b8b"))))
  75. (font-lock-keyword-face ((t (:bold [object Object] :foreground "#a52a2a" :weight bold))))
  76. (font-lock-string-face ((t (:background "#f2f2f2" :foreground "#ff00ff"))))
  77. (font-lock-type-face ((t (:foreground "ForestGreen"))))
  78. (font-lock-variable-name-face ((t (:foreground "#008b8b"))))
  79. (font-lock-warning-face ((t (:bold [object Object] :foreground "Red" :weight bold))))
  80. (fringe ((t (:background "#e5e5e5"))))
  81. (header-line ((t (:background "grey90" :foreground "grey20"))))
  82. (highlight ((t (:background "darkseagreen2"))))
  83. (info-menu-5 ((t (:foreground "red1"))))
  84. (info-menu-header ((t (:bold [object Object]))))
  85. (info-node ((t (:italic [object Object] :foreground "brown" :weight bold :slant italic))))
  86. (info-xref ((t (:bold [object Object] :foreground "magenta4" :weight bold))))
  87. (isearch ((t (:background "magenta4" :foreground "lightskyblue1"))))
  88. (isearch-lazy-highlight-face ((t (:background "paleturquoise"))))
  89. (italic ((t (:italic [object Object]))))
  90. (mode-line ((t (:background "grey75" :foreground "black"))))
  91. (mouse ((t (:background "#000000"))))
  92. (region ((t (:background "lightgoldenrod2"))))
  93. (rpm-spec-dir-face ((t (:foreground "green"))))
  94. (rpm-spec-doc-face ((t (:foreground "magenta"))))
  95. (rpm-spec-ghost-face ((t (:foreground "red"))))
  96. (rpm-spec-macro-face ((t (:foreground "purple"))))
  97. (rpm-spec-package-face ((t (:foreground "red"))))
  98. (rpm-spec-tag-face ((t (:foreground "blue"))))
  99. (scroll-bar ((t (:background "grey75" :foreground "#000000"))))
  100. (secondary-selection ((t (:background "yellow"))))
  101. (sh-heredoc-face ((t (:foreground "tan"))))
  102. (show-paren-match-face ((t (:background "turquoise"))))
  103. (show-paren-mismatch-face ((t (:background "purple" :foreground "white"))))
  104. (tool-bar ((t (:background "grey75" :foreground "black"))))
  105. (tooltip ((t (:background "lightyellow" :foreground "black"))))
  106. (trailing-whitespace ((t (:background "red"))))
  107. (underline ((t (:underline t))))
  108. (widget-button-face ((t (:bold [object Object]))))
  109. (widget-button-pressed-face ((t (:foreground "red"))))
  110. (widget-documentation-face ((t (:foreground "dark green"))))
  111. (widget-field-face ((t (:background "gray85"))))
  112. (widget-inactive-face ((t (:foreground "dim gray"))))
  113. (widget-single-line-field-face ((t (:background "gray85"))))
  114. )
  115. )
  116. )
  117.  
  118. (provide 'color-theme-vim-colors)
Add Comment
Please, Sign In to add comment