Mercurial > emacs

changeset 68977:c6014dab558d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mh-folder-msg-number): Use purple on low-color, light backgrounds per Mark's suggestion.
author Bill Wohler <wohler@newt.com>
date Fri, 17 Feb 2006 20:32:16 +0000
parents 5c07e9043109
children 6703d0d4a873
files lisp/mh-e/ChangeLog lisp/mh-e/mh-e.el
diffstat 2 files changed, 8 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mh-e/ChangeLog	Fri Feb 17 19:58:17 2006 +0000
+++ b/lisp/mh-e/ChangeLog	Fri Feb 17 20:32:16 2006 +0000
@@ -1,5 +1,8 @@
 2006-02-17  Bill Wohler  <wohler@newt.com>
 
+	* mh-e.el (mh-folder-msg-number): Use purple on low-color, light
+	backgrounds per Mark's suggestion.
+
 	* mh-utils.el (mh-image-load-path): Fix problem that images on
 	load-path or image-load-path would win over relative paths (newer
 	MH-E or Emacs distribution).
--- a/lisp/mh-e/mh-e.el	Fri Feb 17 19:58:17 2006 +0000
+++ b/lisp/mh-e/mh-e.el	Fri Feb 17 20:32:16 2006 +0000
@@ -3019,7 +3019,9 @@
        (:foreground "snow4"))
       (((class color) (min-colors 64) (background dark))
        (:foreground "snow3"))
-      (((class color))
+      (((class color) (background light))
+       (:foreground "purple"))
+      (((class color) (background dark))
        (:foreground "cyan"))))
     (mh-folder-refiled
      ((((class color) (min-colors 64) (background light))
@@ -3042,9 +3044,9 @@
       (t
        (:bold t))))
     (mh-folder-tick
-     ((((class color) (background dark))
+     ((((class color) (background light))
        (:background "#dddf7e"))
-      (((class color) (background light))
+      (((class color) (background dark))
        (:background "#dddf7e"))
       (t
        (:underline t))))