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=3d53245aade524fdc90626b03b338ce22dce5635;hpb=d755000b7aca1430c279859de8be5ebaf0e3b767;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/cdbi/22-deflate_order.t b/t/cdbi/22-deflate_order.t
index 3d53245..a54eaf7 100644
--- a/t/cdbi/22-deflate_order.t
+++ b/t/cdbi/22-deflate_order.t
@@ -1,23 +1,14 @@
+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;
-}
-
-plan skip_all => 'Set $ENV{DBICTEST_MYSQL_DSN}, _USER and _PASS to run this test'
-  unless ($ENV{DBICTEST_MYSQL_DSN} && $ENV{DBICTEST_MYSQL_USER});
-
-eval { require Time::Piece::MySQL };
-plan skip_all => "Need Time::Piece::MySQL for this test" if $@;
-
-plan tests => 3;
-
 use lib 't/cdbi/testlib';
+
 use_ok ('Log');
 
 package main;
@@ -31,3 +22,4 @@ $log->update;
 ok eval { $log->datetime_stamp }, "Have datetime after update";
 diag $@ if $@;
 
+done_testing;