* change search_literal to use \[] when passing into search (help with binding order)

[dbsrgits/DBIx-Class.git] / t / 47bind_attribute.t

diff --git a/t/47bind_attribute.t b/t/47bind_attribute.t
index 8f66f6c..3bc1935 100644 (file)
--- a/t/47bind_attribute.t
+++ b/t/47bind_attribute.t
@@ -73,6 +73,10 @@ $rs = $schema->resultset('Complex')->search({}, { bind => [ 1999 ] })
 is ( $rs->count, 1, '...cookbook (bind first) + chained search' );
 
 TODO: {
+    # not sure what causes an uninit warning here, please remove when the TODO starts to pass,
+    # so the real reason for the warning can be found and fixed
+    local $SIG{__WARN__} = sub { warn @_ unless $_[0] =~ /uninitialized/ };
+
     local $TODO = 'bind args order needs fixing (semifor)';
     $rs = $schema->resultset('Complex')->search({}, { bind => [ 1999 ] })
         ->search({ 'artistid' => 1 }, {