[Themes] Add dark and light theme
This commit is contained in:
parent
2ca12e0b8e
commit
eb67f79be6
2
private
2
private
|
@ -1 +1 @@
|
|||
Subproject commit 70e27f2900adb5343ef7f04c77010e96bb980e87
|
||||
Subproject commit 544e502bdbc71ae8909fc6e671ddd7101c16e548
|
|
@ -128,18 +128,6 @@ With a prefix argument P, isearch for the symbol at point."
|
|||
#'isearch-forward-symbol-at-point
|
||||
#'isearch-forward))))
|
||||
|
||||
(defun db/go-dark ()
|
||||
"Enable dark themes."
|
||||
(interactive)
|
||||
(load-theme 'solarized-dark)
|
||||
(load-theme 'smart-mode-line-dark))
|
||||
|
||||
(defun db/go-light ()
|
||||
"Enable light themes."
|
||||
(interactive)
|
||||
(load-theme 'solarized-light)
|
||||
(load-theme 'smart-mode-line-light))
|
||||
|
||||
(defun endless/fill-or-unfill ()
|
||||
"Like `fill-paragraph', but unfill if used twice."
|
||||
;; http://endlessparentheses.com/fill-and-unfill-paragraphs-with-a-single-key.html
|
||||
|
|
|
@ -0,0 +1,41 @@
|
|||
(deftheme db-dark
|
||||
"Created 2017-12-02.")
|
||||
|
||||
(load-theme 'solarized-dark)
|
||||
|
||||
(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-done ((t (:foreground "light gray" :slant normal))))
|
||||
'(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 :height 110 :family "DejaVu Sans Mono"))))
|
||||
'(org-headline-done ((t (:foreground "#859900"))))
|
||||
'(org-level-1 ((t (:inherit default :foreground "#cb4b16" :height 1.0))))
|
||||
'(org-level-2 ((t (:inherit default :foreground "#859900" :height 1.0))))
|
||||
'(org-level-3 ((t (:inherit default :foreground "#268bd2" :height 1.0))))
|
||||
'(org-level-4 ((t (:inherit default :foreground "#b58900" :height 1.0))))
|
||||
'(org-level-5 ((t (:inherit default :foreground "#2aa198" :height 1.0))))
|
||||
'(org-warning ((t (:foreground "#dc322f" :weight normal))))
|
||||
'(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 gnus-group-mail-3-empty :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 108)))))
|
||||
|
||||
(provide-theme 'db-dark)
|
|
@ -1,8 +1,10 @@
|
|||
(deftheme exot-main
|
||||
"Created 2017-03-17.")
|
||||
(deftheme db-light
|
||||
"Created 2017-12-02.")
|
||||
|
||||
(load-theme 'solarized-light)
|
||||
|
||||
(custom-theme-set-faces
|
||||
'exot-main
|
||||
'db-light
|
||||
'(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"))))
|
||||
|
@ -35,4 +37,4 @@
|
|||
'(gnus-summary-low-unread ((t (:foreground "dim gray"))))
|
||||
'(default ((t (:height 108)))))
|
||||
|
||||
(provide-theme 'exot-main)
|
||||
(provide-theme 'db-light)
|
Loading…
Reference in New Issue