diff options
| author | Miles Bader <miles@gnu.org> | 2008-03-01 01:28:14 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 2008-03-01 01:28:14 +0000 |
| commit | 14e8de0c3f87a228c05902be66c5bcf953636611 (patch) | |
| tree | f5dedbed1ff15d1badc46a54951fae5e4bdafadc /lisp/gnus/mm-uu.el | |
| parent | 5831b5a64833baa4a1baa7b3c5d17e72b74d8e4c (diff) | |
| download | emacs-14e8de0c3f87a228c05902be66c5bcf953636611.tar.gz emacs-14e8de0c3f87a228c05902be66c5bcf953636611.tar.bz2 emacs-14e8de0c3f87a228c05902be66c5bcf953636611.zip | |
Merge from gnus--devo--0
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1089
Diffstat (limited to 'lisp/gnus/mm-uu.el')
| -rw-r--r-- | lisp/gnus/mm-uu.el | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/lisp/gnus/mm-uu.el b/lisp/gnus/mm-uu.el index 898be5a5bac..bf5125e37a2 100644 --- a/lisp/gnus/mm-uu.el +++ b/lisp/gnus/mm-uu.el @@ -167,7 +167,7 @@ This can be either \"inline\" or \"attachment\".") ;; dependency on `message.el'. "^-+[8<>]*-\\{9,\\}[a-z ]+-\\{9,\\}[a-z ]+-\\{9,\\}[8<>]*-+$" "^-+[8<>]*-\\{9,\\}[a-z ]+-\\{9,\\}[a-z ]+-\\{9,\\}[8<>]*-+$" - (lambda () (mm-uu-verbatim-marks-extract 0 -1 1 -1)) + (lambda () (mm-uu-verbatim-marks-extract -1 0 1 -1)) nil) ;; Omitting [a-z8<] leads to false positives (bogus signature separators ;; and mailing list banners). @@ -248,11 +248,19 @@ The value should be nil on displays where the face :version "23.1" ;; No Gnus :group 'gnus-article-mime) -(defface mm-uu-extract '(;; Colors from `gnus-cite-3' plus background: +(defface mm-uu-extract '(;; Inspired by `gnus-cite-3' + (((type tty) + (class color) + (background dark)) + (:background "dark blue")) (((class color) (background dark)) (:foreground "light yellow" :background "dark green")) + (((type tty) + (class color) + (background light)) + (:foreground "dark blue")) (((class color) (background light)) (:foreground "dark green" |