Fix building on perls with no . in @INC

[dbsrgits/DBIx-Class.git] / t / 39load_namespaces_stress.t

diff --git a/t/39load_namespaces_stress.t b/t/39load_namespaces_stress.t
index b688669..bfef360 100644 (file)
--- a/t/39load_namespaces_stress.t
+++ b/t/39load_namespaces_stress.t
@@ -3,8 +3,6 @@ BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) }
 use strict;
 use warnings;
 use Test::More;
-use Time::HiRes qw/gettimeofday/;
-
 
 use DBICTest; # do not remove even though it is not used
 
@@ -29,7 +27,7 @@ EOM
 {
   package DBICTest::NS::Stress::Schema;
 
-  use base qw/DBIx::Class::Schema/;
+  use base qw/DBICTest::BaseSchema/;
 
   sub _findallmod {
     return $_[1] eq ( __PACKAGE__ . '::Result' )
@@ -41,10 +39,7 @@ EOM
 
 is (DBICTest::NS::Stress::Schema->sources, 0, 'Start with no sources');
 
-
-note gettimeofday . ":\tload_namespaces start";
 DBICTest::NS::Stress::Schema->load_namespaces;
-note gettimeofday . ":\tload_namespaces finished";
 
 is (DBICTest::NS::Stress::Schema->sources, $src_count, 'All sources attached');