solarized-emacs

commit 72803afaff58679f4fc9a93aa4ae08756367c500
parent a9446d2cedc9bac65b00ae26c7da92b31285f5c0
Author: Bozhidar Batsov <bozhidar@batsov.com>
Date:   Fri,  6 Dec 2013 22:27:54 -0800

Merge pull request #90 from syl20bnr/edts_support

Add support for edts faces
Diffstat:
M
solarized.el
 | 
17
+++++++++++++++++

1 file changed, 17 insertions(+), 0 deletions(-)
diff --git a/solarized.el b/solarized.el
@@ -538,6 +538,23 @@ customize the resulting theme."
      `(diff-hl-insert ((,class (:background ,green-lc  :foreground ,green-hc))))
      `(diff-hl-unknown ((,class (:background ,cyan-lc   :foreground ,cyan-hc))))
 
+     ;; edts
+     `(edts-face-error-line
+       ((,(append '((supports :underline (:style line))) class)
+         (:underline (:style line :color ,(if (eq variant 'light) red-l red)) :inherit unspecified))
+        (,class (:foreground ,red-hc :background ,red-lc :weight bold :underline t))))
+     `(edts-face-warning-line
+       ((,(append '((supports :underline (:style line))) class)
+         (:underline (:style line :color ,(if (eq variant 'light) yellow-l yellow)) :inherit unspecified))
+        (,class (:foreground ,yellow-hc :background ,yellow-lc :weight bold :underline t))))
+     `(edts-face-error-fringe-bitmap
+       ((,class (:foreground ,(if (eq variant 'light) red-l red) :background unspecified :weight bold))))
+     `(edts-face-warning-fringe-bitmap
+       ((,class (:foreground ,(if (eq variant 'light) yellow-l yellow) :background unspecified :weight bold))))
+     `(edts-face-error-mode-line
+       ((,class (:background ,(if (eq variant 'light) red-l red) :foreground unspecified))))
+     `(edts-face-warning-mode-line
+       ((,class (:background ,(if (eq variant 'light) yellow-l yellow) :foreground unspecified))))
 
      ;; elfeed
      `(elfeed-search-date-face ((,class (:foreground ,solarized-comments))))