Merged with master and am ready to merge back

[dbsrgits/DBM-Deep.git] / Build.PL

diff --git a/Build.PL b/Build.PL
index 758f756..e691c3f 100644 (file)
--- a/Build.PL
+++ b/Build.PL
@@ -3,26 +3,31 @@ use Module::Build 0.28; # for prepare_metadata
 use strict;
 use warnings FATAL => 'all';
 
-my $class = Module::Build->subclass(
+my $build = Module::Build->subclass(
     class => "Module::Build::Custom",
-    code => <<'SUBCLASS' );
-
-sub ACTION_test {
-    my $self = shift;
-    if ( $self->notes('TEST_MYSQL_DSN') ) {
-        $ENV{$_} = $self->notes($_) for qw(
-            TEST_MYSQL_DSN TEST_MYSQL_USER TEST_MYSQL_PASS
-        );
-    }
-    foreach my $name ( qw( LONG_TESTS TEST_SQLITE ) ) {
-        $ENV{$name} = 1 if $self->notes( $name );
-    }
+    code => '
+        sub prepare_metadata {
+            my $node = shift->SUPER::prepare_metadata(@_);
+            my $ver = $node->{version};
+            $_->{version} = $ver for values %{$node->{provides}};
+            $node;
+        }
 
-    $self->SUPER::ACTION_test( @_ );
-}
-SUBCLASS
+        sub ACTION_test {
+            my $self = shift;
+            if ( $self->notes(\'TEST_MYSQL_DSN\') ) {
+                $ENV{$_} = $self->notes($_) for qw(
+                    TEST_MYSQL_DSN TEST_MYSQL_USER TEST_MYSQL_PASS
+                );
+            }
+            foreach my $name ( qw( LONG_TESTS TEST_SQLITE ) ) {
+                $ENV{$name} = 1 if $self->notes( $name );
+            }
 
-my $build = $class->new(
+            $self->SUPER::ACTION_test( @_ );
+        }
+    ',
+)->new(
     module_name => 'DBM::Deep',
     license => 'perl',
     requires => {
@@ -38,6 +43,7 @@ my $build = $class->new(
         'Test::More'      => '0.88',
         'Test::Deep'      => '0.095',
         'Test::Warn'      => '0.08',
+        'Test::More'      => '0.88', # done_testing
         'Test::Exception' => '0.21',
         'IO::Scalar'      => '0.01',
     },