[elpa] externals/modus-operandi-theme 40bb497 007/153: Let objed-hl use new colours from commit 39be2c3d3

[Stefan Monnier]

branch: externals/modus-operandi-theme
commit 40bb497d5ca8fee4ab37e0a4fdc6c15cb83edc14
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Let objed-hl use new colours from commit 39be2c3d3
    
    Also makes the application of each colour contingent on the
    customisation option for "intense" line highlights.
    
    This is in response to feedback I received in issue 79:
    https://gitlab.com/protesilaos/modus-themes/-/issues/79
---
 modus-operandi-theme.el | 3 ++-
 modus-vivendi-theme.el  | 3 ++-
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/modus-operandi-theme.el b/modus-operandi-theme.el
index e36956e..f8a00e3 100644
--- a/modus-operandi-theme.el
+++ b/modus-operandi-theme.el
@@ -3188,7 +3188,8 @@ Also bind `class' to ((class color) (min-colors 89))."
                        ,@(modus-operandi-theme-bold-weight))))
 ;;;;; objed
    `(objed-extend ((,class :background ,bg-active)))
-   `(objed-hl ((,class :background ,bg-alt)))
+   `(objed-hl ((,class :background ,(if modus-operandi-theme-intense-hl-line
+                                        bg-hl-alt-intense bg-hl-alt))))
    `(objed-mark ((,class :background ,bg-active)))
    `(objed-mode-line ((,class :foreground ,cyan-active)))
 ;;;;; orderless
diff --git a/modus-vivendi-theme.el b/modus-vivendi-theme.el
index ee68a30..c644c47 100644
--- a/modus-vivendi-theme.el
+++ b/modus-vivendi-theme.el
@@ -3188,7 +3188,8 @@ Also bind `class' to ((class color) (min-colors 89))."
                        ,@(modus-vivendi-theme-bold-weight))))
 ;;;;; objed
    `(objed-extend ((,class :background ,bg-active)))
-   `(objed-hl ((,class :background ,bg-alt)))
+   `(objed-hl ((,class :background ,(if modus-vivendi-theme-intense-hl-line
+                                        bg-hl-alt-intense bg-hl-alt))))
    `(objed-mark ((,class :background ,bg-active)))
    `(objed-mode-line ((,class :foreground ,cyan-active)))
 ;;;;; orderless