From: sekita-n@... (Sekitani Nobutaka)
Date: 1998-12-14T19:53:18+09:00
Subject: [ruby-list:11316] find.rb bug(?) fix

関谷＠電通大です。

先日のmyfind.rbとは別に、find.rbにあるちょっとした欠陥の報告をします。
症状：
ディレクトリを指すシンボリックリンクを見つけた場合、その先もたどろうと
する。リンクの張り方によってはループに陥る場合があり危険。
パッチはsignatureの下にあります。

------
電気通信大学 情報工学科 ４年           |% 予習
関谷 信貴(せきたに のぶたか)           |file system full.
e-mail   sekita-n@hera.im.uec.ac.jp    |% 授業
Webpage  http://welcome.to/s-valley    |file system full.;_;
↑シュミ特、Fanroad N-BBSなど          |system downed...

--- find.rb.orig        Fri Nov 27 00:31:05 1998
+++ find.rb     Tue Dec  1 21:47:05 1998
@@ -12,7 +12,7 @@
     while file = path.shift
       catch(:prune) {
        yield file
-       if File.directory? file then
+       if (!(File.symlink? file) && (File.directory? file)) then
          d = Dir.open(file)
          begin
            for f in d