custom-dark-theme.el (1657B)
1 (deftheme custom-dark 2 "dark theme") 3 4 (let ((class '((class color) (min-colors 89))) 5 (foreground "#ffffd0") 6 (background "#0a0000") 7 (background2 "gray15") 8 (background3 "gray9") 9 (modeline "#4b004b")) 10 (custom-theme-set-faces 11 'custom-dark 12 ;; Text 13 `(default ((,class (:background ,background :foreground ,foreground :weight normal)))) 14 `(line-number-current-line ((,class (:inherit 'secondary-selection)))) 15 `(secondary-selection ((,class (:background ,background3 :extend t)))) 16 `(helm-source-header ((,class (:inherit 'bold)))) 17 `(font-lock-doc-face ((,class (:slant italic :inherit font-lock-string-face)))) 18 `(dired-async-mode-message ((,class (:foreground "darkred")))) 19 `(org-hide ((,class (:foreground ,background)))) 20 `(erc-current-nick-face ((,class (:foreground "OrangeRed2")))) 21 `(erc-my-nick-face ((,class (:foreground "Lightskyblue3")))) 22 `(erc-input-face ((,class (:foreground "Lightskyblue3")))) 23 24 ;; Not really text 25 `(tooltip ((,class (:inherit 'default)))) 26 `(region ((,class (:background ,background2)))) 27 `(fringe ((,class (:inherit 'default)))) 28 `(mode-line ((,class (:background ,modeline :foreground "white")))) 29 `(mode-line-inactive ((,class (:background ,background2 :foreground "white")))) 30 `(tab-bar ((,class (:inherit mode-line-inactive)))) 31 `(tab-bar-tab ((,class (:inherit default :height 80)))) 32 `(tab-bar-tab-inactive ((,class (:inherit mode-line-inactive)))) 33 `(ruler-mode-default ((,class (:inherit header-line :box nil)))) 34 )) 35 36 (when (and (fboundp 'dimmer-mode) 37 dimmer-mode) 38 (dimmer-mode -1) 39 (dimmer-mode)) 40 41 (provide-theme 'custom-dark)