X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcdbi-t%2F08-inheritcols.t;h=af294248517e36de48ed83263359d6bec48fe2c3;hb=2d7a4e4642b546553e33e6b780228258279594a7;hp=3e71a9efc67d36d68360a6707c9da25e604e668b;hpb=126042ee4b9394c4eecc6ece49469da6fce23ba3;p=dbsrgits%2FDBIx-Class-Historic.git

diff --git a/t/cdbi-t/08-inheritcols.t b/t/cdbi-t/08-inheritcols.t
index 3e71a9e..af29424 100644
--- 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;