Upgrade to CPAN-1.76_60.

p4raw-id: //depot/perl@26016

5 files changed, 48 insertions, 4 deletions

diff --git a/lib/CPAN/t/Nox.t b/lib/CPAN/t/Nox.t
index 4006771081..990906b7af 100644
--- a/lib/CPAN/t/Nox.t
+++ b/lib/CPAN/t/Nox.t
@@ -24,3 +24,8 @@ for my $mod (qw( Digest::MD5 LWP Compress::Zlib )) {
 # and these will be set to those in CPAN
 is( @CPAN::Nox::EXPORT, @CPAN::EXPORT, 'should export just what CPAN does' );
 is( \&CPAN::Nox::AUTOLOAD, \&CPAN::AUTOLOAD, 'AUTOLOAD should be aliased' );
+
+# Local Variables:
+# mode: cperl
+# cperl-indent-level: 2
+# End:
diff --git a/lib/CPAN/t/loadme.t b/lib/CPAN/t/loadme.t
index fd0b67989d..c22589b656 100644
--- a/lib/CPAN/t/loadme.t
+++ b/lib/CPAN/t/loadme.t
@@ -9,3 +9,7 @@ use CPAN::FirstTime;
 
 print "ok 1\n";
 
+# Local Variables:
+# mode: cperl
+# cperl-indent-level: 2
+# End:
diff --git a/lib/CPAN/t/mirroredby.t b/lib/CPAN/t/mirroredby.t
index f383be82bc..88e2ef0b92 100644
--- a/lib/CPAN/t/mirroredby.t
+++ b/lib/CPAN/t/mirroredby.t
@@ -21,3 +21,8 @@ is( $cmb->continent(), 'continent',
 	'continent() should return continent entry' );
 is( $cmb->country(), 'country', 'country() should return country entry' );
 is( $cmb->url(), 'url', 'url() should return url entry' );
+
+# Local Variables:
+# mode: cperl
+# cperl-indent-level: 2
+# End:
diff --git a/lib/CPAN/t/vcmp.t b/lib/CPAN/t/vcmp.t
index daed979570..11bae38d2b 100644
--- a/lib/CPAN/t/vcmp.t
+++ b/lib/CPAN/t/vcmp.t
@@ -1,11 +1,12 @@
 # -*- Mode: cperl; coding: utf-8; -*-
 
 use strict;
-use CPAN;
+use CPAN::Version;
 use vars qw($D $N);
 
 while (<DATA>) {
   next if /^v/ && $]<5.006; # v-string tests are not for pre-5.6.0
+  last if /^__END__$/;
   chomp;
   s/\s*#.*//;
   push @$D, [ split ];
@@ -35,17 +36,17 @@ __END__
 v1.2.3 v1.1.1 1
 v1.2.3 v1.2.1 1
 v1.2.3 v1.2.11 -1
-1.2.3 1.2.11 1 # not what they wanted
+1.2.3 1.2.11 -1
 1.9 1.10 1
 VERSION VERSION 0
 0.02 undef 1
 1.57_00 1.57 1
 1.5700 1.57 1
 1.57_01 1.57 1
-0.2.10 0.2 1
+0.2.10 0.2 -1
 20000000.00 19990108 1
 1.00 0.96 1
-0.7.02 0.7 1
+0.7.02 0.7 -1
 1.3a5 1.3 1
 undef 1.00 -1
 v1.0 undef 1
@@ -55,3 +56,16 @@ v1.0.22 122 -1
 5.005056 v5.5.56 0
 5.00557 v5.5.560 1
 5.00056 v5.0.561 -1
+0.0.2 0.000002 0
+1.0.3 1.000003 0
+1.0.1 1.000001 0
+0.0.1 0.000001 0
+0.01.04 0.001004 0
+0.05.18 0.005018 0
+4.08.00 4.008000 0
+__END__
+
+# Local Variables:
+# mode: cperl
+# cperl-indent-level: 2
+# End:
diff --git a/lib/CPAN/t/version.t b/lib/CPAN/t/version.t
new file mode 100644
index 0000000000..899a31d074
--- /dev/null
+++ b/lib/CPAN/t/version.t
@@ -0,0 +1,16 @@
+# test if our own version numbers meet expectations
+
+my [at]m = qw(CPAN CPAN::FirstTime CPAN::Nox);
+
+use Test::More;
+plan(tests => scalar [at]m);
+
+for my $m (@m) {
+  eval "require $m";
+  ok($m->VERSION >= 1.76, sprintf "%20s: %s", $m, $m->VERSION);
+}
+
+# Local Variables:
+# mode: cperl
+# cperl-indent-level: 2
+# End: