Resolve $rsrc instance duality on metadata traversal

[dbsrgits/DBIx-Class.git] / t / cdbi / 24-meta_info.t

diff --git a/t/cdbi/24-meta_info.t b/t/cdbi/24-meta_info.t
index 32cc5ca..7004de1 100644 (file)
--- a/t/cdbi/24-meta_info.t
+++ b/t/cdbi/24-meta_info.t
@@ -1,14 +1,10 @@
-use strict;
-use Test::More;
+BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) }
+use DBIx::Class::Optional::Dependencies -skip_all_without => qw( cdbicompat Time::Piece>=0 );
 
-BEGIN {
-  eval "use DBIx::Class::CDBICompat;use Time::Piece;";
-  plan skip_all => "Time::Piece, Class::Trigger and DBIx::ContextualFetch required: $@"
-    if $@;
-
-  plan tests => 12;
-}
+use strict;
+use warnings;
 
+use Test::More;
 use Test::Warn;
 
 package Temp::DBI;
@@ -73,3 +69,5 @@ package main;
     is $date->accessor,         'date';
     is $date->args->{inflate},  $strptime_inflate;
 }
+
+done_testing;