@@ -1,5 +1,9 @@
Revision history for Perl extension Test::Object
+0.07 Thu 7 Sep 2006
+ # This release contains only build-time changes
+ - Fixed a bad dependency
+
0.06 Wed 7 Jun 2006
# This release contains only build-time changes
- Added explicit dependency on Test::Builder 0.62
@@ -1,21 +1,21 @@
abstract: Thoroughly testing objects via registered handlers
-author: 'Adam Kennedy <cpan@ali.as>'
+author: Adam Kennedy <cpan@ali.as>
distribution_type: module
-generated_by: Module::Install version 0.62
+generated_by: Module::Install version 0.64
license: perl
name: Test-Object
-no_index:
- directory:
+no_index:
+ directory:
- inc
- t
-requires:
+requires:
Carp: 0
Exporter: 0
File::Spec: 0.80
Scalar::Util: 1.16
- Test::Builder: 0.62
+ Test::Builder: 0.33
Test::Builder::Tester: 1.02
Test::More: 0.42
overload: 0
perl: 5.005
-version: 0.06
+version: 0.07
@@ -7,7 +7,7 @@ requires 'Carp' => 0;
requires 'Exporter' => 0;
requires 'Scalar::Util' => '1.16';
requires 'Test::More' => '0.42';
-requires 'Test::Builder' => '0.62';
+requires 'Test::Builder' => '0.33';
requires 'Test::Builder::Tester' => '1.02';
requires 'File::Spec' => '0.80';
@@ -1,7 +1,7 @@
#line 1
package Module::Install::Base;
-$VERSION = '0.62';
+$VERSION = '0.64';
# Suspend handler for "redefined" warnings
BEGIN {
@@ -11,7 +11,7 @@ use ExtUtils::MakeMaker ();
use vars qw{$VERSION $ISCORE @ISA};
BEGIN {
- $VERSION = '0.62';
+ $VERSION = '0.64';
$ISCORE = 1;
@ISA = qw{Module::Install::Base};
}
@@ -6,7 +6,7 @@ use Module::Install::Base;
use vars qw{$VERSION $ISCORE @ISA};
BEGIN {
- $VERSION = '0.62';
+ $VERSION = '0.64';
$ISCORE = 1;
@ISA = qw{Module::Install::Base};
}
@@ -7,7 +7,7 @@ use ExtUtils::MakeMaker ();
use vars qw{$VERSION $ISCORE @ISA};
BEGIN {
- $VERSION = '0.62';
+ $VERSION = '0.64';
$ISCORE = 1;
@ISA = qw{Module::Install::Base};
}
@@ -6,7 +6,7 @@ use Module::Install::Base;
use vars qw{$VERSION $ISCORE @ISA};
BEGIN {
- $VERSION = '0.62';
+ $VERSION = '0.64';
$ISCORE = 1;
@ISA = qw{Module::Install::Base};
}
@@ -123,9 +123,9 @@ sub auto_provides {
require Module::Build;
my $build = Module::Build->new(
- dist_name => $self->{name},
- dist_version => $self->{version},
- license => $self->{license},
+ dist_name => $self->name,
+ dist_version => $self->version,
+ license => $self->license,
);
$self->provides(%{ $build->find_dist_packages || {} });
}
@@ -6,7 +6,7 @@ use Module::Install::Base;
use vars qw{$VERSION $ISCORE @ISA};
BEGIN {
- $VERSION = '0.62';
+ $VERSION = '0.64';
$ISCORE = 1;
@ISA = qw{Module::Install::Base};
}
@@ -6,7 +6,7 @@ use Module::Install::Base;
use vars qw{$VERSION $ISCORE @ISA};
BEGIN {
- $VERSION = '0.62';
+ $VERSION = '0.64';
$ISCORE = 1;
@ISA = qw{Module::Install::Base};
}
@@ -28,7 +28,7 @@ BEGIN {
# This is not enforced yet, but will be some time in the next few
# releases once we can make sure it won't clash with custom
# Module::Install extensions.
- $VERSION = '0.62';
+ $VERSION = '0.64';
}
# Whether or not inc::Module::Install is actually loaded, the
@@ -51,6 +51,22 @@ not:
END_DIE
}
+# If the script that is loading Module::Install is from the future,
+# then make will detect this and cause it to re-run over and over
+# again. This is bad. Rather than taking action to touch it (which
+# is unreliable on some platforms and requires write permissions)
+# for now we should catch this and refuse to run.
+if ( -f $0 and (stat($0))[9] > time ) {
+ die << "END_DIE";
+Your installer $0 has a modification time in the future.
+
+This is known to create infinite loops in make.
+
+Please correct this, then run $0 again.
+
+END_DIE
+}
+
use Cwd ();
use File::Find ();
use File::Path ();
@@ -6,7 +6,7 @@ use Scalar::Util ();
use vars qw{$VERSION};
BEGIN {
- $VERSION = '0.06';
+ $VERSION = '0.07';
}
@@ -100,7 +100,7 @@ use Test::Object::Test ();
use vars qw{$VERSION @ISA @EXPORT};
BEGIN {
- $VERSION = '0.06';
+ $VERSION = '0.07';
@ISA = 'Exporter';
@EXPORT = 'object_ok';
}
@@ -1,6 +1,23 @@
+#!/use/bin/perl
+
use Test::More;
+
+# Skip developer testing except for during automated testing
+unless ( $ENV{AUTOMATED_TESTING} ) {
+ plan skip_all => "Skipping module author tests";
+ exit(0);
+}
+
+# Try to load Test::Pod
eval "use Test::Pod 1.00";
-plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;
+if ( $@ ) {
+ plan skip_all => "Test::Pod 1.00 required for testing POD";
+ exit(0);
+}
+
+
+
+
#####################################################################
# WARNING: INSANE BLACK MAGIC