Variable: mh-face-data

mh-face-data is a variable defined in mh-e.el.gz.

Value

((mh-folder-followup
  ((((class color) (background light)) (:foreground "blue3"))
   (((class color) (background dark)) (:foreground "LightGoldenRod"))
   (t (:weight bold))))
 (mh-folder-msg-number
  ((((class color) (min-colors 64) (background light))
    (:foreground "snow4"))
   (((class color) (min-colors 64) (background dark))
    (:foreground "snow3"))
   (((class color) (background light)) (:foreground "purple"))
   (((class color) (background dark)) (:foreground "cyan"))))
 (mh-folder-refiled
  ((((class color) (min-colors 64) (background light))
    (:foreground "DarkGoldenrod"))
   (((class color) (min-colors 64) (background dark))
    (:foreground "LightGoldenrod"))
   (((class color)) (:foreground "yellow" :weight light))
   (((class grayscale) (background light))
    (:foreground "Gray90" :weight bold :slant italic))
   (((class grayscale) (background dark))
    (:foreground "DimGray" :weight bold :slant italic))
   (t (:weight bold :slant italic))))
 (mh-folder-subject
  ((((class color) (background light)) (:foreground "blue4"))
   (((class color) (background dark)) (:foreground "yellow"))
   (t (:weight bold))))
 (mh-folder-tick
  ((((class color) (background light)) (:background "#dddf7e"))
   (((class color) (background dark)) (:background "#dddf7e"))
   (t (:underline t))))
 (mh-folder-to
  ((((class color) (min-colors 64) (background light))
    (:foreground "RosyBrown"))
   (((class color) (min-colors 64) (background dark))
    (:foreground "LightSalmon"))
   (((class color)) (:foreground "green"))
   (((class grayscale) (background light))
    (:foreground "DimGray" :slant italic))
   (((class grayscale) (background dark))
    (:foreground "LightGray" :slant italic))
   (t (:slant italic))))
 (mh-letter-header-field
  ((((class color) (background light)) (:background "gray90"))
   (((class color) (background dark)) (:background "gray10"))
   (t (:weight bold))))
 (mh-search-folder
  ((((class color) (background light))
    (:foreground "dark green" :weight bold))
   (((class color) (background dark))
    (:foreground "indian red" :weight bold))
   (t (:weight bold))))
 (mh-show-cc
  ((((class color) (min-colors 64) (background light))
    (:foreground "DarkGoldenrod"))
   (((class color) (min-colors 64) (background dark))
    (:foreground "LightGoldenrod"))
   (((class color)) (:foreground "yellow" :weight light))
   (((class grayscale) (background light))
    (:foreground "Gray90" :weight bold :slant italic))
   (((class grayscale) (background dark))
    (:foreground "DimGray" :weight bold :slant italic))
   (t (:weight bold :slant italic))))
 (mh-show-date
  ((((class color) (min-colors 64) (background light))
    (:foreground "ForestGreen"))
   (((class color) (min-colors 64) (background dark))
    (:foreground "PaleGreen"))
   (((class color)) (:foreground "green"))
   (((class grayscale) (background light))
    (:foreground "Gray90" :weight bold))
   (((class grayscale) (background dark))
    (:foreground "DimGray" :weight bold))
   (t (:weight bold :underline t))))
 (mh-show-from
  ((((class color) (background light)) (:foreground "red3"))
   (((class color) (background dark)) (:foreground "cyan"))
   (t (:weight bold))))
 (mh-show-header
  ((((class color) (min-colors 64) (background light))
    (:foreground "RosyBrown"))
   (((class color) (min-colors 64) (background dark))
    (:foreground "LightSalmon"))
   (((class color)) (:foreground "green"))
   (((class grayscale) (background light))
    (:foreground "DimGray" :slant italic))
   (((class grayscale) (background dark))
    (:foreground "LightGray" :slant italic))
   (t (:slant italic))))
 (mh-show-pgg-bad ((t (:weight bold :foreground "DeepPink1"))))
 (mh-show-pgg-good ((t (:weight bold :foreground "LimeGreen"))))
 (mh-show-pgg-unknown
  ((t (:weight bold :foreground "DarkGoldenrod2"))))
 (mh-show-signature ((t (:slant italic))))
 (mh-show-to
  ((((class color) (background light)) (:foreground "SaddleBrown"))
   (((class color) (background dark)) (:foreground "burlywood"))
   (((class grayscale) (background light))
    (:foreground "DimGray" :underline t))
   (((class grayscale) (background dark))
    (:foreground "LightGray" :underline t))
   (t (:underline t))))
 (mh-speedbar-folder
  ((((class color) (background light)) (:foreground "blue4"))
   (((class color) (background dark)) (:foreground "light blue"))))
 (mh-speedbar-selected-folder
  ((((class color) (background light))
    (:foreground "red1" :underline t))
   (((class color) (background dark))
    (:foreground "red1" :underline t))
   (t (:underline t)))))

Documentation

MH-E face data.

Used by function mh-face-data(var)/mh-face-data(fun) which returns spec that is consumed by defface.

Source Code

