skip parts of t/60core.t if no DateTime::Format::MySQL
[dbsrgits/DBIx-Class.git] / t / cdbi-t / 30-pager.t
index aba18e0..31e43dc 100644 (file)
@@ -2,8 +2,13 @@ use strict;
 use Test::More;\r
 \r
 BEGIN {\r
-       eval "use DBD::SQLite";\r
-       plan $@ ? (skip_all => 'needs DBD::SQLite for testing') : (tests => 6);\r
+  eval "use DBIx::Class::CDBICompat;";\r
+  if ($@) {\r
+    plan (skip_all => 'Class::Trigger and DBIx::ContextualFetch required');\r
+    next;\r
+  }\r
+  eval "use DBD::SQLite";\r
+  plan $@ ? (skip_all => 'needs DBD::SQLite for testing') : (tests => 6);\r
 }\r
 \r
 use lib 't/testlib';\r