[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-commit] emacs/lisp/mh-e mh-customize.el ChangeLog
From: |
Dan Nicolaescu |
Subject: |
[Emacs-commit] emacs/lisp/mh-e mh-customize.el ChangeLog |
Date: |
Thu, 03 Nov 2005 17:08:39 -0500 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Branch:
Changes by: Dan Nicolaescu <address@hidden> 05/11/03 22:08:39
Modified files:
lisp/mh-e : mh-customize.el ChangeLog
Log message:
(mh-folder-body-face, mh-folder-cur-msg-face)
(mh-folder-cur-msg-number-face, mh-folder-refiled-face)
(mh-folder-to-face): Use the min-colors attribute instead of the
type attribute.
CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/emacs/emacs/lisp/mh-e/mh-customize.el.diff?tr1=1.31&tr2=1.32&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/emacs/emacs/lisp/mh-e/ChangeLog.diff?tr1=1.62&tr2=1.63&r1=text&r2=text
Patches:
Index: emacs/lisp/mh-e/ChangeLog
diff -u emacs/lisp/mh-e/ChangeLog:1.62 emacs/lisp/mh-e/ChangeLog:1.63
--- emacs/lisp/mh-e/ChangeLog:1.62 Thu Nov 3 19:59:38 2005
+++ emacs/lisp/mh-e/ChangeLog Thu Nov 3 22:08:39 2005
@@ -1,3 +1,10 @@
+2005-11-03 Dan Nicolaescu <address@hidden>
+
+ * mh-customize.el (mh-folder-body-face, mh-folder-cur-msg-face)
+ (mh-folder-cur-msg-number-face, mh-folder-refiled-face)
+ (mh-folder-to-face): Use the min-colors attribute instead of the
+ type attribute.
+
2005-11-03 Bill Wohler <address@hidden>
* mh-customize.el (mh-refile-preserves-sequences-flag)
Index: emacs/lisp/mh-e/mh-customize.el
diff -u emacs/lisp/mh-e/mh-customize.el:1.31
emacs/lisp/mh-e/mh-customize.el:1.32
--- emacs/lisp/mh-e/mh-customize.el:1.31 Thu Nov 3 19:59:38 2005
+++ emacs/lisp/mh-e/mh-customize.el Thu Nov 3 22:08:39 2005
@@ -2253,11 +2253,11 @@
(defvar mh-folder-body-face 'mh-folder-body
"Face used to highlight body text in MH-Folder buffers.")
(defface mh-folder-body
- '((((type tty) (class color)) (:foreground "green"))
- (((class grayscale) (background light)) (:foreground "DimGray" :italic t))
+ '((((class grayscale) (background light)) (:foreground "DimGray" :italic t))
(((class grayscale) (background dark)) (:foreground "LightGray" :italic t))
- (((class color) (background light)) (:foreground "RosyBrown"))
- (((class color) (background dark)) (:foreground "LightSalmon"))
+ (((class color) (min-colors 88) (background light)) (:foreground
"RosyBrown"))
+ (((class color) (min-colors 88) (background dark)) (:foreground
"LightSalmon"))
+ (((class color)) (:foreground "green"))
(t (:italic t)))
"Face used to highlight body text in MH-Folder buffers."
:group 'mh-folder-faces)
@@ -2265,14 +2265,14 @@
(defvar mh-folder-cur-msg-face 'mh-folder-cur-msg
"Face used for the current message line in MH-Folder buffers.")
(defface mh-folder-cur-msg
- '((((type tty pc) (class color))
- (:background "LightGreen"))
- (((class color) (background light))
+ '((((class color) (min-colors 88) (background light))
(:background "LightGreen") ;Use this for solid background colour
;; (:underline t) ;Use this for underlining
)
- (((class color) (background dark))
+ (((class color) (min-colors 88) (background dark))
(:background "DarkOliveGreen4"))
+ (((class color))
+ (:background "LightGreen"))
(t (:underline t)))
"Face used for the current message line in MH-Folder buffers."
:group 'mh-folder-faces)
@@ -2280,11 +2280,11 @@
(defvar mh-folder-cur-msg-number-face 'mh-folder-cur-msg-number
"Face used to highlight the current message in MH-Folder buffers.")
(defface mh-folder-cur-msg-number
- '((((type tty) (class color)) (:foreground "cyan" :weight bold))
- (((class grayscale) (background light)) (:foreground "LightGray" :bold t))
+ '((((class grayscale) (background light)) (:foreground "LightGray" :bold t))
(((class grayscale) (background dark)) (:foreground "DimGray" :bold t))
- (((class color) (background light)) (:foreground "Purple"))
- (((class color) (background dark)) (:foreground "Cyan"))
+ (((class color) (min-colors 88) (background light)) (:foreground "Purple"))
+ (((class color) (min-colors 88) (background dark)) (:foreground "Cyan"))
+ (((class color)) (:foreground "cyan" :weight bold))
(t (:bold t)))
"Face used to highlight the current message in MH-Folder buffers."
:group 'mh-folder-faces)
@@ -2332,13 +2332,13 @@
(defvar mh-folder-refiled-face 'mh-folder-refiled
"Face used to highlight refiled messages in MH-Folder buffers.")
(defface mh-folder-refiled
- '((((type tty) (class color)) (:foreground "yellow" :weight light))
- (((class grayscale) (background light))
+ '((((class grayscale) (background light))
(:foreground "Gray90" :bold t :italic t))
(((class grayscale) (background dark))
(:foreground "DimGray" :bold t :italic t))
- (((class color) (background light)) (:foreground "DarkGoldenrod"))
- (((class color) (background dark)) (:foreground "LightGoldenrod"))
+ (((class color) (min-colors 88) (background light)) (:foreground
"DarkGoldenrod"))
+ (((class color) (min-colors 88) (background dark)) (:foreground
"LightGoldenrod"))
+ (((class color)) (:foreground "yellow" :weight light))
(t (:bold t :italic t)))
"Face used to highlight refiled messages in MH-Folder buffers."
:group 'mh-folder-faces)
@@ -2375,11 +2375,11 @@
(defvar mh-folder-to-face 'mh-folder-to
"Face used to highlight the To: string in MH-Folder buffers.")
(defface mh-folder-to
- '((((type tty) (class color)) (:foreground "green"))
- (((class grayscale) (background light)) (:foreground "DimGray" :italic t))
+ '((((class grayscale) (background light)) (:foreground "DimGray" :italic t))
(((class grayscale) (background dark)) (:foreground "LightGray" :italic t))
- (((class color) (background light)) (:foreground "RosyBrown"))
- (((class color) (background dark)) (:foreground "LightSalmon"))
+ (((class color) (min-colors 88) (background light)) (:foreground
"RosyBrown"))
+ (((class color) (min-colors 88) (background dark)) (:foreground
"LightSalmon"))
+ (((class color)) (:foreground "green"))
(t (:italic t)))
"Face used to highlight the To: string in MH-Folder buffers."
:group 'mh-folder-faces)
@@ -2420,13 +2420,13 @@
(defvar mh-show-cc-face 'mh-show-cc
"Face used to highlight cc: header fields.")
(defface mh-show-cc
- '((((type tty) (class color)) (:foreground "yellow" :weight light))
- (((class grayscale) (background light))
+ '((((class grayscale) (background light))
(:foreground "Gray90" :bold t :italic t))
(((class grayscale) (background dark))
(:foreground "DimGray" :bold t :italic t))
- (((class color) (background light)) (:foreground "DarkGoldenrod"))
- (((class color) (background dark)) (:foreground "LightGoldenrod"))
+ (((class color) (min-colors 88) (background light)) (:foreground
"DarkGoldenrod"))
+ (((class color) (min-colors 88) (background dark)) (:foreground
"LightGoldenrod"))
+ (((class color)) (:foreground "yellow" :weight light))
(t (:bold t :italic t)))
"Face used to highlight cc: header fields."
:group 'mh-show-faces)
@@ -2434,11 +2434,11 @@
(defvar mh-show-date-face 'mh-show-date
"Face used to highlight the Date: header field.")
(defface mh-show-date
- '((((type tty) (class color)) (:foreground "green"))
+ '((((class color) (min-colors 88) (background light)) (:foreground
"ForestGreen"))
+ (((class color) (min-colors 88) (background dark)) (:foreground
"PaleGreen"))
+ (((class color)) (:foreground "green"))
(((class grayscale) (background light)) (:foreground "Gray90" :bold t))
(((class grayscale) (background dark)) (:foreground "DimGray" :bold t))
- (((class color) (background light)) (:foreground "ForestGreen"))
- (((class color) (background dark)) (:foreground "PaleGreen"))
(t (:bold t :underline t)))
"Face used to highlight the Date: header field."
:group 'mh-show-faces)
@@ -2446,11 +2446,11 @@
(defvar mh-show-header-face 'mh-show-header
"Face used to deemphasize unspecified header fields.")
(defface mh-show-header
- '((((type tty) (class color)) (:foreground "green"))
+ '((((class color) (min-colors 88) (background light)) (:foreground
"RosyBrown"))
+ (((class color) (min-colors 88) (background dark)) (:foreground
"LightSalmon"))
+ (((class color)) (:foreground "green"))
(((class grayscale) (background light)) (:foreground "DimGray" :italic t))
(((class grayscale) (background dark)) (:foreground "LightGray" :italic t))
- (((class color) (background light)) (:foreground "RosyBrown"))
- (((class color) (background dark)) (:foreground "LightSalmon"))
(t (:italic t)))
"Face used to deemphasize unspecified header fields."
:group 'mh-show-faces)
- [Emacs-commit] emacs/lisp/mh-e mh-customize.el ChangeLog,
Dan Nicolaescu <=