[Mew-dist 08454] Re: im-111 で急に遅くなった imls

[SAKAI Kiyotaka]

>> In article <19990402181006C.kazu at example.com>, Kazu Yamamoto (山本和彦) <kazu at example.com> writes:

>> いつディレクトリかどうかのチェックをするにしても、必ず一つずつするので
>> したら、総所要時間の面で改善されない気がしますが、勘違いでしょうか？

> ああ、sort などのように内容を表示しないコマンドですね。

imls 中に以下のようなコードがあったため、imls ならばチェックを省略すれ
ば速くなるかなと思って先のように書いたのですが、考えみれば Folder.pm 
の中でチェックしていれば以下のチェックは必要ないですね。

ですので、imls でも以下のチェックを消せば、imsort 等と同じように 1回で
済むのではないでしょうか。

  sub local_files ($@) {
      my $folder = shift;
      my @arg = @_;
      my %Head = ();
      my $num;

      foreach $num (get_message_paths($folder, @arg)) {
	  if ( -f $num ) {                      <--- ここでチェックしている
	      %Head = &get_header($num);
	      $FIRST = $Head{'number:'} if $FIRST == 0;
	      if ($opt_thread) {
		  &make_thread(%Head);
	      } else {
		  &disp_msg(\%Head);
		  $scan_count++;
	      }
	  }
      }
      $LAST = $Head{'number:'} if ($LAST == 100000);
  }

-- 
酒井 清隆 (E-mail: ksakai at example.com)