.emacs.d/themes/db-dark-theme.el
Daniel Borchmann 169a0b4608
Increase visibility of mode-line in solarized-dark theme
Make outlines slightly brighter for better visibility.

The way this is done here might not be the best, but it should be sufficient for now.
2025-10-08 15:14:28 +02:00

49 lines
3.2 KiB
EmacsLisp
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

(deftheme db-dark
"To be used as an additional theme on top of a dark theme.
Known to work well with the `solarized-dark theme.")
(custom-theme-set-faces
'db-dark
'(aw-leading-char-face ((t (:foreground "red" :height 1.0))))
'(cursor ((t (:background "red" :foreground "#002b36" :inverse-video t :weight ultra-bold))))
'(emms-browser-artist-face ((t (:foreground "RoyalBlue1"))))
'(emms-browser-composer-face ((t (:foreground "RoyalBlue1"))))
'(emms-browser-performer-face ((t (:foreground "#aaaaff"))))
'(emms-browser-track-face ((t (:foreground "DodgerBlue3" :height 1.0))))
'(emms-playlist-selected-face ((t (:foreground "medium sea green"))))
'(org-agenda-date ((t (:background "#002b36" :foreground "#586e75" :inverse-video nil :box (:line-width 2 :color "#002b36") :overline nil :slant normal :weight bold :height 1.2))))
'(org-agenda-dimmed-todo-face ((t nil)))
'(org-agenda-structure ((t (:foreground "#93a1a1" :inverse-video nil :box (:line-width 2 :color "#002b36") :underline nil :slant normal :weight bold :height 1.1))))
'(org-clock-overlay ((t (:background "black"))))
'(org-column ((t (:strike-through nil :underline nil :slant normal :weight normal))))
'(org-headline-done ((t (:foreground "#859900"))))
'(org-link ((t (:inherit link :weight normal))))
'(org-mode-line-clock ((t (:inherit nil))))
'(outline-4 ((t (:inherit org-level-4))))
'(flyspell-duplicate ((t (:underline (:color "orange red" :style wave)))))
'(flyspell-incorrect ((t (:underline (:color "orange red" :style wave)))))
'(gnus-group-mail-2 ((t (:inherit outline-4 :weight normal))))
'(gnus-group-mail-3 ((t (:inherit outline-5 :weight normal))))
'(gnus-group-news-3 ((t (:inherit outline-5 :weight normal))))
'(gnus-summary-high-ancient ((t (:foreground "#268bd2" :weight normal))))
'(gnus-summary-high-read ((t (:foreground "#859900" :weight normal))))
'(gnus-summary-high-unread ((t (:foreground "#839496" :weight normal))))
'(gnus-summary-low-ancient ((t (:foreground "dim gray"))))
'(gnus-summary-low-unread ((t (:foreground "dim gray"))))
'(default ((t (:height 110 :family "DejaVu Sans Mono"))))
'(fixed-pitch ((t (:family "DejaVu Sans Mono"))))
'(markdown-header-face-1 ((t (:inherit markdown-header-face :height 1.3))))
'(markdown-header-face-2 ((t (:inherit markdown-header-face :height 1.2))))
'(markdown-header-face-3 ((t (:inherit markdown-header-face :height 1.15))))
'(markdown-header-face-4 ((t (:inherit markdown-header-face :height 1.1))))
'(markdown-comment-face ((t (:forgeground "#586e75" :strike-through nil :slant italic))))
'(variable-pitch ((t (:weight normal :height 1.3 :family "Bitstream Vera Serif"))))
'(mode-line ((((class color) (min-colors 89))
(:background "#073642" :foreground "#839496" :box (:line-width (1 . 1) :color "#657b83") :overline "#657b83" :underline (:color "#657b83" :style line :position t)))))
'(mode-line-inactive ((((class color) (min-colors 89))
(:box (:line-width (1 . 1) :color "#586e75" :style nil) :background "#002b36" :foreground "#586e75" :underline (:color "#586e75" :style line :position nil) :overline "#586e75" :inverse-video unspecified)))))
(message "Loaded db-dark theme.")
(provide-theme 'db-dark)