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

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

[elpa] externals/modus-vivendi-theme a395411 070/110: Review linter face


From: Stefan Monnier
Subject: [elpa] externals/modus-vivendi-theme a395411 070/110: Review linter faces (FLYCHECK and FLYMAKE)
Date: Wed, 29 Apr 2020 21:40:09 -0400 (EDT)

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

    Review linter faces (FLYCHECK and FLYMAKE)
    
    See this issue:
    https://github.com/flycheck/flycheck/issues/1730
---
 modus-operandi-theme.el | 30 ++++++++++++++++++++++++------
 modus-vivendi-theme.el  | 30 ++++++++++++++++++++++++------
 2 files changed, 48 insertions(+), 12 deletions(-)

diff --git a/modus-operandi-theme.el b/modus-operandi-theme.el
index 79cbdfc..b974e88 100644
--- a/modus-operandi-theme.el
+++ b/modus-operandi-theme.el
@@ -1432,7 +1432,10 @@ AMOUNT is a customisation option."
    `(fancy-dabbrev-preview-face ((,class (:foreground ,fg-alt :underline t))))
    `(fancy-dabbrev-selection-face ((,class (:inherit modus-theme-intense-cyan 
:weight bold))))
    ;;;; flycheck
-   `(flycheck-error ((,class (:foreground ,red-nuanced :underline (:color 
,fg-lang-error :style line)))))
+   `(flycheck-error
+     ((,(append '((supports :underline (:style wave))) class)
+       (:underline (:color ,fg-lang-error :style wave)))
+      (,class (:foreground ,red-nuanced :underline (:color ,fg-lang-error 
:style line)))))
    `(flycheck-error-list-checker-name ((,class (:foreground ,magenta-active))))
    `(flycheck-error-list-column-number ((,class (:foreground 
,fg-special-cold))))
    `(flycheck-error-list-error ((,class (:foreground ,red :weight 
,modus-theme-bold))))
@@ -1446,9 +1449,15 @@ AMOUNT is a customisation option."
    `(flycheck-fringe-error ((,class (:inherit modus-theme-fringe-red))))
    `(flycheck-fringe-info ((,class (:inherit modus-theme-fringe-cyan))))
    `(flycheck-fringe-warning ((,class (:inherit modus-theme-fringe-yellow))))
-   `(flycheck-info ((,class (:foreground ,blue-nuanced :underline (:color 
,fg-lang-note :style line)))))
+   `(flycheck-info
+     ((,(append '((supports :underline (:style wave))) class)
+       (:underline (:color ,fg-lang-note :style wave)))
+      (,class (:foreground ,blue-nuanced :underline (:color ,fg-lang-note 
:style line)))))
    `(flycheck-verify-select-checker ((,class (:box (:line-width 1 :color nil 
:style released-button)))))
-   `(flycheck-warning ((,class (:foreground ,yellow-nuanced :underline (:color 
,fg-lang-warning :style line)))))
+   `(flycheck-warning
+     ((,(append '((supports :underline (:style wave))) class)
+       (:underline (:color ,fg-lang-warning :style wave)))
+      (,class (:foreground ,yellow-nuanced :underline (:color ,fg-lang-warning 
:style line)))))
    ;;;; flycheck-indicator
    `(flycheck-indicator-disabled ((,class (:foreground ,fg-inactive :slant 
,modus-theme-slant))))
    `(flycheck-indicator-error ((,class (:foreground ,red-active :weight 
,modus-theme-bold))))
@@ -1464,9 +1473,18 @@ AMOUNT is a customisation option."
    `(flycheck-posframe-info-face ((,class (:foreground ,cyan :weight bold))))
    `(flycheck-posframe-warning-face ((,class (:foreground ,yellow :weight 
bold))))
    ;;;; flymake
-   `(flymake-error ((,class (:foreground ,red-nuanced :underline (:color 
,fg-lang-error :style line)))))
-   `(flymake-note ((,class (:foreground ,blue-nuanced :underline (:color 
,fg-lang-note :style line)))))
-   `(flymake-warning ((,class (:foreground ,yellow-nuanced :underline (:color 
,fg-lang-warning :style line)))))
+   `(flymake-error
+       ((,(append '((supports :underline (:style wave))) class)
+         (:underline (:color ,fg-lang-error :style wave)))
+        (,class (:foreground ,red-nuanced :underline (:color ,fg-lang-error 
:style line)))))
+   `(flymake-note
+     ((,(append '((supports :underline (:style wave))) class)
+       (:underline (:color ,fg-lang-note :style wave)))
+      (,class (:foreground ,blue-nuanced :underline (:color ,fg-lang-note 
:style line)))))
+   `(flymake-warning
+     ((,(append '((supports :underline (:style wave))) class)
+       (:underline (:color ,fg-lang-warning :style wave)))
+      (,class (:foreground ,yellow-nuanced :underline (:color ,fg-lang-warning 
:style line)))))
    ;;;; flyspell
    `(flyspell-duplicate
      ((,(append '((supports :underline (:style wave))) class)
diff --git a/modus-vivendi-theme.el b/modus-vivendi-theme.el
index 5df98f5..4e0a286 100644
--- a/modus-vivendi-theme.el
+++ b/modus-vivendi-theme.el
@@ -1432,7 +1432,10 @@ AMOUNT is a customisation option."
    `(fancy-dabbrev-preview-face ((,class (:foreground ,fg-alt :underline t))))
    `(fancy-dabbrev-selection-face ((,class (:inherit modus-theme-intense-cyan 
:weight bold))))
    ;;;; flycheck
-   `(flycheck-error ((,class (:foreground ,red-nuanced :underline (:color 
,fg-lang-error :style line)))))
+   `(flycheck-error
+     ((,(append '((supports :underline (:style wave))) class)
+       (:underline (:color ,fg-lang-error :style wave)))
+      (,class (:foreground ,red-nuanced :underline (:color ,fg-lang-error 
:style line)))))
    `(flycheck-error-list-checker-name ((,class (:foreground ,magenta-active))))
    `(flycheck-error-list-column-number ((,class (:foreground 
,fg-special-cold))))
    `(flycheck-error-list-error ((,class (:foreground ,red :weight 
,modus-theme-bold))))
@@ -1446,9 +1449,15 @@ AMOUNT is a customisation option."
    `(flycheck-fringe-error ((,class (:inherit modus-theme-fringe-red))))
    `(flycheck-fringe-info ((,class (:inherit modus-theme-fringe-cyan))))
    `(flycheck-fringe-warning ((,class (:inherit modus-theme-fringe-yellow))))
-   `(flycheck-info ((,class (:foreground ,blue-nuanced :underline (:color 
,fg-lang-note :style line)))))
+   `(flycheck-info
+     ((,(append '((supports :underline (:style wave))) class)
+       (:underline (:color ,fg-lang-note :style wave)))
+      (,class (:foreground ,blue-nuanced :underline (:color ,fg-lang-note 
:style line)))))
    `(flycheck-verify-select-checker ((,class (:box (:line-width 1 :color nil 
:style released-button)))))
-   `(flycheck-warning ((,class (:foreground ,yellow-nuanced :underline (:color 
,fg-lang-warning :style line)))))
+   `(flycheck-warning
+     ((,(append '((supports :underline (:style wave))) class)
+       (:underline (:color ,fg-lang-warning :style wave)))
+      (,class (:foreground ,yellow-nuanced :underline (:color ,fg-lang-warning 
:style line)))))
    ;;;; flycheck-indicator
    `(flycheck-indicator-disabled ((,class (:foreground ,fg-inactive :slant 
,modus-theme-slant))))
    `(flycheck-indicator-error ((,class (:foreground ,red-active :weight 
,modus-theme-bold))))
@@ -1464,9 +1473,18 @@ AMOUNT is a customisation option."
    `(flycheck-posframe-info-face ((,class (:foreground ,cyan :weight bold))))
    `(flycheck-posframe-warning-face ((,class (:foreground ,yellow :weight 
bold))))
    ;;;; flymake
-   `(flymake-error ((,class (:foreground ,red-nuanced :underline (:color 
,fg-lang-error :style line)))))
-   `(flymake-note ((,class (:foreground ,blue-nuanced :underline (:color 
,fg-lang-note :style line)))))
-   `(flymake-warning ((,class (:foreground ,yellow-nuanced :underline (:color 
,fg-lang-warning :style line)))))
+   `(flymake-error
+       ((,(append '((supports :underline (:style wave))) class)
+         (:underline (:color ,fg-lang-error :style wave)))
+        (,class (:foreground ,red-nuanced :underline (:color ,fg-lang-error 
:style line)))))
+   `(flymake-note
+     ((,(append '((supports :underline (:style wave))) class)
+       (:underline (:color ,fg-lang-note :style wave)))
+      (,class (:foreground ,blue-nuanced :underline (:color ,fg-lang-note 
:style line)))))
+   `(flymake-warning
+     ((,(append '((supports :underline (:style wave))) class)
+       (:underline (:color ,fg-lang-warning :style wave)))
+      (,class (:foreground ,yellow-nuanced :underline (:color ,fg-lang-warning 
:style line)))))
    ;;;; flyspell
    `(flyspell-duplicate
      ((,(append '((supports :underline (:style wave))) class)



reply via email to

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