EXCLUDE Module-Metadata's t/taint.t: we don't have Test::Fatal in core

diff --git a/MANIFEST b/MANIFEST
index 915d418..8e16f93 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -1764,7 +1764,6 @@ cpan/Module-Metadata/t/lib/ENDPOD.pm
 cpan/Module-Metadata/t/lib/MBTest.pm
 cpan/Module-Metadata/t/lib/Tie/CPHash.pm
 cpan/Module-Metadata/t/metadata.t
-cpan/Module-Metadata/t/taint.t
 cpan/Module-Metadata/t/version.t
 cpan/NEXT/lib/NEXT.pm          Pseudo-class NEXT for method redispatch
 cpan/NEXT/t/actual.t           NEXT

diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index d11fb83..4638ea7 100755 (executable)
--- a/Porting/Maintainers.pl
+++ b/Porting/Maintainers.pl
@@ -1244,6 +1244,7 @@ use File::Glob qw(:case);
         'DISTRIBUTION' => 'ETHER/Module-Metadata-1.000017.tar.gz',
         'FILES'        => q[cpan/Module-Metadata],
         'EXCLUDED'     => [
+            qw(t/taint.t),
             qr{^maint},
             qr{^xt},
         ],

diff --git a/cpan/Module-Metadata/t/taint.t b/cpan/Module-Metadata/t/taint.t
deleted file mode 100644 (file)
index 8ca1346..0000000
--- a/cpan/Module-Metadata/t/taint.t
+++ /dev/null
@@ -1,20 +0,0 @@
-#!/usr/bin/perl -T
-use strict;
-use warnings;
-
-use 5.008000;   # for ${^TAINT}
-use Module::Metadata;
-use Test::More;
-use Test::Fatal;
-
-ok(${^TAINT}, 'taint flag is set');
-
-# without the fix, we get:
-# Insecure dependency in eval while running with -T switch at lib/Module/Metadata.pm line 668, <GEN0> line 15.
-is(
-    exception { Module::Metadata->new_from_module( "Module::Metadata" )->version },
-    undef,
-    'no exception',
-);
-
-done_testing;