From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Mon, 26 Sep 2005 14:45:53 +0000 (+0000)
Subject: Fix change 25597 for non-Windows platforms
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1bb1745960244153b0ed527cc2c3eb327b8de825;p=p5sagit%2Fp5-mst-13.2.git

Fix change 25597 for non-Windows platforms

p4raw-id: //depot/perl@25602
---

diff --git a/lib/File/Find.pm b/lib/File/Find.pm
index e3e6563..b481fd8 100644
--- a/lib/File/Find.pm
+++ b/lib/File/Find.pm
@@ -608,8 +608,8 @@ sub _find_opt {
     $post_process      = $wanted->{postprocess};
     $no_chdir          = $wanted->{no_chdir};
     $full_check        = $^O eq 'MSWin32' ? 0 : $wanted->{follow};
-    $follow            = $full_check || $^O eq 'MSWin32' ? 0 : 
-                             $wanted->{follow_fast};
+    $follow            = $^O eq 'MSWin32' ? 0 :
+                             $full_check || $wanted->{follow_fast};
     $follow_skip       = $wanted->{follow_skip};
     $untaint           = $wanted->{untaint};
     $untaint_pat       = $wanted->{untaint_pattern};