Use "yellow" on low color terminals for comments

* font-lock.el (font-lock-comment-face): Use the high contrast
"yellow" color for font-lock-comment-face on low color terminals
using a dark background color.

Fixes: debbugs:4221

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d27f6b3..2bc706f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2011-07-13  Dan Nicolaescu  <dann@ics.uci.edu>
+
+       * font-lock.el (font-lock-comment-face): Use the high contrast
+       "yellow" color for font-lock-comment-face on low color terminals
+       using a dark background color (bug#4221).
+
 2011-07-13  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * dired.el (dired-insert-set-properties): Make the doc string

diff --git a/lisp/font-lock.el b/lisp/font-lock.el
index 3743dd5..6c76142 100644 (file)
--- a/lisp/font-lock.el
+++ b/lisp/font-lock.el
@@ -1856,19 +1856,13 @@ Sets various variables using `font-lock-defaults' and
     (((class color) (min-colors 8) (background light))
      (:foreground "red"))
     (((class color) (min-colors 8) (background dark))
-     )
+     (:foreground "yellow"))
     (t (:weight bold :slant italic)))
   "Font Lock mode face used to highlight comments."
   :group 'font-lock-faces)
 
 (defface font-lock-comment-delimiter-face
-  '((default :inherit font-lock-comment-face)
-    (((class grayscale)))
-    (((class color) (min-colors 16)))
-    (((class color) (min-colors 8) (background light))
-     :foreground "red")
-    (((class color) (min-colors 8) (background dark))
-     :foreground "red1"))
+  '((default :inherit font-lock-comment-face))
   "Font Lock mode face used to highlight comment delimiters."
   :group 'font-lock-faces)