;; Defined in /usr/src/emacs/lisp/mh-e/mh-e.el.gz
;;; Faces (:group 'mh-faces + group where faces described)

;; To add a new face:
;; 1. Add entry to variable mh-face-data.
;; 2. Create face using defface, accessing face data with function
;;    mh-face-data.
;; 3. Add inherit argument to function mh-face-data if applicable.
(defvar mh-face-data
  '((mh-folder-followup
     ((((class color) (background light))
       (:foreground "blue3"))
      (((class color) (background dark))
       (:foreground "LightGoldenRod"))
      (t
       (:weight bold))))
    (mh-folder-msg-number
     ((((class color) (min-colors 64) (background light))
       (:foreground "snow4"))
      (((class color) (min-colors 64) (background dark))
       (:foreground "snow3"))
      (((class color) (background light))
       (:foreground "purple"))
      (((class color) (background dark))
       (:foreground "cyan"))))
    (mh-folder-refiled
     ((((class color) (min-colors 64) (background light))
       (:foreground "DarkGoldenrod"))
      (((class color) (min-colors 64) (background dark))
       (:foreground "LightGoldenrod"))
      (((class color))
       (:foreground "yellow" :weight light))
      (((class grayscale) (background light))
       (:foreground "Gray90" :weight bold :slant italic))
      (((class grayscale) (background dark))
       (:foreground "DimGray" :weight bold :slant italic))
      (t
       (:weight bold :slant italic))))
    (mh-folder-subject
     ((((class color) (background light))
       (:foreground "blue4"))
      (((class color) (background dark))
       (:foreground "yellow"))
      (t
       (:weight bold))))
    (mh-folder-tick
     ((((class color) (background light))
       (:background "#dddf7e"))
      (((class color) (background dark))
       (:background "#dddf7e"))
      (t
       (:underline t))))
    (mh-folder-to
     ((((class color) (min-colors 64) (background light))
       (:foreground "RosyBrown"))
      (((class color) (min-colors 64) (background dark))
       (:foreground "LightSalmon"))
      (((class color))
       (:foreground "green"))
      (((class grayscale) (background light))
       (:foreground "DimGray" :slant italic))
      (((class grayscale) (background dark))
       (:foreground "LightGray" :slant italic))
      (t
       (:slant italic))))
    (mh-letter-header-field
     ((((class color) (background light))
       (:background "gray90"))
      (((class color) (background dark))
       (:background "gray10"))
      (t
       (:weight bold))))
    (mh-search-folder
     ((((class color) (background light))
       (:foreground "dark green" :weight bold))
      (((class color) (background dark))
       (:foreground "indian red" :weight bold))
      (t
       (:weight bold))))
    (mh-show-cc
     ((((class color) (min-colors 64) (background light))
       (:foreground "DarkGoldenrod"))
      (((class color) (min-colors 64) (background dark))
       (:foreground "LightGoldenrod"))
      (((class color))
       (:foreground "yellow" :weight light))
      (((class grayscale) (background light))
       (:foreground "Gray90" :weight bold :slant italic))
      (((class grayscale) (background dark))
       (:foreground "DimGray" :weight bold :slant italic))
      (t
       (:weight bold :slant italic))))
    (mh-show-date
     ((((class color) (min-colors 64) (background light))
       (:foreground "ForestGreen"))
      (((class color) (min-colors 64) (background dark))
       (:foreground "PaleGreen"))
      (((class color))
       (:foreground "green"))
      (((class grayscale) (background light))
       (:foreground "Gray90" :weight bold))
      (((class grayscale) (background dark))
       (:foreground "DimGray" :weight bold))
      (t
       (:weight bold :underline t))))
    (mh-show-from
     ((((class color) (background light))
       (:foreground "red3"))
      (((class color) (background dark))
       (:foreground "cyan"))
      (t
       (:weight bold))))
    (mh-show-header
     ((((class color) (min-colors 64) (background light))
       (:foreground "RosyBrown"))
      (((class color) (min-colors 64) (background dark))
       (:foreground "LightSalmon"))
      (((class color))
       (:foreground "green"))
      (((class grayscale) (background light))
       (:foreground "DimGray" :slant italic))
      (((class grayscale) (background dark))
       (:foreground "LightGray" :slant italic))
      (t
       (:slant italic))))
    (mh-show-pgg-bad ((t (:weight bold :foreground "DeepPink1"))))
    (mh-show-pgg-good ((t (:weight bold :foreground "LimeGreen"))))
    (mh-show-pgg-unknown ((t (:weight bold :foreground "DarkGoldenrod2"))))
    (mh-show-signature ((t (:slant italic))))
    (mh-show-to
     ((((class color) (background light))
       (:foreground "SaddleBrown"))
      (((class color) (background dark))
       (:foreground "burlywood"))
      (((class grayscale) (background light))
       (:foreground "DimGray" :underline t))
      (((class grayscale) (background dark))
       (:foreground "LightGray" :underline t))
      (t (:underline t))))
    (mh-speedbar-folder
     ((((class color) (background light))
       (:foreground "blue4"))
      (((class color) (background dark))
       (:foreground "light blue"))))
    (mh-speedbar-selected-folder
     ((((class color) (background light))
       (:foreground "red1" :underline t))
      (((class color) (background dark))
       (:foreground "red1" :underline t))
      (t
       (:underline t)))))
  "MH-E face data.
Used by function `mh-face-data' which returns spec that is
consumed by `defface'.")