Skip to content
Find file
Fetching contributors…
Cannot retrieve contributors at this time
92 lines (75 sloc) 3.23 KB
;;; tomorrow-night-eighties-theme.el --- custom theme for faces
;;; Commentary:
;;
;;; Tomorrow Night Eighties Theme
;;
;; Originally by Chris Kempson https://github.com/ChrisKempson/Tomorrow-Theme
;; Ported to GNU Emacs by Chris Charles
;; Ported to GNU Emacs 24's built-in theme system by Jim Myhrberg (@jimeh)
;;; Code:
(deftheme tomorrow-night-eighties
"A Pastel Coloured Theme")
(let ((background "#2d2d2d")
(current-line "#393939")
(selection "#515151")
(foreground "#cccccc")
(comment "#999999")
(cursor "#cccccc")
(red "#f2777a")
(orange "#f99157")
(yellow "#ffcc66")
(green "#99cc99")
(aqua "#66cccc")
(blue "#6699cc")
(purple "#cc99cc"))
(custom-theme-set-faces
'tomorrow-night-eighties
;; Built-in stuff (Emacs 23)
`(default ((t (:background ,background :foreground ,foreground))))
`(fringe ((t (:background ,current-line))))
`(minibuffer-prompt ((t (:foreground ,blue))))
`(mode-line ((t (:background ,current-line :foreground ,foreground))))
`(region ((t (:background ,selection))))
;; Font-lock stuff
`(font-lock-comment-face ((t (:foreground ,comment))))
`(font-lock-constant-face ((t (:foreground ,green))))
`(font-lock-doc-string-face ((t (:foreground ,comment))))
`(font-lock-function-name-face ((t (:foreground ,blue))))
`(font-lock-keyword-face ((t (:foreground ,purple))))
`(font-lock-string-face ((t (:foreground ,green))))
`(font-lock-type-face ((t (:foreground ,yellow))))
`(font-lock-variable-name-face ((t (:foreground ,red))))
`(font-lock-warning-face ((t (:foreground ,red))))
;; hl-line-mode
`(hl-line ((t (:background ,current-line))))
;; linum-mode
`(linum ((t (:background ,current-line :foreground ,foreground))))
;; org-mode
`(org-date ((t (:foreground ,purple))))
`(org-done ((t (:foreground ,green))))
`(org-hide ((t (:foreground ,current-line))))
`(org-link ((t (:foreground ,blue))))
`(org-todo ((t (:foreground ,red))))
;; show-paren-mode
`(show-paren-match ((t (:background ,blue :foreground ,current-line))))
`(show-paren-mismatch ((t (:background ,orange :foreground ,current-line))))
;; rainbow-delimiters
`(rainbow-delimiters-depth-1-face ((t (:foreground ,purple))))
`(rainbow-delimiters-depth-2-face ((t (:foreground ,blue))))
`(rainbow-delimiters-depth-3-face ((t (:foreground ,aqua))))
`(rainbow-delimiters-depth-4-face ((t (:foreground ,green))))
`(rainbow-delimiters-depth-5-face ((t (:foreground ,yellow))))
`(rainbow-delimiters-depth-6-face ((t (:foreground ,orange))))
`(rainbow-delimiters-depth-7-face ((t (:foreground ,red))))
`(rainbow-delimiters-depth-8-face ((t (:foreground ,comment))))
`(rainbow-delimiters-depth-9-face ((t (:foreground ,foreground)))))
(custom-theme-set-variables
'tomorrow-night-eighties
`(ansi-color-names-vector
;; black, red, green, yellow, blue, magenta, cyan, white
[,background ,red ,green ,yellow ,blue ,purple ,blue ,foreground])
`(ansi-term-color-vector
;; black, red, green, yellow, blue, magenta, cyan, white
[unspecified ,background ,red ,green ,yellow ,blue ,purple ,blue ,foreground])))
(provide-theme 'tomorrow-night-eighties)
;;; tomorrow-night-eighties-theme.el ends here
Jump to Line
Something went wrong with that request. Please try again.