fix metacpan/MetaCPAN-Client#122 with a monkeypatch

Author: wchristian

xt/dependent-modules.t

@@ -2,14 +2,21 @@ use Test2::V0;
 use strictures 2;
 
 use Test::DependentModules 'test_all_dependents';
+use MetaCPAN::Client;
 
 skip_all "ENV var TEST_DEPENDENTS not set" if not $ENV{TEST_DEPENDENTS};
 
 # duplicate error output into an array for later printing
 my @error_log;
-my $old = \&Test::DependentModules::_error_log;
-my $new = sub { push @error_log, @_; $old->(@_); };
-{ no warnings 'redefine'; *Test::DependentModules::_error_log = $new; }
+my $old_log = \&Test::DependentModules::_error_log;
+my $new_log = sub { push @error_log, @_; $old_log->(@_); };
+{ no warnings 'redefine'; *Test::DependentModules::_error_log = $new_log; }
+
+# force metacpan to actually return the whole dependents list
+# https://github.com/metacpan/metacpan-client/issues/122
+my $old_fetch = \&MetaCPAN::Client::fetch;
+my $new_fetch = sub { $old_fetch->( shift, shift . "?size=5000", @_ ) };
+{ no warnings 'redefine'; *MetaCPAN::Client::fetch = $new_fetch; }
 
 test_all_dependents PPI => {
     exclude => qr/^(