diff options
author | Bill Wohler <wohler@newt.com> | 2006-01-03 18:25:26 +0000 |
---|---|---|
committer | Bill Wohler <wohler@newt.com> | 2006-01-03 18:25:26 +0000 |
commit | 355ebcbf2599f2966069a99e25ce891e65cae3b7 (patch) | |
tree | 79134018f2b472ec5d86885a63f73eeb244c1356 /lisp/mh-e/mh-customize.el | |
parent | e69d4e020ac232786b636d0ebd0302282e4ab6d3 (diff) | |
download | emacs-355ebcbf2599f2966069a99e25ce891e65cae3b7.tar.gz |
* mh-customize.el (mh-folder-msg-number): Snow is actually off-white
on low color displays which turns to white when bold. This is
unreadable on white backgrounds. Use snow with min-colors requirement.
Use cyan on low-color displays.
* mh-init.el (mh-defface-compat): On low-color displays, delete the
high-color display rather than simply strip the min-colors requirement
since the existing algorithm shadowed the desired display on low-color
displays.
Diffstat (limited to 'lisp/mh-e/mh-customize.el')
-rw-r--r-- | lisp/mh-e/mh-customize.el | 16 |
1 files changed, 11 insertions, 5 deletions
diff --git a/lisp/mh-e/mh-customize.el b/lisp/mh-e/mh-customize.el index a2b667769bf..f4cde0b186f 100644 --- a/lisp/mh-e/mh-customize.el +++ b/lisp/mh-e/mh-customize.el @@ -2536,10 +2536,14 @@ sequence." :group 'mh-folder) (defface mh-folder-msg-number - '((((class color) (background light)) - (:foreground "snow4")) - (((class color) (background dark)) - (:foreground "snow3"))) + (mh-defface-compat + '((((class color) (min-colors 88) (background light)) + (:foreground "snow4")) + (((class color) (min-colors 88) (background dark)) + (:foreground "snow3")) + (((class color)) + (:foreground "cyan")))) + "Message number face." :group 'mh-faces :group 'mh-folder) @@ -2876,7 +2880,9 @@ The background and foreground are used in the image." '((((class color) (background light)) (:foreground "snow4")) (((class color) (background dark)) - (:foreground "snow3"))))) + (:foreground "snow3")) + (((class color)) + (:foreground "cyan"))))) ;; Local Variables: |