diff --git a/xt/DepReqs.pm b/xt/DepReqs.pm index 5aca289e..c73b263e 100644 --- a/xt/DepReqs.pm +++ b/xt/DepReqs.pm @@ -20,6 +20,9 @@ sub run { # synch with dependent-modules.t my @deps = Test::DependentModules::_get_deps PPI => { exclude => qr/^(Apache2-SSI|Devel-IPerl|Padre|Devel-Examine-Subs)$/ }; + + { no warnings 'redefine'; *MetaCPAN::Client::fetch = $old_fetch; } + my $c = MetaCPAN::Client->new; my @reqs = map @{ $c->release($_)->dependency }, @deps; io("xt/cpanfile")