forked from don9z/blackboard-theme
-
Notifications
You must be signed in to change notification settings - Fork 0
/
blackboard-theme.el
83 lines (73 loc) · 3.6 KB
/
blackboard-theme.el
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
;; Blackboard Color Theme for Emacs.
;;
;; MIT License Copyright (c) 2008 JD Huntington <jdhuntington at gmail dot com>
;; Credits due to the excellent TextMate Blackboard theme
;;
;; All patches welcome
;; --------------
;; This porting makes blackboard no longer rely on color-theme package,
;; since Emacs has it's theme mechanism from Emacs 24.
;; How to use:
;; First, add a local directory to custome-theme-load-path,
;; (add-to-list 'custom-theme-load-path "~/home/$USER/drop/the/theme/to")
;; Then drop this theme into it,
;; M-x load-theme, then choose blackboard, it should work
;; Or, simple use (load-theme 'blackboard t) to enable the theme from start.
;;; blackboard-theme
;;; Code
(deftheme blackboard
"Based on Color theme by JD Huntington, which based off the TextMate Blackboard theme, created 2008-11-27")
(custom-theme-set-faces
`blackboard
`(default ((t (:background "#0C1021" :foreground "#F8F8F8" ))))
`(bold ((t (:bold t))))
`(bold-italic ((t (:bold t))))
`(border-glyph ((t (nil))))
`(buffers-tab ((t (:background "#0C1021" :foreground "#F8F8F8"))))
`(font-lock-builtin-face ((t (:foreground "#94bff3"))))
`(font-lock-comment-face ((t (:italic t :foreground "#AEAEAE"))))
`(font-lock-constant-face ((t (:foreground "#D8FA3C"))))
`(font-lock-doc-string-face ((t (:foreground "DarkOrange"))))
`(font-lock-function-name-face ((t (:foreground "#FF6400"))))
`(font-lock-keyword-face ((t (:foreground "#FBDE2D"))))
`(font-lock-preprocessor-face ((t (:foreground "Aquamarine"))))
`(font-lock-reference-face ((t (:foreground "SlateBlue"))))
`(font-lock-regexp-grouping-backslash ((t (:foreground "#E9C062"))))
`(font-lock-regexp-grouping-construct ((t (:foreground "red"))))
;; org-mode
`(org-hide ((t (:foreground "#2e3436"))))
`(org-level-1 ((t (:bold nil :foreground "dodger blue" :height 1.3))))
`(org-level-2 ((t (:bold nil :foreground "#edd400" :height 1.2))))
`(org-level-3 ((t (:bold nil :foreground "#6ac214" :height 1.1))))
`(org-level-4 ((t (:bold nil :foreground "tomato" :height 1.0))))
`(org-date ((t (:underline t :foreground "magenta3"))))
`(org-footnote ((t (:underline t :foreground "magenta3"))))
`(org-link ((t (:foreground "skyblue2" :background "#2e3436"))))
`(org-special-keyword ((t (:foreground "brown"))))
`(org-verbatim ((t (:foreground "#eeeeec" :underline t :slant italic))))
`(org-block ((t (:foreground "#bbbbbc"))))
`(org-quote ((t (:inherit org-block :slant italic))))
`(org-verse ((t (:inherit org-block :slant italic))))
`(org-todo ((t (:bold t :foreground "Red"))))
`(org-done ((t (:bold t :foreground "ForestGreen"))))
`(org-agenda-structure ((t (:weight bold :foreground "tomato"))))
`(org-agenda-date ((t (:foreground "#6ac214"))))
`(org-agenda-date-weekend ((t (:weight normal :foreground "dodger blue"))))
`(org-agenda-date-today ((t (:weight bold :foreground "#edd400"))))
`(font-lock-string-face ((t (:foreground "#61CE3C"))))
`(font-lock-type-face ((t (:foreground "#8DA6CE"))))
`(font-lock-variable-name-face ((t (:foreground "#FF6400"))))
`(font-lock-warning-face ((t (:bold t :foreground "pink"))))
`(gui-element ((t (:background "#D4D0C8" :foreground "black"))))
`(region ((t (:background "#253B76"))))
`(mode-line ((t (:background "grey75" :foreground "black"))))
`(highlight ((t (:background "#222222"))))
`(highline-face ((t (:background "SeaGreen"))))
`(italic ((t (nil))))
`(left-margin ((t (nil))))
`(text-cursor ((t (:background "yellow" :foreground "black"))))
`(toolbar ((t (nil))))
`(underline ((nil (:underline nil))))
`(zmacs-region ((t (:background "snow" :foreground "ble")))))
(provide-theme 'blackboard)
;;; blackboard-theme.el ends here.