pastels-on-dark-theme.el 3.1 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273
  1. ;;; pastels-on-dark-theme.el --- Pastels on Dark theme for Emacs 24
  2. ;; Author: Mats Persson
  3. ;; Maintainer: Shane Celis <shane (at) gnufoo (dot) org>
  4. ;; URL: http://gist.github.com/1906662
  5. ;; Version: 0.3
  6. ;; Keywords: theme, color
  7. ;;; Commentary:
  8. ;; Pastels on Dark was created by Mats Persson and popularized in
  9. ;; TextMate.app. Ported to Emacs 24 by Shane Celis because I love it!
  10. ;; To install the theme, M-x `load-theme' then enter
  11. ;; `pastels-on-dark'. If you run into any issues, check the
  12. ;; `custom-theme-load-path' variable.
  13. ;;; Code:
  14. (deftheme pastels-on-dark
  15. "Pastels on Dark created by Mats Persson and popularized in TextMate.app. Ported to Emacs 24 by Shane Celis because I love it!")
  16. (custom-theme-set-faces
  17. 'pastels-on-dark
  18. '(cursor ((t (:background "#FFFFFF"))))
  19. '(escape-glyph ((t (:foreground "#47B8D6"))))
  20. '(minibuffer-prompt ((t (:foreground "#47B8D6"))))
  21. '(highlight ((t (:background "#262626"))))
  22. '(region ((t (:background "#322A31"))))
  23. '(shadow ((t (:foreground "#555555"))))
  24. '(secondary-selection ((t (:background "#463849"))))
  25. '(trailing-whitespace ((t (:background "#FFD0D0"))))
  26. '(font-lock-builtin-face ((t (:foreground "#7171F3" :weight bold))))
  27. '(font-lock-comment-delimiter-face ((t (:foreground "#ed5b15" :inherit font-lock-comment-face))))
  28. '(font-lock-comment-face ((t (:foreground "#ed5b15"))))
  29. '(font-lock-constant-face ((t (:foreground "#DF7921" :weight bold))))
  30. '(font-lock-function-name-face ((t (:foreground "#A1A1FF"))))
  31. '(font-lock-keyword-face ((t (:foreground "#4856F7" :weight bold))))
  32. '(font-lock-preprocessor-face ((t (:foreground "#4856F7"))))
  33. '(font-lock-regexp-grouping-backslash ((t (:inherit bold :foreground "#666666"))))
  34. '(font-lock-regexp-grouping-construct ((t (:inherit bold :foreground "#666666"))))
  35. '(font-lock-string-face ((t (:foreground "#A2925E"))))
  36. '(font-lock-type-face ((t (:foreground "#DADADA"))))
  37. '(font-lock-variable-name-face ((t (:foreground "#C1C144"))))
  38. '(font-lock-warning-face ((t (:foreground "#EC9E00"))))
  39. '(link ((t (:foreground "#0066FF" :underline t))))
  40. '(link-visited ((t (:inherit link :foreground "#FF0066"))))
  41. '(fringe ((t nil)))
  42. '(mode-line-highlight ((t (:box (:line-width 2 :color "grey40" :style released-button)))))
  43. '(isearch ((t (:background "#463849" :foreground "#ffffff" :weight bold))))
  44. '(compilation-error ((t (:inherit error))))
  45. '(error ((t (:foreground "#B20006" :weight bold))))
  46. '(warning ((t (:foreground "#FF8000" :weight bold))))
  47. '(success ((t (:foreground "#00DD00" :weight bold))))
  48. '(compilation-line-number ((t (:foreground "#EC9E00"))))
  49. '(glyphless-char ((t (:background "#4F4D4D"))))
  50. '(lazy-highlight ((t (:background "#302733"))))
  51. '(default ((t (:stipple nil :background "#211D1D" :foreground "#DADADA" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 120 :width normal :foundry "apple" :family "Monaco")))))
  52. ;;;###autoload
  53. (when load-file-name
  54. (add-to-list 'custom-theme-load-path
  55. (file-name-as-directory (file-name-directory load-file-name))))
  56. (provide-theme 'pastels-on-dark)
  57. ;; Local Variables:
  58. ;; no-byte-compile: t
  59. ;; End:
  60. ;;; pastels-on-dark-theme.el ends here