Change 33691 by [EMAIL PROTECTED] on 2008/04/15 14:57:24
Add Dummy.pm from the base CPAN distribution,
and adjust tests accordingly
Affected files ...
... //depot/perl/MANIFEST#1694 edit
... //depot/perl/lib/base/t/lib/Dummy.pm#1 add
... //depot/perl/lib/base/t/version.t#2 edit
Differences ...
==== //depot/perl/MANIFEST#1694 (text) ====
Index: perl/MANIFEST
--- perl/MANIFEST#1693~33672~ 2008-04-13 06:12:15.000000000 -0700
+++ perl/MANIFEST 2008-04-15 07:57:24.000000000 -0700
@@ -1483,6 +1483,7 @@
lib/base/t/fields-base.t See if fields work
lib/base/t/fields.t See if fields work
lib/base/t/isa.t See if base's behaviour doesn't change
+lib/base/t/lib/Dummy.pm Test module for base.pm
lib/base/t/sigdie.t See if base works with SIGDIE
lib/base/t/version.t See if base works with versions
lib/base/t/warnings.t See if base works with warnings
@@ -3589,7 +3590,6 @@
t/lib/dprof/test8_t Perl code profiler tests
t/lib/dprof/test8_v Perl code profiler tests
t/lib/dprof/V.pm Perl code profiler tests
-t/lib/Dummy.pm Module for testing base.pm
t/lib/feature/bundle Tests for feature bundles
t/lib/feature/implicit Tests for implicit loading of feature.pm
t/lib/feature/nonesuch Tests for enabling/disabling nonexistent feature
==== //depot/perl/lib/base/t/lib/Dummy.pm#1 (text) ====
Index: perl/lib/base/t/lib/Dummy.pm
--- /dev/null 2008-03-18 12:45:05.529577733 -0700
+++ perl/lib/base/t/lib/Dummy.pm 2008-04-15 07:57:24.000000000 -0700
@@ -0,0 +1,4 @@
+package Dummy;
+
+# Attempt to emulate a bug with finding the version in Exporter.
+$VERSION = '5.562';
==== //depot/perl/lib/base/t/version.t#2 (text) ====
Index: perl/lib/base/t/version.t
--- perl/lib/base/t/version.t#1~31540~ 2007-07-06 06:58:58.000000000 -0700
+++ perl/lib/base/t/version.t 2008-04-15 07:57:24.000000000 -0700
@@ -3,7 +3,7 @@
BEGIN {
if( $ENV{PERL_CORE} ) {
chdir 't' if -d 't';
- @INC = qw(../lib ../t/lib);
+ @INC = qw(../lib ../lib/base/t/lib);
}
}
End of Patch.
