[elpa] externals/ef-themes 8ae105d9dc 187/281: ef-light: add modus-operandi theme (oh, wait!)

[ELPA Syncer]

branch: externals/ef-themes
commit 8ae105d9dc2568b6c87add6941ba6af275158040
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    ef-light: add modus-operandi theme (oh, wait!)
    
    Yes, this is like the 'modus-operandi' theme from my 'modus-themes'.
    Though here it is designed in the spirit of the 'ef-themes'.
    Introduction to the project:
    <https://protesilaos.com/codelog/2022-08-15-intro-ef-themes-emacs/>.
    
    Hence "ef-light".  I'll let you guess which is the next theme...
---
 ef-light-theme.el | 159 ++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 159 insertions(+)

diff --git a/ef-light-theme.el b/ef-light-theme.el
new file mode 100644
index 0000000000..7dfac1b308
--- /dev/null
+++ b/ef-light-theme.el
@@ -0,0 +1,159 @@
+;;; ef-light-theme.el --- Legible light theme -*- lexical-binding:t -*-
+
+;; Copyright (C) 2022  Free Software Foundation, Inc.
+
+;; Author: Protesilaos Stavrou <info@protesilaos.com>
+;; Maintainer: Ef-Themes Development <~protesilaos/ef-themes@lists.sr.ht>
+;; URL: https://git.sr.ht/~protesilaos/ef-themes
+;; Mailing-List: https://lists.sr.ht/~protesilaos/ef-themes
+;; Version: 0.0.0
+;; Package-Requires: ((emacs "28.1"))
+;; Keywords: faces, theme, accessibility
+
+;; This file is part of GNU Emacs.
+
+;; GNU Emacs 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.
+;;
+;; GNU Emacs 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 GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+;; Work-in-progress.
+
+;;; Code:
+
+
+
+(eval-and-compile
+  (require 'ef-themes)
+
+  (deftheme ef-light "Legible light theme.")
+
+  (defconst ef-light-palette
+    '(;; Basic tones
+      (bg-main "#ffffff") (fg-main "#202020")
+      (bg-dim  "#efefef") (fg-dim  "#70627f")
+      (bg-alt  "#dbdbdb") (fg-alt  "#196f70")
+
+      ;; Basic hues for foreground values
+      (red             "#d3303a")
+      (red-warmer      "#e00033")
+      (red-cooler      "#d50f7f")
+      (red-faint       "#c24552")
+      (green           "#217a3c")
+      (green-warmer    "#4a7d00")
+      (green-cooler    "#008858")
+      (green-faint     "#61756c")
+      (yellow          "#a45f22")
+      (yellow-warmer   "#b6532f")
+      (yellow-cooler   "#b65050")
+      (yellow-faint    "#a65f6a")
+      (blue            "#375cd8")
+      (blue-warmer     "#4250ef")
+      (blue-cooler     "#065fff")
+      (blue-faint      "#6060d0")
+      (magenta         "#ba35af")
+      (magenta-warmer  "#cf25aa")
+      (magenta-cooler  "#6052cf")
+      (magenta-faint   "#bf3580")
+      (cyan            "#1f6fbf")
+      (cyan-warmer     "#3f6faf")
+      (cyan-cooler     "#1f77bb")
+      (cyan-faint      "#506fa0")
+
+      ;; Basic hues for background values
+      (bg-red      "#ff8f88")
+      (bg-green    "#8adf80")
+      (bg-yellow   "#fac200")
+      (bg-blue     "#cbcfff")
+      (bg-magenta  "#ff9fef")
+      (bg-cyan     "#88c8ff")
+
+      ;; Diffs
+      (bg-added          "#c0efd0")
+      (bg-added-faint    "#d9ffe8")
+      (bg-added-refine   "#98e0b0")
+
+      (bg-changed        "#ffdd99")
+      (bg-changed-faint  "#ffeebb")
+      (bg-changed-refine "#ffba9f")
+
+      (bg-removed        "#ffc0cf")
+      (bg-removed-faint  "#ffdfe5")
+      (bg-removed-refine "#f7a0af")
+
+      ;; Special hues
+      (bg-mode-line  "#b7c7ff") (fg-mode-line  "#151515")
+      (bg-accent     "#0000cc") (fg-accent     "#ffffff")
+      (bg-completion "#bfe8ff")
+      (bg-hover      "#aaeccf")
+      (bg-hover-alt  "#b4cfff")
+      (bg-hl-line    "#e4efd8")
+      (bg-region     "#bfefff")
+      (bg-active     "#cbcbcb")
+      (bg-paren      "#efa09f")
+      (bg-err        "#ffd5ea") ; check with err
+      (bg-info       "#e4e1ff") ; check with info
+
+      (border        "#cecfff")
+      (cursor        "#0033cc")
+      (fg-intense    "#000000")
+
+      ;; Mappings
+      (err red-warmer)
+      (warning yellow-warmer)
+      (info green)
+
+      (link blue-cooler)
+      (link-alt magenta)
+      (date cyan)
+      (name blue)
+      (keybind blue-cooler)
+
+      (builtin magenta)
+      (comment yellow-faint)
+      (constant blue-cooler)
+      (fnname magenta-warmer)
+      (keyword magenta-cooler)
+      (preprocessor red-warmer)
+      (docstring cyan-faint)
+      (string blue-warmer)
+      (type green-cooler)
+      (variable cyan-cooler)
+
+      (accent-0 blue-warmer)
+      (accent-1 magenta-warmer)
+      (accent-2 green-cooler)
+      (accent-3 red)
+
+      (mail-0 blue-warmer)
+      (mail-1 magenta)
+      (mail-2 cyan-cooler)
+      (mail-3 yellow-cooler)
+      (mail-4 cyan-warmer)
+
+      (rainbow-0 green-cooler)
+      (rainbow-1 blue)
+      (rainbow-2 magenta-warmer)
+      (rainbow-3 cyan-cooler)
+      (rainbow-4 yellow-cooler)
+      (rainbow-5 magenta-cooler)
+      (rainbow-6 red-cooler)
+      (rainbow-7 green)
+      (rainbow-8 yellow))
+    "The `ef-light' palette.")
+
+  (ef-themes-theme ef-light ef-light-palette)
+
+  (provide-theme 'ef-light))
+
+;;; ef-light-theme.el ends here