[Bast-commits] r6150 - in DBIx-Class/0.08/branches/count_distinct/t: count resultset

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2009-05-06 15:56:07 +0000 (Wed, 06 May 2009)
New Revision: 6150

Modified:
   DBIx-Class/0.08/branches/count_distinct/t/count/count_joined.t
   DBIx-Class/0.08/branches/count_distinct/t/resultset/as_query.t
Log:
TODOify sqla-dependent tests

Modified: DBIx-Class/0.08/branches/count_distinct/t/count/count_joined.t
===================================================================
--- DBIx-Class/0.08/branches/count_distinct/t/count/count_joined.t	2009-05-06 15:43:24 UTC (rev 6149)
+++ DBIx-Class/0.08/branches/count_distinct/t/count/count_joined.t	2009-05-06 15:56:07 UTC (rev 6150)
@@ -12,7 +12,7 @@
 my $schema = DBICTest->init_schema();
 
 TODO: {
-  local $TODO = 'TODO until we figure out what we really want';
+  local $TODO = 'Needs -paren fixes in SQLA before it can work';
   my $cds = $schema->resultset("CD")->search({ cdid => 1 }, { join => { cd_to_producer => 'producer' } });
   is($cds->count, 1, "extra joins do not explode single entity count");
 }

Modified: DBIx-Class/0.08/branches/count_distinct/t/resultset/as_query.t
===================================================================
--- DBIx-Class/0.08/branches/count_distinct/t/resultset/as_query.t	2009-05-06 15:43:24 UTC (rev 6149)
+++ DBIx-Class/0.08/branches/count_distinct/t/resultset/as_query.t	2009-05-06 15:56:07 UTC (rev 6150)
@@ -66,7 +66,8 @@
   );
 }
 
-{
+TODO: {
+    local $TODO = 'Needs -paren fixes in SQLA before it can work';
     my $rs = $schema->resultset("CD")->search(
         { 'artist.name' => 'Caterwauler McCrae' },
         { join => [qw/artist/]}