Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Branch: master
168 lines (160 sloc) 10.308 kB
(deftheme dark-emacs
"Dark Emacs is designed to give the same look and feel as
`emacs --no-window-system'. It is based on a theme made by the
emacswiki user, ZWZ. The original can be found at
http://www.emacswiki.org/emacs/zwz.
It also tries to not interfere with the faces when emacs is
running in a tty (since that is the goal in the first place).
There are some `org-mode' or `notmuch' related faces defined
for TODO keywords, special tags, and search faces as well.
Color theme by Suvayu Ali. Created 2012-04-28.")
(custom-theme-set-variables
'dark-emacs
'(notmuch-search-line-faces
'(("unread" :foreground "green")
("flagged" :foreground "yellow")
("deleted" :foreground "red")))
'(org-todo-keyword-faces
'(("DBUG" . (:background "gold" :foreground "indianred3" :weight bold))
("LEAK" . (:background "gold" :foreground "indianred3" :weight bold))
("SEGF" . (:background "gold" :foreground "indianred3" :weight bold))
("CNCL" . (:background "snow3" :foreground "black" :weight bold))
))
'(org-tag-faces
'(("PROJ" . (:background "indianred3" :foreground "cornsilk2" :weight bold))
))
)
;; Customise using DISPLAY types if you wish to use both dark and
;; light backgrounds alternatively. This also takes values like tty
;; and nt to describe text terminals and windows machines. For more
;; details see:
;; - (info "(elisp)Defining Faces")
;; - (describe-function 'custom-theme-set-faces)
(custom-theme-set-faces
'dark-emacs
'(bold ((t (:weight bold :inherit (default)))))
'(bold-italic ((t (:weight bold :inherit (italic)))))
'(completions-common-part ((t (:foreground "forest green"))))
'(completions-first-difference ((t (:weight bold :foreground "salmon"))))
'(cursor ((((type graphic)) (:background "red")))
nil "All other attributes are ignored; in -nw mode depends on tty")
'(default ((((type graphic)) (:foreground "ivory2" :background "black"))))
'(diff-added ((default (:inherit diff-changed))
(((type tty) (class color) (min-colors 256)) (:inherit diff-changed :background "color-22"))
(((type graphic)) (:inherit diff-changed :background "#335533"))))
'(diff-changed ((default (:inherit default))))
'(diff-file-header ((t (:inherit diff-header :weight bold))))
'(diff-header ((((type tty) (class color) (min-colors 256)) (:background "grey70"))
(((type graphic)) (:background "grey45"))))
'(diff-indicator-added ((t (:inherit diff-added :weight bold))))
'(diff-indicator-removed ((t (:inherit diff-removed :weight bold))))
'(diff-refine-added ((default (:inherit diff-refine-change))
(((type tty) (class color) (min-colors 256)) (:inherit diff-refine-change :background "color-40"))
(((type graphic)) (:inherit diff-refine-change :background "#22aa22"))))
'(diff-refine-removed ((default (:inherit diff-refine-change))
(((type tty) (class color) (min-colors 256)) (:inherit diff-refine-change :background "color-196"))
(((type graphic)) (:inherit diff-refine-change :background "#aa2222"))))
'(diff-removed ((default (:inherit diff-changed))
(((type tty) (class color) (min-colors 256)) (:inherit diff-changed :background "color-52"))
(((type graphic)) (:inherit diff-changed :background "#553333"))))
'(ediff-current-diff-A ((t (:inherit diff-removed))))
'(ediff-current-diff-B ((t (:inherit diff-added))))
'(ediff-current-diff-C ((((type tty) (class color) (min-colors 256)) (:background "#afaf5f"))))
;; TODO: reconsider what needs to be done for inactive hunks, A & B
;; buffers light-dark offset or in tandem?
'(ediff-even-diff-B ((t (:background "dim gray" :foreground "White"))))
'(ediff-fine-diff-A ((t (:inherit diff-refine-removed))))
'(ediff-fine-diff-B ((t (:inherit diff-refine-added))))
'(ediff-fine-diff-C ((((type tty) (class color) (min-colors 256)) (:background "#afaf00"))))
'(ediff-odd-diff-A ((t (:background "dim gray" :foreground "White"))))
'(ediff-odd-diff-C ((((type tty) (class color) (min-colors 256)) (:background "dim gray" :foreground "White"))))
'(font-latex-sectioning-5-face ((default (:foreground "DodgerBlue1" :weight semi-bold))
(((type tty) (class color) (min-colors 256)) (:foreground "#0087ff" :weight bold))))
'(font-lock-builtin-face ((((min-colors 88)) (:foreground "gold" :inherit (default)))))
'(font-lock-comment-face ((((type graphic)) (:foreground "cyan3" :inherit (italic)))
(((min-colors 88)) (:foreground "#9e9e9e"))))
'(font-lock-constant-face ((t (:foreground "LightGoldenrod2" :inherit (default)))))
'(font-lock-function-name-face ((((type graphic)) (:weight bold :foreground "white" :inherit (default)))
(((type tty)) (:foreground "brightblue" :weight bold))))
'(font-lock-keyword-face ((((type graphic)) (:foreground "firebrick1" :inherit (italic)))
(((type tty) (class color) (min-colors 88)) (:foreground "#ff0000"))))
'(font-lock-preprocessor-face ((t (:foreground "IndianRed3" :inherit (font-lock-builtin-face)))))
'(font-lock-string-face ((((type graphic)) (:foreground "lawn green" :inherit (default)))
(((type tty)) (:foreground "green"))))
'(font-lock-type-face ((t (:foreground "orchid" :inherit (italic)))))
'(font-lock-variable-name-face ((((type graphic)) (:foreground "orange" :inherit (bold)))
(((type tty)) (:inherit default :foreground "DarkOrange1"))))
'(font-lock-warning-face ((((type graphic)) (:foreground "Red1" :inherit (bold)))
(((type tty)) (:inherit (error bold)))))
'(highlight ((default (:background "blue" :inherit (default)))
(((type graphic)) (:foreground "yellow" :background "blue" :inherit (default)))))
'(info-header-xref ((((type tty)) (:inherit info-xref :foreground "black"))))
'(info-menu-header ((t (:bold t :family "Sans Serif" :foreground "tomato" :weight bold))))
'(info-node ((t (:italic t :bold t :foreground "gold" :slant italic :weight bold))))
'(info-xref ((t (:inherit link :foreground "powder blue" :weight bold))))
'(info-xref-visited ((t (:foreground "violet" :underline t :weight bold))))
'(italic ((((supports :slant italic))
(:slant italic :foreground "blanched almond" :inherit (default)))
(((type tty)) (:foreground "blanched almond" :inherit (default)))))
'(link ((t (:foreground "cyan" :underline t :weight extra-bold))))
'(link-visited ((t (:foreground "violet" :inherit link))))
'(magit-diff-none ((((type tty) (class color) (min-colors 256)) (:inherit diff-context))
(((type graphic)) (:inherit diff-context))))
'(match ((((type graphic)) (:background "RoyalBlue3"))
(((type tty)) (:background "brightyellow" :foreground "black"))))
'(message-cited-text ((t :foreground "LightPink1")))
'(message-header-cc ((t (:foreground "lime green"))))
'(message-header-name ((t (:foreground "cornflower blue"))))
'(message-header-other ((t (:foreground "dark orange"))))
'(message-header-subject ((t (:inherit message-header-name :weight bold))))
'(message-header-to ((t (:inherit message-header-subject))))
'(message-header-xheader ((t (:foreground "sea green"))))
'(minibuffer-prompt ((t (:foreground "dark cyan" :weight bold))))
'(mode-line ((((type graphic)) (:foreground "blue" :background "azure"
:box (:line-width -1 :color nil :style released-button)))
(((type tty)) (:background "grey75" :foreground "black"))))
'(mode-line-buffer-id ((((type graphic)) (:weight bold :foreground "red" :background "ghost white"))))
'(mode-line-inactive ((t (:inherit mode-line :background "grey30" :foreground "grey80"))))
'(notmuch-message-summary-face ((((type graphic)) (:background "#303030"))
(((type tty)) (:background "brightblack"))))
'(notmuch-tag-face ((t (:background "steel blue" :foreground "yellow" :weight semi-bold))))
'(notmuch-tree-match-author-face ((t (:foreground "OliveDrab1"))))
'(notmuch-tree-match-tag-face ((t (:foreground "OliveDrab1"))))
'(org-agenda-current-time ((t (:background "snow" :foreground "DodgerBlue4" :weight bold :inherit org-time-grid))))
'(org-code ((default (:inherit shadow))
(((type tty) (class color) (min-colors 256)) (:foreground "color-28" :inherit shadow))
(((type graphic)) (:foreground "ForestGreen" :inherit shadow))))
'(org-column ((((type graphic)) (:background "grey30"))
(((type tty)) (:background "grey20"))))
'(org-document-info ((default (:foreground "pale turquoise"))
(((type tty) (class color) (min-colors 256)) (:foreground "#0000ff"))))
'(org-document-title ((default (:foreground "pale turquoise" :weight bold))
(((type tty) (class color) (min-colors 256)) (:weight bold :foreground "#0000ff"))))
'(org-done ((t (:background "ForestGreen" :foreground "DarkSeaGreen2" :slant oblique :weight bold))))
'(org-inlinetask ((t (:inherit org-level-8 :slant oblique))))
'(org-level-3 ((t (:inherit outline-3 :foreground "sandy brown"))))
'(org-level-4 ((default (:inherit outline-4))
(((type tty) (min-colors 256)) (:inherit outline-4 :foreground "#00d7af"))))
'(org-table ((default (:foreground "LightSkyBlue"))
(((type tty) (class color) (min-colors 256)) (:foreground "#0000ff"))))
'(org-todo ((t (:background "royalblue4" :foreground "thistle" :weight bold))))
'(org-verbatim ((default (:inherit shadow))
(((type tty) (class color) (min-colors 256)) (:foreground "color-28" :inherit shadow))
(((type graphic)) (:foreground "ForestGreen" :inherit shadow))))
'(region ((((type graphic)) (:background "blue3"))
(((type tty) (class color) (min-colors 256)) (:background "#0000af"))))
'(rst-level-1-face ((t (:background "grey85" :foreground "black"))))
'(secondary-selection ((((type graphic)) (:background "wheat2"))
(((type tty)) (:background "color-144" :foreground "grey30")))
nil "Depends on tty in -nw mode")
'(show-paren-match ((t (:background "SlateBlue1"))))
'(show-paren-mismatch ((t (:foreground "white" :background "magenta"))))
'(underline ((((supports :underline t))
(:underline t :foreground "green" :inherit (default)))))
'(woman-bold ((t (:weight bold :foreground "forest green"))))
'(woman-italic ((t (:slant italic :foreground "salmon"))))
;; custom faces go after this
;; '(sa-global-todo-face ((t (:background "royalblue4" :foreground "thistle" :weight bold)))
;; t "Face for TODO keywords globally.")
)
(provide-theme 'dark-emacs)
Jump to Line
Something went wrong with that request. Please try again.