/
dehun-green-theme.el
84 lines (69 loc) · 3.32 KB
/
dehun-green-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
84
(unless (>= emacs-major-version 24)
(error "requires Emacs 24 or later."))
(deftheme dehun-green "dehun's theme for emacs")
(custom-theme-set-variables
'dehun-green
'(linum-format " %3i "))
(let ((background "#242c24")
(gutters "#444d56")
(gutter-fg "#75838e")
(gutters-active "#5f7b66")
(builtin "#e09780")
(foreground "#d0eed5")
(invisibles "#758e83")
(lineHighlight "#343d46")
(selection "#5f6b76")
(text "#c0cec5")
(comments "#657e73")
(punctuation "#c0cec5")
(delimiters "#c0cec5")
(operators "#c0cec5")
(keywords "#baed52")
(variables "#bf6a61")
(functions "#8fa1b3")
(methods "#8fa1b3")
(strings "#a3be8c")
(constants "#d08770")
(white "#ffffff"))
(custom-theme-set-faces
'dehun-green
;; Default colors
;; *****************************************************************************************
`(default ((t (:foreground ,text :background ,background))))
`(region ((t (:background ,selection ))))
`(cursor ((t (:background ,white ))))
`(fringe ((t (:background ,background :foreground ,white))))
`(linum ((t (:background ,background :foreground ,gutter-fg))))
`(mode-line ((t (:foreground ,white :background ,gutters-active ))))
`(mode-line-inactive ((t (:foreground ,gutter-fg :background ,gutters ))))
;; Font lock faces
;; *****************************************************************************************
`(font-lock-keyword-face ((t (:foreground ,keywords))))
`(font-lock-type-face ((t (:foreground ,punctuation))))
`(font-lock-constant-face ((t (:foreground ,constants))))
`(font-lock-variable-name-face ((t (:foreground ,variables))))
`(font-lock-builtin-face ((t (:foreground ,builtin))))
`(font-lock-string-face ((t (:foreground ,strings))))
`(font-lock-comment-face ((t (:foreground ,comments))))
`(font-lock-comment-delimiter-face ((t (:foreground ,delimiters))))
`(font-lock-function-name-face ((t (:foreground ,functions))))
`(vertical-border ((t (:foreground ,background))))
;; helm stuff
'(helm-selection ((t (:background "black" :underline "peach puff"))))
'(helm-match ((t (:foreground "#9acd32"))))
'(helm-source-header ((t (:background "gray10" :foreground "dark gray" :weight bold :height 1.3))))
'(minibuffer-prompt ((t (:foreground "burlywood"))))
;; linum
'(linum ((t (:inherit (shadow default) :foreground "#666666"))))
`(font-lock-doc-string-face ((t (:foreground ,strings)))))
;; *****************************************************************************************
)
;;;###autoload
(when (and (boundp 'custom-theme-load-path) load-file-name)
(add-to-list 'custom-theme-load-path
(file-name-as-directory (file-name-directory load-file-name))))
;; *****************************************************************************************
(provide-theme 'dehun-green)
;; Local Variables:
;; no-byte-compile: t
;; End: