(Retracted by #10848.)

p4raw-id: //depot/perl@10845

diff --git a/lib/File/Find/taint.t b/lib/File/Find/taint.t
index fb3dfc2..14843a1 100644 (file)
--- a/lib/File/Find/taint.t
+++ b/lib/File/Find/taint.t
@@ -321,7 +321,7 @@ eval {File::Find::find( {wanted => \&simple_wanted, untaint => 1,
 
 print "# $@" if $@;
 #$^D = 8;
-if ($^O eq 'MSWin32') {
+if ($^O eq 'MSWin32' || $^O eq 'cygwin') {
        Skip("$^O does not taint cwd");
     } 
 else {