X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcdbi%2F22-deflate_order.t;h=a54eaf70db99a82bca84accaf0b49361b2e38bf2;hb=c0329273268971824784f239f32c7246e68da9c5;hp=9d943e5b5be1641e6a06f4424e25fd087fee1ee1;hpb=50891152d0b24649bfd67bdba97feec86b11c064;p=dbsrgits%2FDBIx-Class.git diff --git a/t/cdbi/22-deflate_order.t b/t/cdbi/22-deflate_order.t index 9d943e5..a54eaf7 100644 --- a/t/cdbi/22-deflate_order.t +++ b/t/cdbi/22-deflate_order.t @@ -1,21 +1,15 @@ +BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) } +use DBIx::Class::Optional::Dependencies -skip_all_without => qw( cdbicompat test_rdbms_mysql Time::Piece::MySQL>=0 ); + $| = 1; +use warnings; use strict; use Test::More; -eval "use DBIx::Class::CDBICompat;"; -if ($@) { - plan (skip_all => "Class::Trigger and DBIx::ContextualFetch required: $@"); - next; -} - -eval { require Time::Piece::MySQL }; -plan skip_all => "Need Time::Piece::MySQL for this test" if $@; - -eval { require 't/cdbi/testlib/Log.pm' }; -plan skip_all => "Need MySQL for this test" if $@; +use lib 't/cdbi/testlib'; -plan tests => 2; +use_ok ('Log'); package main; @@ -28,3 +22,4 @@ $log->update; ok eval { $log->datetime_stamp }, "Have datetime after update"; diag $@ if $@; +done_testing;