X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=Makefile.PL;h=c36ad9d0991e783333deb0c440a0b3b10359d3b9;hb=fe650234f47eef14b89fe0f4fee651dd4f2ad7b5;hp=1e84a2948c720433753bdb09e8582008b4144236;hpb=1680d3175a80b87fe39c53a69c893bf28046b8bd;p=dbsrgits%2FDBIx-Class.git diff --git a/Makefile.PL b/Makefile.PL index 1e84a29..c36ad9d 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -1,4 +1,8 @@ use inc::Module::Install 0.67; +use strict; +use warnings; + +use 5.006001; # delete this line if you want to send patches for earlier. name 'DBIx-Class'; perl_version '5.006001'; @@ -16,22 +20,38 @@ requires 'DBI' => 1.40; requires 'Module::Find' => 0; requires 'Class::Inspector' => 0; requires 'Class::Accessor::Grouped' => 0.05002; -requires 'JSON' => 1.00; +requires 'JSON::Any' => 1.00; requires 'Scope::Guard' => 0.03; +requires 'Digest::SHA1' => 2.00; +requires 'Path::Class' => 0; # Perl 5.8.0 doesn't have utf8::is_utf8() requires 'Encode' => 0 if ($] <= 5.008000); build_requires 'DBD::SQLite' => 1.13; build_requires 'Test::Builder' => 0.33; +build_requires 'Test::Warn' => 0.08; +build_requires 'Test::NoWarnings' => 0.08; install_script 'script/dbicadmin'; tests "t/*.t t/*/*.t"; -# re-build README if we're in an svk checkout -if( -e 'MANIFEST.SKIP' ) { - system('pod2text lib/DBIx/Class.pm > README'); +# re-build README and require CDBI modules for testing if we're in a checkout + +my @force_build_requires_if_author = qw( + DBIx::ContextualFetch + Class::Trigger + Time::Piece +); + +if ($Module::Install::AUTHOR) { + + foreach my $module (@force_build_requires_if_author) { + build_requires $module; + } + + system('pod2text lib/DBIx/Class.pm > README'); } auto_provides; @@ -39,3 +59,35 @@ auto_provides; auto_install; WriteAll; + + +if ($Module::Install::AUTHOR) { + # Need to do this _after_ WriteAll else it looses track of them + Meta->{values}{build_requires} = [ grep { + my $ok = 1; + foreach my $module (@force_build_requires_if_author) { + if ($_->[0] =~ /$module/) { + $ok = 0; + last; + } + } + $ok; + } @{Meta->{values}{build_requires}} ]; + + my @scalar_keys = Module::Install::Metadata::Meta_TupleKeys(); + my $cr = Module::Install::Metadata->can("Meta_TupleKeys"); + { + no warnings 'redefine'; + *Module::Install::Metadata::Meta_TupleKeys = sub { + return $cr->(@_), 'resources'; + }; + } + Meta->{values}{resources} = [ + [ 'MailingList', 'http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/dbix-class' ], + [ 'IRC', 'irc://irc.perl.org/#dbix-class' ], + ]; + Meta->write; +} + + +