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

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

[elpa] externals/modus-vivendi-theme 530787e 048/110: Refine FLYSPELL: u


From: Stefan Monnier
Subject: [elpa] externals/modus-vivendi-theme 530787e 048/110: Refine FLYSPELL: use new dedicated lang colours
Date: Wed, 29 Apr 2020 21:40:04 -0400 (EDT)

branch: externals/modus-vivendi-theme
commit 530787e1b70506093d4231631eff6f28ac47c523
Author: Protesilaos Stavrou <address@hidden>
Commit: Protesilaos Stavrou <address@hidden>

    Refine FLYSPELL: use new dedicated lang colours
    
    For more on those colours, see commit 53e1a43.
---
 modus-operandi-theme.el | 8 ++++----
 modus-vivendi-theme.el  | 8 ++++----
 2 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/modus-operandi-theme.el b/modus-operandi-theme.el
index f626479..cf00d9a 100644
--- a/modus-operandi-theme.el
+++ b/modus-operandi-theme.el
@@ -1433,12 +1433,12 @@ AMOUNT is a customisation option."
    ;;;; flyspell
    `(flyspell-duplicate
      ((,(append '((supports :underline (:style wave))) class)
-       (:foreground ,yellow :underline (:style wave)))
-      (,class (:foreground ,yellow :underline t))))
+       (:foreground ,fg-lang-warning :underline (:style wave)))
+      (,class (:foreground ,fg-lang-warning :underline t))))
    `(flyspell-incorrect
      ((,(append '((supports :underline (:style wave))) class)
-       (:foreground ,red :underline (:style wave)))
-      (,class (:foreground ,red :underline t))))
+       (:foreground ,fg-lang-error :underline (:style wave)))
+      (,class (:foreground ,fg-lang-error :underline t))))
    ;;;; flyspell-correct
    `(flyspell-correct-highlight-face ((,class (:inherit 
modus-theme-refine-green))))
    ;;;; flx
diff --git a/modus-vivendi-theme.el b/modus-vivendi-theme.el
index 8463e57..c74286b 100644
--- a/modus-vivendi-theme.el
+++ b/modus-vivendi-theme.el
@@ -1433,12 +1433,12 @@ AMOUNT is a customisation option."
    ;;;; flyspell
    `(flyspell-duplicate
      ((,(append '((supports :underline (:style wave))) class)
-       (:foreground ,yellow :underline (:style wave)))
-      (,class (:foreground ,yellow :underline t))))
+       (:foreground ,fg-lang-warning :underline (:style wave)))
+      (,class (:foreground ,fg-lang-warning :underline t))))
    `(flyspell-incorrect
      ((,(append '((supports :underline (:style wave))) class)
-       (:foreground ,red :underline (:style wave)))
-      (,class (:foreground ,red :underline t))))
+       (:foreground ,fg-lang-error :underline (:style wave)))
+      (,class (:foreground ,fg-lang-error :underline t))))
    ;;;; flyspell-correct
    `(flyspell-correct-highlight-face ((,class (:inherit 
modus-theme-refine-green))))
    ;;;; flx



reply via email to

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