twilight-theme.el 3.2 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374
  1. ;;; twilight-theme.el --- Twilight theme for GNU Emacs 24 (deftheme)
  2. ;; Version: 1.0.0
  3. ;; Author: Nick Parker <nickp@developernotes.com>
  4. ;;
  5. ;; Defines a colour scheme resembling that of the original TextMate Twilight colour theme.
  6. ;; To use add the following to your .emacs file (requires the color-theme package):
  7. ;;
  8. ;; (require 'color-theme)
  9. ;; (color-theme-initialize)
  10. ;; (load-file "~/.emacs.d/twilight-emacs/color-theme-twilight.el")
  11. ;;
  12. ;; And then (color-theme-twilight) to activate it.
  13. ;;
  14. ;; Several areas still require improvement such as recognition of code that ruby-mode doesn't
  15. ;; yet pick up (eg. parent classes), Rails/Merb keywords, or non Ruby code related areas
  16. ;; (eg. dired, HTML, etc). Please feel free to customize further and send in any improvements,
  17. ;; patches most welcome.
  18. ;;
  19. ;; MIT License Copyright (c) 2008 Marcus Crafter <crafterm@redartisan.com>
  20. ;; Credits due to the excellent TextMate Twilight theme
  21. ;;
  22. ;; Thanks to Travis Jeffery for ido-mode and fixes to the minibuffer-prompt to fit in with the rest of the theme
  23. ;;
  24. (deftheme twilight
  25. "Twilight color theme")
  26. (custom-theme-set-faces
  27. 'twilight
  28. '(default ((t (:background "#141414" :foreground "#f8f8f8"))))
  29. '(cursor ((t (:foreground "#a7a7a7"))))
  30. '(region ((t (:background "#27292a"))))
  31. '(blue ((t (:foreground "blue"))))
  32. '(border-glyph ((t (nil))))
  33. '(buffers-tab ((t (:background "#141414" :foreground "#CACACA"))))
  34. '(font-lock-builtin-face ((t (:foreground "#CACACA"))))
  35. '(font-lock-comment-face ((t (:foreground "#5F5A60"))))
  36. '(font-lock-constant-face ((t (:foreground "#CF6A4C"))))
  37. '(font-lock-doc-string-face ((t (:foreground "DarkOrange"))))
  38. '(font-lock-function-name-face ((t (:foreground "#9B703F"))))
  39. '(font-lock-keyword-face ((t (:foreground "#CDA869"))))
  40. '(font-lock-preprocessor-face ((t (:foreground "Aquamarine"))))
  41. '(font-lock-reference-face ((t (:foreground "SlateBlue"))))
  42. '(font-lock-regexp-grouping-backslash ((t (:foreground "#E9C062"))))
  43. '(font-lock-regexp-grouping-construct ((t (:foreground "red"))))
  44. '(minibuffer-prompt ((t (:foreground "#5F5A60"))))
  45. '(ido-subdir ((t (:foreground "#CF6A4C"))))
  46. '(ido-first-match ((t (:foreground "#8F9D6A"))))
  47. '(ido-only-match ((t (:foreground "#8F9D6A"))))
  48. '(mumamo-background-chunk-submode ((t (:background "#222222"))))
  49. '(font-lock-string-face ((t (:foreground "#8F9D6A"))))
  50. '(font-lock-type-face ((t (:foreground "#9B703F"))))
  51. '(font-lock-variable-name-face ((t (:foreground "#7587A6"))))
  52. '(font-lock-warning-face ((t (:background "#EE799F" :foreground "red"))))
  53. '(gui-element ((t (:background "#D4D0C8" :foreground "black"))))
  54. '(region ((t (:background "#27292A"))))
  55. '(mode-line ((t (:background "grey75" :foreground "black"))))
  56. '(highlight ((t (:background "#111111"))))
  57. '(highline-face ((t (:background "SeaGreen"))))
  58. '(left-margin ((t (nil))))
  59. '(text-cursor ((t (:background "yellow" :foreground "black"))))
  60. '(toolbar ((t (nil))))
  61. '(underline ((nil (:underline nil))))
  62. '(zmacs-region ((t (:background "snow" :foreground "blue")))))
  63. ;;;###autoload
  64. (when load-file-name
  65. (add-to-list 'custom-theme-load-path
  66. (file-name-as-directory (file-name-directory load-file-name))))
  67. (provide-theme 'twilight)
  68. ;;; twilight-theme.el ends here