emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/modus-operandi-theme d2016e7 019/112: Add `:extend t' t


From: Stefan Monnier
Subject: [elpa] externals/modus-operandi-theme d2016e7 019/112: Add `:extend t' to VOLATILE-HIGHLIGHTS (fix #19)
Date: Mon, 30 Mar 2020 15:59:29 -0400 (EDT)

branch: externals/modus-operandi-theme
commit d2016e7f07e0e00b6846de053a4bb8fe62fbf8e9
Author: Protesilaos Stavrou <address@hidden>
Commit: Protesilaos Stavrou <address@hidden>

    Add `:extend t' to VOLATILE-HIGHLIGHTS (fix #19)
---
 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 f5caa7b..b4a1981 100644
--- a/modus-operandi-theme.el
+++ b/modus-operandi-theme.el
@@ -2247,7 +2247,8 @@ between foreground and background is >= 7:1)."
    `(vr/match-1 ((,class (:inherit modus-theme-refine-yellow))))
    `(vr/match-separator-face ((,class (:inherit modus-theme-intense-neutral 
:weight bold))))
    ;;;; volatile-highlights
-   `(vhl/default-face ((,class (:background ,bg-alt :foreground 
,blue-nuanced))))
+   `(vhl/default-face ((,class (,@(and (>= emacs-major-version 27) '(:extend 
t))
+                                :background ,bg-alt :foreground 
,blue-nuanced))))
    ;;;; web-mode
    `(web-mode-annotation-face ((,class (:inherit web-mode-comment-face))))
    `(web-mode-annotation-html-face ((,class (:inherit web-mode-comment-face))))
diff --git a/modus-vivendi-theme.el b/modus-vivendi-theme.el
index 1a07906..0308481 100644
--- a/modus-vivendi-theme.el
+++ b/modus-vivendi-theme.el
@@ -2247,7 +2247,8 @@ between foreground and background is >= 7:1)."
    `(vr/match-1 ((,class (:inherit modus-theme-refine-yellow))))
    `(vr/match-separator-face ((,class (:inherit modus-theme-intense-neutral 
:weight bold))))
    ;;;; volatile-highlights
-   `(vhl/default-face ((,class (:background ,bg-alt :foreground 
,blue-nuanced))))
+   `(vhl/default-face ((,class (,@(and (>= emacs-major-version 27) '(:extend 
t))
+                                :background ,bg-alt :foreground 
,blue-nuanced))))
    ;;;; web-mode
    `(web-mode-annotation-face ((,class (:inherit web-mode-comment-face))))
    `(web-mode-annotation-html-face ((,class (:inherit web-mode-comment-face))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]