comparison lisp/mail/rmail.el @ 90365:a802c5505156

Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-43 Merge from emacs--devo--0 Patches applied: * emacs--devo--0 (patch 148-156) - Update from CVS - Merge from gnus--rel--5.10 - Remove nick-abbrevs stuff from rcirc.el - rcirc.el update from Ryan Yeske * gnus--rel--5.10 (patch 57) - Copy/update icons from Gnus trunk
author Miles Bader <miles@gnu.org>
date Mon, 13 Mar 2006 12:19:58 +0000
parents c5406394f567 2e9fdd693b3f
children e3bacb89536a
comparison
equal deleted inserted replaced
90364:494bf720eaf0 90365:a802c5505156
266 "\\|^return-path:\\|^errors-to:\\|^return-receipt-to:" 266 "\\|^return-path:\\|^errors-to:\\|^return-receipt-to:"
267 "\\|^precedence:\\|^list-help:\\|^list-post:\\|^list-subscribe:" 267 "\\|^precedence:\\|^list-help:\\|^list-post:\\|^list-subscribe:"
268 "\\|^list-id:\\|^list-unsubscribe:\\|^list-archive:" 268 "\\|^list-id:\\|^list-unsubscribe:\\|^list-archive:"
269 "\\|^content-length:\\|^nntp-posting-date:\\|^user-agent" 269 "\\|^content-length:\\|^nntp-posting-date:\\|^user-agent"
270 "\\|^importance:\\|^envelope-to:\\|^delivery-date\\|^openpgp:" 270 "\\|^importance:\\|^envelope-to:\\|^delivery-date\\|^openpgp:"
271 "\\|^mbox-line:\\|^cancel-lock:" 271 "\\|^mbox-line:\\|^cancel-lock:\\|^DomainKey-Signature:"
272 "\\|^resent-face:\\|^resent-x.*:\\|^resent-organization:\\|^resent-openpgp:" 272 "\\|^resent-face:\\|^resent-x.*:\\|^resent-organization:\\|^resent-openpgp:"
273 273
274 "\\|^x-.*:") 274 "\\|^x-.*:")
275 "*Regexp to match header fields that Rmail should normally hide. 275 "*Regexp to match header fields that Rmail should normally hide.
276 \(See also `rmail-nonignored-headers', which overrides this regexp.) 276 \(See also `rmail-nonignored-headers', which overrides this regexp.)
317 A value of nil means don't highlight. 317 A value of nil means don't highlight.
318 See also `rmail-highlight-face'." 318 See also `rmail-highlight-face'."
319 :type 'regexp 319 :type 'regexp
320 :group 'rmail-headers) 320 :group 'rmail-headers)
321 321
322 (defface rmail-highlight
323 '((t :default highlight))
324 "Face to use for highlighting the most important header fields."
325 :group 'rmail-headers
326 :version "22.1")
327
322 ;;;###autoload 328 ;;;###autoload
323 (defcustom rmail-highlight-face nil "\ 329 (defcustom rmail-highlight-face 'rmail-highlight "\
324 *Face used by Rmail for highlighting headers." 330 *Face used by Rmail for highlighting headers."
325 :type '(choice (const :tag "Default" nil) 331 :type '(choice (const :tag "Default" nil)
326 face) 332 face)
327 :group 'rmail-headers) 333 :group 'rmail-headers)
328 334