[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/ef-themes 2483828f88 2/3: ef-deuteranopia-dark: add the
|
From: |
ELPA Syncer |
|
Subject: |
[elpa] externals/ef-themes 2483828f88 2/3: ef-deuteranopia-dark: add theme for red-green color deficiency |
|
Date: |
Thu, 18 Aug 2022 20:57:31 -0400 (EDT) |
branch: externals/ef-themes
commit 2483828f880d5bbe46c99e29e4a81c117500c736
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>
ef-deuteranopia-dark: add theme for red-green color deficiency
---
README.org | 4 +-
contrast-ratios.org | 36 +++++++++
ef-deuteranopia-dark-theme.el | 165 ++++++++++++++++++++++++++++++++++++++++++
3 files changed, 204 insertions(+), 1 deletion(-)
diff --git a/README.org b/README.org
index ff914f086a..355da5e00d 100644
--- a/README.org
+++ b/README.org
@@ -134,7 +134,9 @@ Everything is in place to set up the package.
;;
;; Light: `ef-day', `ef-light', `ef-spring', `ef-summer'.
;; Dark: `ef-autumn', `ef-dark', `ef-night', `ef-winter'.
-
+;;
+;; Also those which are optimized for deuteranopia (red-green color
+;; deficiency): `ef-deuteranopia-dark'.
;; We also provide these commands, but do not assign them to any key:
;;
diff --git a/contrast-ratios.org b/contrast-ratios.org
index c0ee78255c..c8be68f2ac 100644
--- a/contrast-ratios.org
+++ b/contrast-ratios.org
@@ -141,6 +141,42 @@ C1 and C2 are color values written in hexadecimal RGB."
| cyan-faint | #4f6f8f | 4.87 | 4.51 | 4.03 | 4.69 |
#+TBLFM: $3='(Λ $2 @1$3);%.2f :: $4='(Λ $2 @1$4);%.2f :: $5='(Λ $2 @1$5);%.2f
:: $6='(Λ $2 @1$6);%.2f
+* ef-deuteranopia-dark
+:PROPERTIES:
+:CUSTOM_ID: h:12b9f4e4-5d65-460d-b3cb-2664f7830c24
+:END:
+
+| Name | | #000a1f | #0a1629 | #20253f | #040d24 |
+|----------------+---------+---------+---------+---------+---------|
+| fg-main | #ddddee | 14.72 | 13.50 | 11.20 | 14.38 |
+| fg-dim | #7f8797 | 5.47 | 5.01 | 4.16 | 5.34 |
+| fg-alt | #90afef | 9.00 | 8.25 | 6.84 | 8.79 |
+| red | #cf8560 | 6.75 | 6.19 | 5.13 | 6.60 |
+| red-warmer | #e47360 | 6.51 | 5.97 | 4.95 | 6.36 |
+| red-cooler | #cf7a7a | 6.32 | 5.79 | 4.81 | 6.17 |
+| red-faint | #b57f82 | 5.95 | 5.45 | 4.52 | 5.81 |
+| green | #3faa26 | 6.57 | 6.03 | 5.00 | 6.42 |
+| green-warmer | #7aad0f | 7.35 | 6.74 | 5.59 | 7.18 |
+| green-cooler | #3fa672 | 6.50 | 5.96 | 4.94 | 6.35 |
+| green-faint | #61a06c | 6.35 | 5.82 | 4.83 | 6.21 |
+| yellow | #aa9f32 | 7.26 | 6.65 | 5.52 | 7.09 |
+| yellow-warmer | #cfaf00 | 9.20 | 8.44 | 7.00 | 8.99 |
+| yellow-cooler | #bfaf7a | 9.06 | 8.30 | 6.89 | 8.85 |
+| yellow-faint | #af9a6a | 7.20 | 6.60 | 5.48 | 7.03 |
+| blue | #3f95f6 | 6.43 | 5.90 | 4.89 | 6.29 |
+| blue-warmer | #6a9fff | 7.54 | 6.91 | 5.73 | 7.37 |
+| blue-cooler | #1f90ff | 6.11 | 5.60 | 4.64 | 5.97 |
+| blue-faint | #7a94df | 6.71 | 6.15 | 5.10 | 6.55 |
+| magenta | #b379bf | 6.02 | 5.52 | 4.58 | 5.88 |
+| magenta-warmer | #af80ea | 6.68 | 6.12 | 5.08 | 6.52 |
+| magenta-cooler | #9f95ff | 7.73 | 7.09 | 5.88 | 7.55 |
+| magenta-faint | #c59fcf | 8.69 | 7.96 | 6.61 | 8.49 |
+| cyan | #5faaef | 7.98 | 7.31 | 6.07 | 7.80 |
+| cyan-warmer | #7fafff | 8.91 | 8.17 | 6.78 | 8.71 |
+| cyan-cooler | #0db0ff | 8.16 | 7.48 | 6.20 | 7.97 |
+| cyan-faint | #8aa0df | 7.69 | 7.05 | 5.85 | 7.51 |
+#+TBLFM: $3='(Λ $2 @1$3);%.2f :: $4='(Λ $2 @1$4);%.2f :: $5='(Λ $2 @1$5);%.2f
:: $6='(Λ $2 @1$6);%.2f
+
* ef-light
:PROPERTIES:
:CUSTOM_ID: h:02d01731-b9ab-4653-9e71-ab1592c64734
diff --git a/ef-deuteranopia-dark-theme.el b/ef-deuteranopia-dark-theme.el
new file mode 100644
index 0000000000..6c73e7efdc
--- /dev/null
+++ b/ef-deuteranopia-dark-theme.el
@@ -0,0 +1,165 @@
+;;; ef-deuteranopia-dark-theme.el --- Legible dark theme, optimized for
red-green color deficiency -*- 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
+;; 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:
+;;
+;; The `ef-themes' are a collection of light and dark themes for GNU
+;; Emacs whose goal is to provide colorful ("pretty") yet legible
+;; options for users who want something with a bit more flair than the
+;; `modus-themes' (also designed by me).
+
+;;; Code:
+
+
+
+(eval-and-compile
+ (require 'ef-themes)
+
+ (deftheme ef-deuteranopia-dark "Legible dark theme, optimized for red-green
color deficiency.")
+
+ (defconst ef-deuteranopia-dark-palette
+ '(;; Basic tones
+ (bg-main "#000a1f")
+ (fg-main "#ddddee")
+ (bg-dim "#0a1629")
+ (fg-dim "#7f8797")
+ (bg-alt "#20253f")
+ (fg-alt "#90afef")
+
+ (bg-active "#30354f")
+ (bg-inactive "#040d24")
+
+ ;; Basic hues for foreground values
+ (red "#cf8560")
+ (red-warmer "#e47360")
+ (red-cooler "#cf7a7a")
+ (red-faint "#b57f82")
+ (green "#3faa26")
+ (green-warmer "#7aad0f")
+ (green-cooler "#3fa672")
+ (green-faint "#61a06c")
+ (yellow "#aa9f32")
+ (yellow-warmer "#cfaf00")
+ (yellow-cooler "#bfaf7a")
+ (yellow-faint "#af9a6a")
+ (blue "#3f95f6")
+ (blue-warmer "#6a9fff")
+ (blue-cooler "#1f90ff")
+ (blue-faint "#7a94df")
+ (magenta "#b379bf")
+ (magenta-warmer "#af80ea")
+ (magenta-cooler "#9f95ff")
+ (magenta-faint "#c59fcf")
+ (cyan "#5faaef")
+ (cyan-warmer "#7fafff")
+ (cyan-cooler "#0db0ff")
+ (cyan-faint "#8aa0df")
+
+ ;; Basic hues for background values
+ (bg-red "#ad5f50")
+ (bg-green "#4f8020")
+ (bg-yellow "#afaf40")
+ (bg-blue "#264fa0")
+ (bg-magenta "#8040cf")
+ (bg-cyan "#00709e")
+
+ ;; Diffs
+ (bg-added "#00234f")
+ (bg-added-faint "#001430")
+ (bg-added-refine "#03395f")
+
+ (bg-changed "#2f123f")
+ (bg-changed-faint "#1f022f")
+ (bg-changed-refine "#3f224f")
+
+ (bg-removed "#323200")
+ (bg-removed-faint "#281a00")
+ (bg-removed-refine "#484800")
+
+ ;; Special hues
+ (bg-mode-line "#484800") (fg-mode-line "#ffffff")
+ (bg-accent "#ffaa33") (fg-accent "#000000")
+ (bg-completion "#2b2b3f")
+ (bg-hover "#003a7f")
+ (bg-hover-alt "#3f4f00")
+ (bg-hl-line "#2a2a1f")
+ (bg-region "#202c4a")
+ (bg-paren "#00478a")
+ (bg-err "#232d09") ; check with err
+ (bg-info "#001242") ; check with info
+
+ (border "#40455f")
+ (cursor "#ffff00")
+ (fg-intense "#ffffff")
+
+ ;; Mappings
+ (err yellow-warmer)
+ (warning yellow)
+ (info blue-cooler)
+
+ (link blue)
+ (link-alt yellow-cooler)
+ (date yellow-cooler)
+ (name blue-warmer)
+ (keybind yellow-warmer)
+
+ (builtin blue-warmer)
+ (comment yellow-faint)
+ (constant blue-cooler)
+ (fnname yellow-cooler)
+ (keyword yellow-warmer)
+ (preprocessor green-cooler)
+ (docstring cyan-faint)
+ (string blue)
+ (type magenta-cooler)
+ (variable cyan-cooler)
+
+ (accent-0 blue-cooler)
+ (accent-1 yellow-warmer)
+ (accent-2 cyan-warmer)
+ (accent-3 magenta-cooler)
+
+ (mail-0 yellow)
+ (mail-1 blue-cooler)
+ (mail-2 yellow-cooler)
+ (mail-3 fg-alt)
+ (mail-4 magenta-cooler)
+
+ (rainbow-0 yellow-warmer)
+ (rainbow-1 blue)
+ (rainbow-2 yellow-cooler)
+ (rainbow-3 blue-warmer)
+ (rainbow-4 yellow)
+ (rainbow-5 blue-cooler)
+ (rainbow-6 yellow-faint)
+ (rainbow-7 blue-faint)
+ (rainbow-8 magenta-faint))
+ "The `ef-deuteranopia-dark' palette.")
+
+ (ef-themes-theme ef-deuteranopia-dark ef-deuteranopia-dark-palette)
+
+ (provide-theme 'ef-deuteranopia-dark))
+
+;;; ef-deuteranopia-dark-theme.el ends here