add cflags as a dependency for all object files. (it is used to control the arguments...

[p5sagit/p5-mst-13.2.git] / lib / Exporter.t

diff --git a/lib/Exporter.t b/lib/Exporter.t
index 27b1e67..ce37116 100644 (file)
--- a/lib/Exporter.t
+++ b/lib/Exporter.t
@@ -25,7 +25,7 @@ sub ok ($;$) {
 
 BEGIN {
     $test = 1;
-    print "1..28\n";
+    print "1..30\n";
     require Exporter;
     ok( 1, 'Exporter compiled' );
 }
@@ -218,3 +218,8 @@ The::Import->import;
 my $val = eval { wibble() };
 ::ok($val eq "wobble", "exported importer worked");
 
+# Check that Carp recognizes Exporter as internal to Perl 
+require Carp;
+::ok($Carp::Internal{Exporter}, "Carp recognizes Exporter");
+::ok($Carp::Internal{'Exporter::Heavy'}, "Carp recognizes Exporter::Heavy");
+