[Emacs-diffs] emacs/lisp ChangeLog font-lock.el

[Chong Yidong]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Chong Yidong <cyd>      09/08/02 14:20:12

Modified files:
        lisp           : ChangeLog font-lock.el 

Log message:
        * font-lock.el (font-lock-string-face, font-lock-builtin-face)
        (font-lock-variable-name-face, font-lock-constant-face): Darken
        the colors for light backgrounds.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15875&r2=1.15876
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/font-lock.el?cvsroot=emacs&r1=1.350&r2=1.351

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15875
retrieving revision 1.15876
diff -u -b -r1.15875 -r1.15876
--- ChangeLog   1 Aug 2009 16:21:45 -0000       1.15875
+++ ChangeLog   2 Aug 2009 14:20:02 -0000       1.15876
@@ -1,3 +1,9 @@
+2009-08-02  Chong Yidong  <address@hidden>
+
+       * font-lock.el (font-lock-string-face, font-lock-builtin-face)
+       (font-lock-variable-name-face, font-lock-constant-face): Darken
+       the colors for light backgrounds.
+
 2009-08-01  Eli Zaretskii  <address@hidden>
 
        * mail/rmailsum.el (rmail-header-summary): Ignore letter-case of

Index: font-lock.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/font-lock.el,v
retrieving revision 1.350
retrieving revision 1.351
diff -u -b -r1.350 -r1.351
--- font-lock.el        2 Mar 2009 09:01:54 -0000       1.350
+++ font-lock.el        2 Aug 2009 14:20:10 -0000       1.351
@@ -1872,7 +1872,7 @@
 (defface font-lock-string-face
   '((((class grayscale) (background light)) (:foreground "DimGray" :slant 
italic))
     (((class grayscale) (background dark)) (:foreground "LightGray" :slant 
italic))
-    (((class color) (min-colors 88) (background light)) (:foreground 
"RosyBrown"))
+    (((class color) (min-colors 88) (background light)) (:foreground 
"VioletRed4"))
     (((class color) (min-colors 88) (background dark)) (:foreground 
"LightSalmon"))
     (((class color) (min-colors 16) (background light)) (:foreground 
"RosyBrown"))
     (((class color) (min-colors 16) (background dark)) (:foreground 
"LightSalmon"))
@@ -1901,7 +1901,7 @@
 (defface font-lock-builtin-face
   '((((class grayscale) (background light)) (:foreground "LightGray" :weight 
bold))
     (((class grayscale) (background dark)) (:foreground "DimGray" :weight 
bold))
-    (((class color) (min-colors 88) (background light)) (:foreground "Orchid"))
+    (((class color) (min-colors 88) (background light)) (:foreground 
"MediumOrchid4"))
     (((class color) (min-colors 88) (background dark)) (:foreground 
"LightSteelBlue"))
     (((class color) (min-colors 16) (background light)) (:foreground "Orchid"))
     (((class color) (min-colors 16) (background dark)) (:foreground 
"LightSteelBlue"))
@@ -1925,7 +1925,7 @@
      (:foreground "Gray90" :weight bold :slant italic))
     (((class grayscale) (background dark))
      (:foreground "DimGray" :weight bold :slant italic))
-    (((class color) (min-colors 88) (background light)) (:foreground 
"DarkGoldenrod"))
+    (((class color) (min-colors 88) (background light)) (:foreground "sienna"))
     (((class color) (min-colors 88) (background dark)) (:foreground 
"LightGoldenrod"))
     (((class color) (min-colors 16) (background light)) (:foreground 
"DarkGoldenrod"))
     (((class color) (min-colors 16) (background dark)) (:foreground 
"LightGoldenrod"))
@@ -1951,7 +1951,7 @@
      (:foreground "LightGray" :weight bold :underline t))
     (((class grayscale) (background dark))
      (:foreground "Gray50" :weight bold :underline t))
-    (((class color) (min-colors 88) (background light)) (:foreground 
"CadetBlue"))
+    (((class color) (min-colors 88) (background light)) (:foreground "dark 
cyan"))
     (((class color) (min-colors 88) (background dark)) (:foreground 
"Aquamarine"))
     (((class color) (min-colors 16) (background light)) (:foreground 
"CadetBlue"))
     (((class color) (min-colors 16) (background dark)) (:foreground 
"Aquamarine"))