# HG changeset patch # User Eli Zaretskii # Date 1084623373 0 # Node ID 706a50524d5fe15994fea0429ce5ca20707a9e10 # Parent 244966f6dffa525bdab6172256149d0a0b9b8713 (compilation-warning-face, compilation-info-face): Use min-colors. diff -r 244966f6dffa -r 706a50524d5f lisp/progmodes/compile.el --- a/lisp/progmodes/compile.el Sat May 15 11:50:50 2004 +0000 +++ b/lisp/progmodes/compile.el Sat May 15 12:16:13 2004 +0000 @@ -448,17 +448,19 @@ (defvar compile-history nil) (defface compilation-warning-face - '((((type tty) (class color)) (:foreground "cyan" :weight bold)) - (((class color)) (:foreground "Orange" :weight bold)) + '((((class color) (min-colors 16)) (:foreground "Orange" :weight bold)) + (((class color)) (:foreground "cyan" :weight bold)) (t (:weight bold))) "Face used to highlight compiler warnings." :group 'font-lock-highlighting-faces :version "21.4") (defface compilation-info-face - '((((type tty) (class color)) (:foreground "green" :weight bold)) - (((class color) (background light)) (:foreground "Green3" :weight bold)) - (((class color) (background dark)) (:foreground "Green" :weight bold)) + '((((class color) (min-colors 16) (background light)) + (:foreground "Green3" :weight bold)) + (((class color) (min-colors 16) (background dark)) + (:foreground "Green" :weight bold)) + (((class color)) (:foreground "green" :weight bold)) (t (:weight bold))) "Face used to highlight compiler warnings." :group 'font-lock-highlighting-faces