From: Chong Yidong Date: Wed, 23 Jul 2008 22:02:06 +0000 (+0000) Subject: (flymake-errline, flymake-warnline): Use more suitable colors on dark X-Git-Tag: emacs-pretest-22.2.90~91 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5979feb13c3b1674f5cf1a486241b750109aa79f;p=emacs.git (flymake-errline, flymake-warnline): Use more suitable colors on dark displays. --- diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el index f3c5885d031..395aa3e2ff0 100644 --- a/lisp/progmodes/flymake.el +++ b/lisp/progmodes/flymake.el @@ -799,15 +799,15 @@ Return t if it has at least one flymake overlay, nil if no overlay." has-flymake-overlays)) (defface flymake-errline - ;;+ '((((class color)) (:foreground "OrangeRed" :bold t :underline t)) - ;;+ '((((class color)) (:underline "OrangeRed")) - '((((class color)) (:background "LightPink")) + '((((class color) (background dark)) (:background "Firebrick4")) + (((class color) (background light)) (:background "LightPink")) (t (:bold t))) "Face used for marking error lines." :group 'flymake) (defface flymake-warnline - '((((class color)) (:background "LightBlue2")) + '((((class color) (background dark)) (:background "DarkBlue")) + (((class color) (background light)) (:background "LightBlue2")) (t (:bold t))) "Face used for marking warning lines." :group 'flymake)