TakeV/spacemacs
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

More subtle flycheck feedback color on mode line

Browse source
This commit is contained in:
syl20bnr 2014-09-22 21:59:40 -04:00
parent 1fd78f9a54
commit 42b2855e20
1 changed files with 8 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
spacemacs/funcs.el
View file

@ -281,19 +281,23 @@ changed to THEME."
;; Use foreground of the flycheck faces as background for color-mode line
;; (in order to have a proper transparent background of Spacemacs custom
;; bitmaps)
'(let ((ml-foreground (face-attribute 'mode-line :foreground)))
'(let ((ml-foreground (face-attribute 'mode-line :foreground))
(ml-background (face-attribute 'mode-line :background)))
(set-face-attribute
'flycheck-color-mode-line-error-face nil
:foreground ml-foreground
:background (face-foreground 'flycheck-fringe-error))
:background ml-background
:box (list :line-width 1 :color (face-foreground 'flycheck-fringe-error)))
(set-face-attribute
'flycheck-color-mode-line-warning-face nil
:foreground ml-foreground
:background (face-foreground 'flycheck-fringe-warning))
:background ml-background
:box (list :line-width 1 :color (face-foreground 'flycheck-fringe-warning)))
(set-face-attribute
'flycheck-color-mode-line-info-face nil
:foreground ml-foreground
:background (face-foreground 'flycheck-fringe-info))))
:background ml-background
:box (list :line-width 1 :color (face-foreground 'flycheck-fringe-info)))))
(eval-after-load "rainbow-identifiers"
;; adjust saturation and lightness of rainbow-delimiters depending on the
;; current theme