[Mew-dist 2816] Re: color of citation in Message buffer

[Masahiro MURATA]

  村田@神戸です。

/// On Wed, 29 Oct 1997 23:43:50 +0900
/// Masahiro MURATA (村田全寛) wrote:

> # ついでに page break 後の message でも highlight-{url|body} させています。

  やはり問題がありました。mew-highlight-url を使用すると，場合によっては，

"Invalid search bound (wrong side of point)"

なるエラーが出ますね。一応 mew-highlight-url を以下のように変更すれば上
記のエラーは出なくなります。

--
村田 全寛 / MURATA Masahiro in かいしゃ
-------------- next part --------------
--- ./mew-highlight.el.2	Thu Oct 30 10:32:54 1997
+++ ./mew-highlight.el	Thu Oct 30 10:35:20 1997
@@ -201,10 +201,11 @@
   (if mew-opt-highlight-url
       (let ((url-regex mew-opt-highlight-url-regex)
 	    (buffer-read-only nil)
-	    overlay)
+	    bound overlay)
 	(save-excursion
 	  (goto-char (point-min))
-	  (while (re-search-forward url-regex mew-bold-url-size t)
+	  (setq bound (+ mew-bold-url-size (point)))
+	  (while (re-search-forward url-regex bound t)
 	    (setq overlay (mew-overlay-make (match-beginning 0) (match-end 0)))
 	    (mew-overlay-put overlay 'face mew-highlight-url-face)
 	    (mew-overlay-put overlay 'mouse-face mew-highlight-url-mouse-face)