Fix test-skipping logic for File::Find under no-taint-perl
authorSteffen Mueller <smueller@cpan.org>
Mon, 19 Nov 2012 06:51:49 +0000 (07:51 +0100)
committerSteffen Mueller <smueller@cpan.org>
Tue, 20 Nov 2012 07:06:14 +0000 (08:06 +0100)
lib/File/Find/t/taint.t

index f696a43..954c678 100644 (file)
@@ -4,8 +4,8 @@ use Test::More;
 BEGIN {
     plan(
         ${^TAINT}
-        ? (skip_all => "A perl without taint support") 
-        : (tests => 45)
+        ? (tests => 45)
+        : (skip_all => "A perl without taint support") 
     );
 }