document remaining methods

[scpubgit/Q-Branch.git] / t / dbic / bulk-insert.t

diff --git a/t/dbic/bulk-insert.t b/t/dbic/bulk-insert.t
index 47f4660..488fde6 100644 (file)
--- a/t/dbic/bulk-insert.t
+++ b/t/dbic/bulk-insert.t
@@ -2,6 +2,16 @@ use strict;
 use warnings;
 
 use Test::More;
+
+BEGIN {
+  # ask for a recent DBIC version to skip the 5.6 testing 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;
@@ -19,7 +29,7 @@ $pp->debugfh($fh);
 $pp->query_start('INSERT INTO self_ref_alias (alias, self_ref) VALUES ( ?, ? )', qw('__BULK_INSERT__' '1'));
 is(
    $cap,
-   qq{INSERT INTO self_ref_alias (alias, self_ref) VALUES (?, ?) : '__BULK_INSERT__', '1'\n},
+   qq{INSERT INTO self_ref_alias( alias, self_ref ) VALUES( ?, ? ) : '__BULK_INSERT__', '1'\n},
    'SQL Logged'
 );