Pull apart a test section (no functional changes)

[dbsrgits/DBIx-Class.git] / t / 00describe_environment.t

diff --git a/t/00describe_environment.t b/t/00describe_environment.t
index 35e6b02..37e3da9 100644 (file)
--- a/t/00describe_environment.t
+++ b/t/00describe_environment.t
@@ -11,9 +11,9 @@ BEGIN {
   @initial_INC = @INC;
 }
 
-BEGIN {
-  unshift @INC, 't/lib';
+BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) }
 
+BEGIN {
   if ( "$]" < 5.010) {
 
     # Pre-5.10 perls pollute %INC on unsuccesfull module
@@ -192,6 +192,7 @@ my $load_weights = {
 
 my @known_modules = sort
   { ($load_weights->{$b}||0) <=> ($load_weights->{$a}||0) }
+  qw( Data::Dumper ),
   keys %{
     DBIx::Class::Optional::Dependencies->req_list_for([
       grep