[Mew-dist 16989] highlighting header over the LF.

[Hideyuki SHIRAI ( 白井秀行 )]

派手な Mew を追求しようと思い、

(face-spec-set 'mew-face-header-xmew
	       '((((class color) (background light))
		  (:foreground "linen" :background "chocolate" :bold t))))

なことをやって気付いたのですが、
mew-decode-header-property-region() で色をつけるときに、
forward-line() した point(改行) まで色を塗ってしまうので、特に
FSF Emacs では Frame の右端まで色がついてしまいます。

一行パッチ。

-- 
白井秀行 (mailto:shirai at example.com)

--- mew-decode.el.~1.23.~	Fri Mar 30 14:20:38 2001
+++ mew-decode.el	Fri Mar 30 21:41:14 2001
@@ -170,7 +170,7 @@
 	       (setq val-face (or (mew-nspec-valface nspec)
 				  'mew-face-header-marginal))
 	       (put-text-property beg med 'face key-face)
-	       (put-text-property med (point) 'face val-face))))))))
+	       (put-text-property med (1- (point)) 'face val-face))))))))
 
 (defun mew-decode-rfc822-header (&optional no-property)
   "A function to handle RFC822 header.