From 65fb8ac42e98e8ddbc974ef5426362205daa899f Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Tue, 15 Sep 2020 20:48:08 -0400 Subject: theme: Switch to modus-themes I've been using modus-operandi and modus-vivendi for a few months now. I think they're great. --- lisp/km-theme.el | 132 ------------------------------------------------------- 1 file changed, 132 deletions(-) delete mode 100644 lisp/km-theme.el (limited to 'lisp/km-theme.el') diff --git a/lisp/km-theme.el b/lisp/km-theme.el deleted file mode 100644 index e8028e3..0000000 --- a/lisp/km-theme.el +++ /dev/null @@ -1,132 +0,0 @@ -;;; km-theme.el --- Tweaks to the stekene light theme - -;; Copyright (C) 2012-2020 Kyle Meyer - -;; Author: Kyle Meyer -;; URL: https://git.kyleam.com/emacs.d - -;; 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 . - -;;; Code: - -(load-theme 'stekene-light t) - -(let ((bg "white") - (bg-mid "gray96") - (bg-dark "gray92") - (fg-light "gray30") - (diff-added "#1d771d") - (diff-removed "#e60000")) - (custom-theme-set-faces - 'stekene-light - '(Info-quoted ((t (:inherit default)))) - '(compilation-info ((t (:inherit font-lock-function-name-face)))) - '(cursor ((t (:background "#f08080")))) - `(default ((t (:background ,bg)))) - `(diff-added ((t (:foreground ,diff-added :background ,bg-mid)))) - `(diff-context ((t (:foreground ,fg-light :background ,bg-mid)))) - `(diff-removed ((t (:foreground ,diff-removed :background ,bg-mid)))) - '(dired-subtree-depth-1-face ((t (:background "gray80")))) - '(dired-subtree-depth-2-face ((t (:background "gray90")))) - '(dired-subtree-depth-3-face ((t (:background "gray95")))) - '(dired-symlink ((t (:inherit font-lock-constant-face)))) - '(font-latex-math-face ((t (:inherit font-lock-builtin-face)))) - '(font-latex-string-face ((t (:inherit default)))) - '(font-lock-keyword-face ((t (:foreground "#4e5656")))) - '(font-lock-comment-face ((t (:foreground "#745f5f")))) - '(git-annex-dired-annexed-available ((t (:inherit font-lock-type-face)))) - '(git-annex-dired-annexed-unavailable ((t (:inherit font-lock-string-face)))) - '(gnus-button ((t (:inherit default)))) - '(gnus-cite-1 ((t (:inherit font-lock-function-name-face)))) - '(gnus-cite-2 ((t (:inherit font-lock-string-face)))) - '(gnus-group-mail-1 ((t (:inherit gnus-group-mail-1-empty :weight bold)))) - '(gnus-group-mail-1-empty ((t (:inherit font-lock-string-face)))) - '(gnus-group-mail-2 ((t (:inherit gnus-group-mail-2-empty :weight bold)))) - '(gnus-group-mail-2-empty ((t (:inherit font-lock-function-name-face)))) - '(gnus-group-mail-3 ((t (:inherit gnus-group-mail-3-empty :weight bold)))) - '(gnus-group-mail-3-empty ((t (:inherit font-lock-type-face)))) - '(gnus-header-content ((t (:inherit default)))) - '(gnus-header-name ((t (:inherit font-lock-constant-face)))) - '(gnus-header-subject ((t (:inherit font-lock-doc-face)))) - '(gnus-subject ((t (:inherit font-lock-doc-face)))) - '(gnus-summary-normal-read ((t (:inherit font-lock-comment-face)))) - '(helm-grep-file ((t (:inherit compilation-info)))) - '(helm-grep-finish ((t (:inherit compilation-mode-line-exit)))) - '(helm-grep-lineno ((t (:inherit compilation-line-number)))) - '(helm-match-item ((t (:inherit lazy-highlight)))) - '(helm-selection ((t (:inherit region)))) - '(helm-swoop-target-line-block-face ((t (:inherit match)))) - '(helm-swoop-target-line-face ((t (:inherit match)))) - '(helm-swoop-target-word-face ((t (:inherit lazy-highlight)))) - '(isearch ((t (:inherit match)))) - '(magit-cherry-equivalent ((t (:inherit font-lock-constant-face)))) - '(magit-cherry-unmatched ((t (:inherit font-lock-string-face)))) - `(magit-diff-added ((t (:foreground ,diff-added :background ,bg-mid)))) - `(magit-diff-added-highlight ((t (:foreground ,diff-added :background ,bg-mid)))) - `(magit-diff-context ((t (:foreground ,fg-light :background ,bg-mid)))) - `(magit-diff-context-highlight ((t (:foreground ,fg-light :background ,bg-mid)))) - '(magit-diff-file-heading ((t (:inherit default :weight bold)))) - '(magit-diff-file-heading-selection ((t (:inherit default :weight bold)))) - `(magit-diff-hunk-heading ((t (:foreground ,fg-light :background ,bg-dark)))) - `(magit-diff-hunk-heading-highlight ((t (:foreground ,fg-light :background "grey80")))) - `(magit-diff-removed ((t (:foreground ,diff-removed :background ,bg-mid)))) - `(magit-diff-removed-highlight ((t (:foreground ,diff-removed :background ,bg-mid)))) - `(magit-diff-revision-summary ((t (:background ,bg :weight bold)))) - `(magit-diff-revision-summary-highlight ((t (:background ,bg-mid :weight bold)))) - `(magit-diffstat-added ((t (:foreground ,diff-added)))) - `(magit-diffstat-removed ((t (:foreground ,diff-removed)))) - '(magit-hash ((t (:foreground "#8a939a")))) - '(magit-popup-argument ((t (:inherit font-lock-string-face)))) - `(magit-process-ng ((t (:foreground ,diff-removed)))) - `(magit-process-ok ((t (:foreground ,diff-added)))) - '(magit-reflog-amend ((t (:inherit font-lock-function-name-face)))) - '(magit-reflog-checkout ((t (:inherit font-lock-builtin-face)))) - '(magit-reflog-commit ((t (:inherit default)))) - '(magit-reflog-merge ((t (:inherit font-lock-doc-face)))) - '(magit-reflog-other ((t (:inherit font-lock-type-face)))) - '(magit-reflog-rebase ((t (:inherit font-lock-string-face)))) - '(magit-reflog-remote ((t (:inherit font-lock-variable-name-face)))) - '(magit-reflog-reset ((t (:inherit font-lock-warning-face)))) - '(magit-section-heading ((t (:inherit font-lock-keyword-face :weight bold)))) - `(magit-section-highlight ((t (:background ,bg)))) - '(magit-section-secondary-heading ((t (:inherit default)))) - '(match ((t (:inherit default :background "PaleGreen1")))) - `(mm-uu-extract ((t (:background ,bg-mid)))) - '(org-agenda-calendar-event ((t (:inherit font-lock-function-name-face)))) - '(org-agenda-calendar-sexp ((t (:inherit font-lock-variable-name-face)))) - '(org-agenda-clocking ((t (:inherit lazy-highlight)))) - '(org-agenda-date ((t (:inherit font-lock-keyword-face)))) - '(org-agenda-date-today ((t (:weight bold)))) - '(org-agenda-date-weekend ((t (:inherit org-agenda-date)))) - `(org-agenda-restriction-lock ((t (:background ,bg)))) - '(org-agenda-structure ((t (:inherit font-lock-comment-face)))) - '(org-date ((t (:inherit font-lock-type-face)))) - `(org-done ((t (:foreground ,diff-added)))) - '(org-drawer ((t (:inherit org-special-keyword)))) - '(org-scheduled ((t (:inherit default)))) - '(org-scheduled-today ((t (:inherit org-scheduled)))) - `(org-todo ((t (:foreground ,diff-removed)))) - '(org-upcoming-deadline ((t (:inherit default)))) - '(org-warning ((t (:inherit font-lock-string-face)))) - '(outline-1 ((t (:inherit font-lock-doc-face)))) - '(outline-2 ((t (:inherit font-lock-function-name-face)))) - '(outline-3 ((t (:inherit font-lock-keyword-face)))) - '(rst-level-1 ((t (:weight bold)))) - '(rst-level-2 ((t (:weight bold)))) - '(rst-level-3 ((t (:inherit default)))) - `(whitespace-indentation ((t (:background ,bg-dark)))) - `(whitespace-trailing ((t (:background ,bg-dark)))))) - -(provide 'km-theme) -;;; km-theme.el ends here -- cgit v1.2.3