branch: externals/modus-themes
commit c41281151f71f76a50f463e041bd2298d78c5220
Author: Protesilaos Stavrou <[email protected]>
Commit: Protesilaos Stavrou <[email protected]>

    Adjust the intensity of the derived coloured backgrounds in 
modus-themes-generate-palette
---
 modus-themes.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/modus-themes.el b/modus-themes.el
index dfcf058e5d..5317ddc20d 100644
--- a/modus-themes.el
+++ b/modus-themes.el
@@ -7708,9 +7708,9 @@ rest come from CORE-PALETTE."
         (funcall push-derived-value-fn (intern (format "%s-cooler" name)) 
(modus-themes-generate-gradient (modus-themes-generate-color-cooler value 0.9) 
(if bg-main-dark-p 20 -20)))
         (funcall push-derived-value-fn (intern (format "%s-faint" name)) 
(modus-themes-generate-gradient value (if bg-main-dark-p 10 -10)))
         (funcall push-derived-value-fn (intern (format "%s-intense" name)) 
(modus-themes-generate-gradient value (if bg-main-dark-p -5 5)))
-        (funcall push-derived-value-fn (intern (format "bg-%s-intense" name)) 
(modus-themes-generate-gradient value (if bg-main-dark-p -30 30)))
-        (funcall push-derived-value-fn (intern (format "bg-%s-subtle" name)) 
(modus-themes-generate-gradient value (if bg-main-dark-p -50 50)))
-        (funcall push-derived-value-fn (intern (format "bg-%s-nuanced" name)) 
(modus-themes-generate-gradient value (if bg-main-dark-p -70 70))))
+        (funcall push-derived-value-fn (intern (format "bg-%s-intense" name)) 
(modus-themes-generate-gradient value (if bg-main-dark-p -50 50)))
+        (funcall push-derived-value-fn (intern (format "bg-%s-subtle" name)) 
(modus-themes-generate-gradient value (if bg-main-dark-p -70 70)))
+        (funcall push-derived-value-fn (intern (format "bg-%s-nuanced" name)) 
(modus-themes-generate-gradient value (if bg-main-dark-p -90 90))))
       ;; Mappings
       (funcall push-mapping-fn 'bg-completion (if prefers-cool-p 
'bg-cyan-subtle 'bg-yellow-subtle))
       (funcall push-mapping-fn 'bg-hover (if prefers-cool-p 'bg-green-intense 
'bg-magenta-intense))

Reply via email to