X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=Makefile.PL;h=77bb41fc85c3db232db3ca105f9a224fa6f1d69a;hb=b9d85b683ced37e5fdae820e2f098eb5d7a97585;hp=4d33feda9305475e819ea893f28518cb72ec25b3;hpb=1fb9f5093c05c7c3ca4dac6a10f31b911289b36a;p=dbsrgits%2FDBIx-Class-Schema-Loader.git

diff --git a/Makefile.PL b/Makefile.PL
index 4d33fed..77bb41f 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -84,8 +84,16 @@ See also the "Changes" file for the last few revisions.
 EOF
 
 if ($Module::Install::AUTHOR && ! $args->{skip_author_deps}) {
-    eval { require Module::Install::ReadmeFromPod }
-        or die "\nYou need Module::Install::ReadmeFromPod installed to run this Makefile.PL in author mode:\n\n$@\n";
+    my @missing_plugins;
+    for my $plugin (qw(ReadmeFromPod AuthorTests)) {
+        eval "require Module::Install::$plugin" and next;
+        push @missing_plugins, "Module::Instal::$plugin";
+        chomp(my $err = $@);
+        $missing_plugins[-1] .= " ($err)"
+            unless $err =~ m{^Can't locate Module/Install/$plugin.pm in \@INC};
+    }
+    die "\nYou need to install the following modules to run this Makefile.PL in author mode:\n\n", join("\n", @missing_plugins), "\n\n"
+        if @missing_plugins;
 
     warn "\n*** AUTHOR MODE: some optional dependencies converted to hard requires.\n\n";