[mew-dist 24106] mew-highlight-body-max-size
Kazumi HARA
hara at example.com
2003年 10月 24日 (金) 11:30:07 JST
こんにちは、はら@リコー と申します。
mew-highlight-body-max-size にて、url の色付けサイズを決めてま
すが、何も気にせず Body 全てを highlight して欲しい設定をした
いなぁ、と思って、
(setq mew-highlight-body-max-size 0)
で、no limitation って言うのは如何なものでしょうか?
いつだったか記憶が定かじゃないんですけど、以前の version で
(setq mew-hoge-hoge t) みたいな感じで、全部を highlight してい
た頃があった気がするんですけど...
# 大きな数字入れたら、ええんちゃう?って言われてしまえば、その
# 通りなんですけど、「ナンボがええんやろ?」とか悩まなくて済む
# かな?って (^o^;;;
max-size なのに「ゼロ」って入れるのも変な感じ ;-p なので、なん
となく、こんなことがしたい奴がいるんだと言うことを、わかってい
ただけたら幸いです m(__)m
--
はらかずみ < hara at example.com >
$ diff -u mew-highlight.el~ mew-highlight.el
--- mew-highlight.el~ Wed Jul 16 11:07:20 2003
+++ mew-highlight.el Fri Oct 24 10:23:56 2003
@@ -117,9 +117,12 @@
(defun mew-highlight-body-region (BEG END &optional draft rehighlight)
(when (and (or mew-use-highlight-body mew-use-highlight-url)
- (<= BEG mew-highlight-body-max-size))
- (if (> END mew-highlight-body-max-size)
- (setq END mew-highlight-body-max-size))
+ (or (= 0 mew-highlight-body-max-size)
+ (<= BEG mew-highlight-body-max-size)))
+ (if (or (= 0 mew-highlight-body-max-size)
+ (< END mew-highlight-body-max-size))
+ ()
+ (setq END mew-highlight-body-max-size))
(let* ((inhibit-point-motion-hooks t)
(cite-regex mew-highlight-body-regex-cite)
(cmt-regex mew-highlight-body-regex-comment)
$ diff -u mew-vars.el~ mew-vars.el
--- mew-vars.el~ Wed Sep 24 22:25:06 2003
+++ mew-vars.el Fri Oct 24 10:56:37 2003
@@ -1219,7 +1219,7 @@
:type 'integer)
(defcustom mew-highlight-body-max-size 10000
- "A limit for highlighting a body."
+ "A limit for highlighting a body. '0' means No-Limitation"
:group 'mew-highlight
:type 'integer)
Mew-dist メーリングリストの案内