[Mew-dist 15433] Re: incremental search in summary mode

[Shun-ichi GOTO]

>>>>> at Wed, 13 Dec 2000 12:41:34 +0900
>>>>> 白井 == Hideyuki SHIRAI (白井秀行) <shirai at example.com> said,

kazu> 	- mode line はあきらめて

酒井> 個人的には、あきらめたくないです。

白井> [n more] の表示を、[n/m] (n: あと何通, m: 今何通目) にしてしまう
白井> という手もありますね。

これをするとなると、fancy thread の場合の数え方は、計算の度に
separator 行を数えなきゃならなくなるのでツライかも

## っていうか、『現在何通目』って必要ですか？
## 『このフォルダには何通あるか』は必要だと思ってますが。


白井> "v" するとだめだけど、"v" したときに [- more] にしないで、最後に
白井> 表示した [n/m] を保持するようにすれば、そんなに気にならないかな、
白井> という気がします。(試していませんけど)

酒井>   (while (re-search-forward "\r.*\n" nil t)
酒井>     (put-text-property (match-beginning 0) (1- (match-end 0)) 'invisible t))

白井> これで、3/4 の時間になるのですね。regex はやっぱり良く考えない
白井> といけないと反省。

ついでにいうと、

   (while (search-forward "\r" nil t)
     (put-text-property (match-beginning 0)
			(progn (end-of-line) (point))
			'invisible t))))
などとすると 20% スピードアップ (当社比)

--- Regards,
 Shun-ichi Goto  <gotoh at example.com>
   R&D Group, TAIYO Corp., Tokyo, JAPAN