Add Dummy.pm from the base CPAN distribution,
Rafael Garcia-Suarez [Tue, 15 Apr 2008 14:57:24 +0000 (14:57 +0000)]
and adjust tests accordingly

p4raw-id: //depot/perl@33691

MANIFEST
lib/base/t/lib/Dummy.pm [new file with mode: 0644]
lib/base/t/version.t

index f6c5f8d..9ddf38c 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -1483,6 +1483,7 @@ lib/base/t/base.t         See if base works
 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/test7_v               Perl code profiler tests
 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
diff --git a/lib/base/t/lib/Dummy.pm b/lib/base/t/lib/Dummy.pm
new file mode 100644 (file)
index 0000000..504330f
--- /dev/null
@@ -0,0 +1,4 @@
+package Dummy;
+
+# Attempt to emulate a bug with finding the version in Exporter.
+$VERSION = '5.562';
index f2d7b73..2045a7f 100644 (file)
@@ -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);
     }
 }