quote code supports multi-part idents

[dbsrgits/SQL-Abstract.git] / t / dbic / show-progress.t

diff --git a/t/dbic/show-progress.t b/t/dbic/show-progress.t
index 672d635..c541ad9 100644 (file)
--- a/t/dbic/show-progress.t
+++ b/t/dbic/show-progress.t
@@ -2,6 +2,16 @@ use strict;
 use warnings;
 
 use Test::More;
+
+BEGIN {
+  # ask for a recent DBIC version to skip the 5.6 tests as well
+  plan skip_all => 'Test temporarily requires DBIx::Class'
+    unless eval { require DBIx::Class::Storage::Statistics; DBIx::Class->VERSION('0.08124') };
+
+  plan skip_all => 'Test does not properly work with the pre-0.082800 DBIC trials'
+    if DBIx::Class->VERSION =~ /^0.082700\d\d/;
+}
+
 use DBIx::Class::Storage::Debug::PrettyPrint;
 
 my $cap;