X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F68inflate_has_a.t;h=9dc1661bfe09157a847ada6edd6a333bca71edcb;hb=20ea4813ff750408ceb3b9701bf9e88dc6bcff78;hp=1346ce549f3d7d8018a109a02263406a2e02e7a2;hpb=a47e123334d8bcea0d34dc9ea09738d6f3b1fd49;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/68inflate_has_a.t b/t/68inflate_has_a.t index 1346ce5..9dc1661 100644 --- a/t/68inflate_has_a.t +++ b/t/68inflate_has_a.t @@ -10,9 +10,12 @@ my $schema = DBICTest->init_schema(); eval { require DateTime }; plan skip_all => "Need DateTime for inflation tests" if $@; +eval { require Clone }; +plan skip_all => "Need Clone for CDBICompat inflation tests" if $@; + plan tests => 6; -DBICTest::Schema::CD->load_components(qw/CDBICompat::HasA/); +DBICTest::Schema::CD->load_components(qw/CDBICompat::Relationships/); DBICTest::Schema::CD->has_a( 'year', 'DateTime', inflate => sub { DateTime->new( year => shift ) },