Set fg contrast to correct default - monochwome-theme - Regress your Emacs to one-color world.âŒ
DIR Log
DIR Files
DIR Refs
DIR README
---
DIR commit 917b138ee96b9159a66f3ccc7bc28146218717b1
DIR parent 5d965ac4ab9e7149378dd056fe384f3805747d33
HTML Author: Scarlett McAllister <no+reply@roygbyte.com>
Date: Fri, 29 Sep 2023 21:17:22 -0300
Set fg contrast to correct default
Again, this needs to be decimal.
Diffstat:
M monochwome-theme.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
---
DIR diff --git a/monochwome-theme.el b/monochwome-theme.el
@@ -22,7 +22,7 @@ This value should be a midtone value. Named colors like 'red', 'blue', 'green',
"How much darker the darkest background color is from the lightest background color."
:type 'number)
-(defcustom monochwome-fg-contrast-ratio 70
+(defcustom monochwome-fg-contrast-ratio 0.7
"Contrast ratio between the lightest and darkest fg tones."
:type 'number)
@@ -91,12 +91,12 @@ Evaluates to a list of hex values."
(setq monochwome--fg-color-darkest
(culler-hsl-to-hex
(culler-darken-hsl monochwome--seed-hsl
- monochwome-fg-contrast-ratio)))
+ (* monochwome-fg-contrast-ratio 100.0))))
(setq monochwome--fg-color-lightest
(culler-hsl-to-hex
(culler-lighten-hsl monochwome--seed-hsl
- monochwome-fg-contrast-ratio)))
+ (* monochwome-fg-contrast-ratio 100.0))))
(setq monochwome-tone-0-tints (monochwome-tints-from-colors
monochwome-seed-hue monochwome--fg-color-lightest 8))