commit ce17c94c59b51844a2479172c4aeb9648a367a4c
parent 04b251c72dfa10f17243393eb629c8c46635d29f
Author: Alex Balgavy <alex@balgavy.eu>
Date: Wed, 11 Aug 2021 11:34:38 +0200
emacs: first iteration of jokull theme from Vim
Diffstat:
3 files changed, 282 insertions(+), 1 deletion(-)
diff --git a/dot.map b/dot.map
@@ -74,6 +74,7 @@ emacs:
- config.org: ~/.emacs.d/config.org
- init.el: ~/.emacs.d/init.el
- custom.el: ~/.emacs.d/custom.el
+- jokull-theme.el: ~/.emacs.d/jokull-theme.el
# Config: shell
shell:
diff --git a/emacs/config.org b/emacs/config.org
@@ -33,7 +33,9 @@ Define the themes I want:
#+begin_src emacs-lisp
(setq dark-theme 'doom-one)
- (setq light-theme 'doom-acario-light)
+ ;; (setq light-theme 'doom-acario-light)
+ ;; I used to use doom-acario-light before writing my own theme
+ (setq light-theme 'jokull)
(defun dark-theme () "Switch to dark theme" (interactive) (load-theme dark-theme))
(defun light-theme () "Switch to light theme" (interactive) (load-theme light-theme))
#+end_src
diff --git a/emacs/jokull-theme.el b/emacs/jokull-theme.el
@@ -0,0 +1,278 @@
+;;; jokull-theme.el --- Theme
+
+;; Copyright (C) 2021 ,
+
+;; Author:
+;; Version: 0.1
+;; Package-Requires: ((emacs "24"))
+;; Created with ThemeCreator, https://github.com/mswift42/themecreator.
+
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+;; This file is not part of Emacs.
+
+;;; Commentary:
+
+;;; Code:
+
+ (deftheme jokull)
+ (let ((class '((class color) (min-colors 89)))
+ (fg1 "#2c2625")
+ (fg2 "#3d3736")
+ (fg3 "#4e4948")
+ (fg4 "#5f5a59")
+ (bg1 "#e4e4e4")
+ (bg2 "#d2d2d2")
+ (bg3 "#c0c0c0")
+ (bg4 "#adadad")
+ (builtin "#0087af")
+ (keyword "#0096ff")
+ (const "#cc6d05")
+ (comment "#5f5f5f")
+ (func "#005f87")
+ (str "#009051")
+ (type "#005f87")
+ (var "#112d4e")
+ (warning "#6e032e")
+ (warning2 "#ff8800")
+ (olive "#9b9b4c"))
+ (custom-theme-set-faces
+ 'jokull
+ `(default ((,class (:background ,bg1 :foreground ,fg1))))
+ `(font-lock-builtin-face ((,class (:foreground ,builtin))))
+ `(font-lock-comment-face ((,class (:foreground ,comment))))
+ `(font-lock-negation-char-face ((,class (:foreground ,const))))
+ `(font-lock-reference-face ((,class (:foreground ,const))))
+ `(font-lock-constant-face ((,class (:foreground ,const))))
+ `(font-lock-doc-face ((,class (:foreground ,comment))))
+ `(font-lock-function-name-face ((,class (:foreground ,func ))))
+ `(font-lock-keyword-face ((,class (:bold ,class :foreground ,keyword))))
+ `(font-lock-string-face ((,class (:foreground ,str))))
+ `(font-lock-type-face ((,class (:foreground ,type ))))
+ `(font-lock-variable-name-face ((,class (:foreground ,var))))
+ `(font-lock-warning-face ((,class (:foreground ,warning :background ,bg2))))
+ `(term-color-black ((,class (:foreground ,fg2 :background nil))))
+ `(region ((,class (:background ,fg1 :foreground ,bg1))))
+ `(highlight ((,class (:foreground ,fg3 :background ,bg3))))
+ `(hl-line ((,class (:background "#d5d5d5"))))
+ `(fringe ((,class (:background ,bg1 :foreground ,fg4))))
+ `(cursor ((,class (:background ,bg3))))
+ `(show-paren-match-face ((,class (:background ,warning))))
+ `(isearch ((,class (:bold t :foreground ,warning :background ,bg3))))
+ `(mode-line ((,class (:foreground "#e5e5e5" :background "#005f77" :bold nil))))
+ `(mode-line-buffer-id ((,class (:foreground "#e5e5e5" :background "#0087af" :bold nil))))
+ `(mode-line-inactive ((,class (:foreground "#e5e5e5" :background "#0087af"))))
+ `(mode-line-emphasis ((,class (:inherit mode-line :bold t))))
+ `(mode-line-highlight ((,class (:inherit mode-line))))
+ `(which-func ((,class (:foreground "#e5e5e5" :inherit mode-line :slant italic))))
+ `(vertical-border ((,class (:foreground ,fg3))))
+ `(minibuffer-prompt ((,class (:bold t :foreground ,keyword))))
+ `(default-italic ((,class (:italic t))))
+ `(link ((,class (:foreground ,const :underline t))))
+ `(org-code ((,class (:foreground ,fg2))))
+ `(org-hide ((,class (:foreground ,bg1))))
+ `(org-level-1 ((,class (:bold t :foreground ,fg2 :height 1.1))))
+ `(org-level-2 ((,class (:bold nil :foreground ,fg3))))
+ `(org-level-3 ((,class (:bold t :foreground ,fg4))))
+ `(org-level-4 ((,class (:bold nil :foreground ,bg4))))
+ `(org-date ((,class (:underline t :foreground ,var) )))
+ `(org-footnote ((,class (:underline t :foreground ,fg4))))
+ `(org-link ((,class (:underline t :foreground ,type ))))
+ `(org-special-keyword ((,class (:foreground ,func))))
+ `(org-block ((,class (:background "#ececec"))))
+ `(org-block-begin-line ((,class (:background ,bg1 :slant italic))))
+ `(org-quote ((,class (:inherit org-block :slant italic))))
+ `(org-verse ((,class (:inherit org-block :slant italic))))
+ `(org-todo ((,class (:box (:line-width 1 :color ,fg3) :foreground ,keyword :bold t))))
+ `(org-done ((,class (:box (:line-width 1 :color ,bg3) :bold t :foreground ,bg4))))
+ `(org-warning ((,class (:underline t :foreground ,warning))))
+ `(org-agenda-structure ((,class (:weight bold :foreground ,fg3 :box (:color ,fg4) :background ,bg3))))
+ `(org-agenda-date ((,class (:foreground ,var :height 1.1 ))))
+ `(org-agenda-date-weekend ((,class (:weight normal :foreground ,fg4))))
+ `(org-agenda-date-today ((,class (:weight bold :foreground ,keyword :height 1.4))))
+ `(org-agenda-done ((,class (:foreground ,bg4))))
+ `(org-scheduled ((,class (:foreground ,type))))
+ `(org-scheduled-today ((,class (:foreground ,func :weight bold :height 1.2))))
+ `(org-ellipsis ((,class (:foreground ,builtin))))
+ `(org-verbatim ((,class (:foreground ,fg4))))
+ `(org-document-info-keyword ((,class (:foreground ,func))))
+ `(font-latex-bold-face ((,class (:foreground ,type))))
+ `(font-latex-italic-face ((,class (:foreground ,var :italic t))))
+ `(font-latex-string-face ((,class (:foreground ,str))))
+ `(font-latex-match-reference-keywords ((,class (:foreground ,const))))
+ `(font-latex-match-variable-keywords ((,class (:foreground ,var))))
+ `(ido-only-match ((,class (:foreground ,warning))))
+ `(org-sexp-date ((,class (:foreground ,fg4))))
+ `(ido-first-match ((,class (:foreground ,keyword :bold t))))
+ `(ivy-current-match ((,class (:foreground ,fg3 :inherit highlight :underline t))))
+ `(gnus-header-content ((,class (:foreground ,keyword))))
+ `(gnus-header-from ((,class (:foreground ,var))))
+ `(gnus-header-name ((,class (:foreground ,type))))
+ `(gnus-header-subject ((,class (:foreground ,func :bold t))))
+ `(mu4e-view-url-number-face ((,class (:foreground ,type))))
+ `(mu4e-cited-1-face ((,class (:foreground ,fg2))))
+ `(mu4e-cited-7-face ((,class (:foreground ,fg3))))
+ `(mu4e-header-marks-face ((,class (:foreground ,type))))
+ `(ffap ((,class (:foreground ,fg4))))
+ `(js2-private-function-call ((,class (:foreground ,const))))
+ `(js2-jsdoc-html-tag-delimiter ((,class (:foreground ,str))))
+ `(js2-jsdoc-html-tag-name ((,class (:foreground ,var))))
+ `(js2-external-variable ((,class (:foreground ,type ))))
+ `(js2-function-param ((,class (:foreground ,const))))
+ `(js2-jsdoc-value ((,class (:foreground ,str))))
+ `(js2-private-member ((,class (:foreground ,fg3))))
+ `(js3-warning-face ((,class (:underline ,keyword))))
+ `(js3-error-face ((,class (:underline ,warning))))
+ `(js3-external-variable-face ((,class (:foreground ,var))))
+ `(js3-function-param-face ((,class (:foreground ,fg2))))
+ `(js3-jsdoc-tag-face ((,class (:foreground ,keyword))))
+ `(js3-instance-member-face ((,class (:foreground ,const))))
+ `(warning ((,class (:foreground ,warning))))
+ `(ac-completion-face ((,class (:underline t :foreground ,keyword))))
+ `(info-quoted-name ((,class (:foreground ,builtin))))
+ `(info-string ((,class (:foreground ,str))))
+ `(icompletep-determined ((,class :foreground ,builtin)))
+ `(undo-tree-visualizer-current-face ((,class :foreground ,builtin)))
+ `(undo-tree-visualizer-default-face ((,class :foreground ,fg2)))
+ `(undo-tree-visualizer-unmodified-face ((,class :foreground ,var)))
+ `(undo-tree-visualizer-register-face ((,class :foreground ,type)))
+ `(slime-repl-inputed-output-face ((,class (:foreground ,type))))
+ `(trailing-whitespace ((,class :foreground nil :background ,warning)))
+ `(rainbow-delimiters-depth-1-face ((,class :foreground ,fg1)))
+ `(rainbow-delimiters-depth-2-face ((,class :foreground ,type)))
+ `(rainbow-delimiters-depth-3-face ((,class :foreground ,var)))
+ `(rainbow-delimiters-depth-4-face ((,class :foreground ,const)))
+ `(rainbow-delimiters-depth-5-face ((,class :foreground ,keyword)))
+ `(rainbow-delimiters-depth-6-face ((,class :foreground ,fg1)))
+ `(rainbow-delimiters-depth-7-face ((,class :foreground ,type)))
+ `(rainbow-delimiters-depth-8-face ((,class :foreground ,var)))
+ `(magit-item-highlight ((,class :background ,bg3)))
+ `(magit-section-heading ((,class (:foreground ,keyword :weight bold))))
+ `(magit-hunk-heading ((,class (:background ,bg3))))
+ `(magit-section-highlight ((,class (:background ,bg2))))
+ `(magit-hunk-heading-highlight ((,class (:background ,bg3))))
+ `(magit-diff-context-highlight ((,class (:background ,bg3 :foreground ,fg3))))
+ `(magit-diffstat-added ((,class (:foreground ,type))))
+ `(magit-diffstat-removed ((,class (:foreground ,var))))
+ `(magit-process-ok ((,class (:foreground ,func :weight bold))))
+ `(magit-process-ng ((,class (:foreground ,warning :weight bold))))
+ `(magit-branch ((,class (:foreground ,const :weight bold))))
+ `(magit-log-author ((,class (:foreground ,fg3))))
+ `(magit-hash ((,class (:foreground ,fg2))))
+ `(magit-diff-file-header ((,class (:foreground ,fg2 :background ,bg3))))
+ `(lazy-highlight ((,class (:foreground ,fg2 :background ,bg3))))
+ `(term ((,class (:foreground ,fg1 :background ,bg1))))
+ `(term-color-black ((,class (:foreground ,bg3 :background ,bg3))))
+ `(term-color-blue ((,class (:foreground ,func :background ,func))))
+ `(term-color-red ((,class (:foreground ,keyword :background ,bg3))))
+ `(term-color-green ((,class (:foreground ,type :background ,bg3))))
+ `(term-color-yellow ((,class (:foreground ,var :background ,var))))
+ `(term-color-magenta ((,class (:foreground ,builtin :background ,builtin))))
+ `(term-color-cyan ((,class (:foreground ,str :background ,str))))
+ `(term-color-white ((,class (:foreground ,fg2 :background ,fg2))))
+ `(rainbow-delimiters-unmatched-face ((,class :foreground ,warning)))
+ `(helm-header ((,class (:foreground ,fg2 :background ,bg1 :underline nil :box nil))))
+ `(helm-source-header ((,class (:foreground ,keyword :background ,bg1 :underline nil :weight bold))))
+ `(helm-selection ((,class (:background ,bg2 :underline nil))))
+ `(helm-selection-line ((,class (:background ,bg2))))
+ `(helm-visible-mark ((,class (:foreground ,bg1 :background ,bg3))))
+ `(helm-candidate-number ((,class (:foreground ,bg1 :background ,fg1))))
+ `(helm-separator ((,class (:foreground ,type :background ,bg1))))
+ `(helm-time-zone-current ((,class (:foreground ,builtin :background ,bg1))))
+ `(helm-time-zone-home ((,class (:foreground ,type :background ,bg1))))
+ `(helm-buffer-not-saved ((,class (:foreground ,type :background ,bg1))))
+ `(helm-buffer-process ((,class (:foreground ,builtin :background ,bg1))))
+ `(helm-buffer-saved-out ((,class (:foreground ,fg1 :background ,bg1))))
+ `(helm-buffer-size ((,class (:foreground ,fg1 :background ,bg1))))
+ `(helm-ff-directory ((,class (:foreground ,func :background ,bg1 :weight bold))))
+ `(helm-ff-file ((,class (:foreground ,fg1 :background ,bg1 :weight normal))))
+ `(helm-ff-executable ((,class (:foreground ,var :background ,bg1 :weight normal))))
+ `(helm-ff-invalid-symlink ((,class (:foreground ,warning2 :background ,bg1 :weight bold))))
+ `(helm-ff-symlink ((,class (:foreground ,keyword :background ,bg1 :weight bold))))
+ `(helm-ff-prefix ((,class (:foreground ,bg1 :background ,keyword :weight normal))))
+ `(helm-grep-cmd-line ((,class (:foreground ,fg1 :background ,bg1))))
+ `(helm-grep-file ((,class (:foreground ,fg1 :background ,bg1))))
+ `(helm-grep-finish ((,class (:foreground ,fg2 :background ,bg1))))
+ `(helm-grep-lineno ((,class (:foreground ,fg1 :background ,bg1))))
+ `(helm-grep-match ((,class (:foreground nil :background nil :inherit helm-match))))
+ `(helm-grep-running ((,class (:foreground ,func :background ,bg1))))
+ `(helm-moccur-buffer ((,class (:foreground ,func :background ,bg1))))
+ `(helm-source-go-package-godoc-description ((,class (:foreground ,str))))
+ `(helm-bookmark-w3m ((,class (:foreground ,type))))
+ `(company-echo-common ((,class (:foreground ,bg1 :background ,fg1))))
+ `(company-preview ((,class (:background ,bg1 :foreground ,var))))
+ `(company-preview-common ((,class (:foreground ,bg2 :foreground ,fg3))))
+ `(company-preview-search ((,class (:foreground ,type :background ,bg1))))
+ `(company-scrollbar-bg ((,class (:background ,bg3))))
+ `(company-scrollbar-fg ((,class (:foreground ,keyword))))
+ `(company-tooltip ((,class (:foreground ,fg2 :background ,bg1 :bold t))))
+ `(company-tooltop-annotation ((,class (:foreground ,const))))
+ `(company-tooltip-common ((,class ( :foreground ,fg3))))
+ `(company-tooltip-common-selection ((,class (:foreground ,str))))
+ `(company-tooltip-mouse ((,class (:inherit highlight))))
+ `(company-tooltip-selection ((,class (:background ,bg3 :foreground ,fg3))))
+ `(company-template-field ((,class (:inherit region))))
+ `(web-mode-builtin-face ((,class (:inherit ,font-lock-builtin-face))))
+ `(web-mode-comment-face ((,class (:inherit ,font-lock-comment-face))))
+ `(web-mode-constant-face ((,class (:inherit ,font-lock-constant-face))))
+ `(web-mode-keyword-face ((,class (:foreground ,keyword))))
+ `(web-mode-doctype-face ((,class (:inherit ,font-lock-comment-face))))
+ `(web-mode-function-name-face ((,class (:inherit ,font-lock-function-name-face))))
+ `(web-mode-string-face ((,class (:foreground ,str))))
+ `(web-mode-type-face ((,class (:inherit ,font-lock-type-face))))
+ `(web-mode-html-attr-name-face ((,class (:foreground ,func))))
+ `(web-mode-html-attr-value-face ((,class (:foreground ,keyword))))
+ `(web-mode-warning-face ((,class (:inherit ,font-lock-warning-face))))
+ `(web-mode-html-tag-face ((,class (:foreground ,builtin))))
+ `(jde-java-font-lock-package-face ((t (:foreground ,var))))
+ `(jde-java-font-lock-public-face ((t (:foreground ,keyword))))
+ `(jde-java-font-lock-private-face ((t (:foreground ,keyword))))
+ `(jde-java-font-lock-constant-face ((t (:foreground ,const))))
+ `(jde-java-font-lock-modifier-face ((t (:foreground ,fg2))))
+ `(jde-jave-font-lock-protected-face ((t (:foreground ,keyword))))
+ `(jde-java-font-lock-number-face ((t (:foreground ,var))))
+ )
+ ;; emacs >= 26.1
+ (when (>= emacs-major-version 26)
+ (custom-theme-set-faces
+ 'jokull
+ `(line-number ((t (:inherit fringe :foreground ,olive))))
+ `(line-number-current-line ((t (:inherit fringe :foreground ,const :weight bold))))))
+ ;; emacs >= 27.1
+ (when (>= emacs-major-version 27)
+ (custom-theme-set-faces
+ 'jokull
+ `(line-number ((t (:background ,bg1 :foreground ,olive))))
+ `(line-number-current-line ((t (:background ,bg2 :foreground ,const))))
+ `(tab-line ((,class (:inherit fringe :box (:line-width 4 :color ,bg2)))))
+ `(tab-line-tab ((,class (:inherit tab-line))))
+ `(tab-line-tab-inactive ((,class (:inherit tab-line :foreground ,comment))))
+ `(tab-line-tab-current ((,class (:background ,bg4 :foreground ,fg1 :box (:line-width 4 :color ,bg4)))))
+ `(tab-line-highlight ((,class (:background ,bg1 :foreground ,fg2 :box (:line-width 4 :color ,bg1)))))))
+
+ )
+
+;;;###autoload
+(when load-file-name
+ (add-to-list 'custom-theme-load-path
+ (file-name-as-directory (file-name-directory load-file-name))))
+
+(provide-theme 'jokull)
+
+;; Local Variables:
+;; no-byte-compile: t
+;; End:
+
+;;; jokull-theme.el ends here
