Files
.emacs.d/lisp/my-base16-light-theme.el

64 lines
3.3 KiB
EmacsLisp

;;; my-base16-light-theme.el --- Base16 Light Theme -*- lexical-binding: t -*-
;;; Commentary:
;; A green base16 light theme base on solarized-theme
;;; Code:
(require 'solarized)
(require 'my-base16-palette)
(eval-when-compile
(require 'solarized-palettes))
(deftheme my-base16-light "A Base16 light theme using Solarized framework.")
(solarized-with-color-variables-with-palette
'light
'my-base16-light
my-base16-light-core-palette
'((custom-theme-set-faces
theme-name
`(org-level-1 ((,class (:foreground ,orange :height 1.0 :weight normal))))
`(org-level-2 ((,class (:foreground ,blue :height 1.0 :weight normal))))
`(org-level-3 ((,class (:foreground ,green :height 1.0 :weight normal))))
`(org-level-4 ((,class (:foreground ,yellow :height 1.0 :weight normal))))
`(org-level-5 ((,class (:foreground ,cyan :height 1.0 :weight normal))))
`(org-level-6 ((,class (:foreground ,green :height 1.0 :weight normal))))
`(org-level-7 ((,class (:foreground ,orange :height 1.0 :weight normal))))
`(org-level-8 ((,class (:foreground ,blue :height 1.0 :weight normal))))
`(org-document-title ((,class (:foreground ,base0 :height 1.0 :weight bold))))
`(org-done ((,class (:foreground ,green :weight bold))))
`(org-headline-done ((,class (:foreground ,green))))
`(org-block-begin-line ((,class (:foreground ,base01 :underline t :slant italic :extend t))))
`(org-block-end-line ((,class (:foreground ,base01 :overline t :slant italic :extend t))))
`(org-priority ((,class (:foreground ,green :weight bold))))
`(org-checkbox ((,class (:foreground ,base0 :weight bold))))
`(denote-journal-calendar ((,class (:foreground ,red :slant italic))))
`(font-lock-keyword-face ((,class (:foreground ,cyan :weight bold))))
`(font-lock-doc-face ((,class (:foreground ,green :slant normal))))
`(font-lock-string-face ((,class (:foreground ,green))))
`(dashboard-footer-face ((,class (:foreground ,blue))))
`(dashboard-text-banner ((,class (:foreground ,green))))
`(dashboard-heading ((,class (:foreground ,green :weight bold))))
`(dirvish-file-time ((,class (:foreground ,base01))))
`(dired-header ((,class (:foreground ,green))))
`(dired-async-mode-message ((,class (:foreground ,red))))
`(dired-async-message ((,class (:foreground ,yellow))))
`(consult-file ((,class (:foreground ,green))))
`(consult-notes-name ((,class (:foreground ,base01 :weight bold))))
`(consult-notes-time ((,class (:foreground ,base01 :weight thin))))
`(consult-notes-size ((,class (:foreground ,base01 :weight thin))))
`(denote-faces-keywords ((,class (:foreground ,cyan))))
`(mode-line ((,class (:foreground ,base0 :background ,base02))))
`(mode-line-inactive ((,class (:foreground ,base01 :background ,base03))))
`(display-time-date-and-time ((,class (:foreground ,base1 :bold t))))
`(jinx-misspelled ((,class (:underline (:style dashes :color ,yellow)))))
`(geiser-font-lock-repl-output ((,class (:foreground ,green))))
`(geiser-font-lock-doc-link ((,class (:foreground ,blue :underline t))))
`(geiser-font-lock-error-link ((,class (:foreground ,orange :underline t))))
`(vertico-current ((,class (:background ,base02 :extend t :underline nil)))))))
(provide-theme 'my-base16-light)
;;; my-base16-light-theme.el ends here