TODOify test until we get an AST

[dbsrgits/DBIx-Class.git] / t / prefetch / via_search_related.t

diff --git a/t/prefetch/via_search_related.t b/t/prefetch/via_search_related.t
index f07f1cd..f686e15 100644 (file)
--- a/t/prefetch/via_search_related.t
+++ b/t/prefetch/via_search_related.t
@@ -37,6 +37,7 @@ lives_ok ( sub {
 
 }, 'search_related prefetch with order_by works');
 
+TODO: { local $TODO = 'Unqualified columns in where clauses can not be fixed without an SQLA rewrite' if SQL::Abstract->VERSION < 2;
 lives_ok ( sub {
   my $no_prefetch = $schema->resultset('Track')->search_related(cd =>
     {
@@ -64,6 +65,7 @@ lives_ok ( sub {
   );
 
 }, 'search_related prefetch with condition referencing unqualified column of a joined table works');
+}
 
 
 lives_ok (sub {