add TODO on constraint check

[dbsrgits/DBIx-Class.git] / t / cdbi-t / 08-inheritcols.t

diff --git a/t/cdbi-t/08-inheritcols.t b/t/cdbi-t/08-inheritcols.t
index 3e71a9e..af29424 100644 (file)
--- a/t/cdbi-t/08-inheritcols.t
+++ b/t/cdbi-t/08-inheritcols.t
@@ -1,13 +1,16 @@
 #!/usr/bin/perl -w
 
 use strict;
-use Test::More tests => 3;
+use Test::More;
 
-use DBIx::Class;
+BEGIN {
+  eval "use DBIx::Class::CDBICompat;";
+  plan $@ ? (skip_all => 'Class::Trigger and DBIx::ContextualFetch required')
+          : (tests=> 3);
+}
 
 package A;
-@A::ISA = qw(DBIx::Class);
-__PACKAGE__->load_components(qw/CDBICompat Core/);
+@A::ISA = qw(DBIx::Class::CDBICompat);
 __PACKAGE__->columns(Primary => 'id');
 
 package A::B;