More test hackage, some cleanup in ResultSet
[dbsrgits/DBIx-Class.git] / t / run / 15limit.tl
index 8949158..eca720d 100644 (file)
@@ -7,7 +7,7 @@ BEGIN {
 }                                                                               
 
 # test LIMIT
-my $it = $schema->class("CD")->search( {},
+my $it = $schema->resultset("CD")->search( {},
     { rows => 3,
       order_by => 'title' }
 );
@@ -18,7 +18,7 @@ $it->next;
 is( $it->next, undef, "next past end of resultset ok" );
 
 # test OFFSET
-my @cds = $schema->class("CD")->search( {},
+my @cds = $schema->resultset("CD")->search( {},
     { rows => 2,
       offset => 2,
       order_by => 'year' }
@@ -26,7 +26,7 @@ my @cds = $schema->class("CD")->search( {},
 is( $cds[0]->title, "Spoonful of bees", "offset ok" );
 
 # test software-based limiting
-$it = $schema->class("CD")->search( {},
+$it = $schema->resultset("CD")->search( {},
     { rows => 3,
       software_limit => 1,
       order_by => 'title' }
@@ -37,7 +37,7 @@ $it->next;
 $it->next;
 is( $it->next, undef, "software next past end of resultset ok" );
 
-@cds = $schema->class("CD")->search( {},
+@cds = $schema->resultset("CD")->search( {},
     { rows => 2,
       offset => 2,
       software_limit => 1,
@@ -47,7 +47,7 @@ is( $cds[0]->title, "Spoonful of bees", "software offset ok" );
 
 # based on a failing criteria submitted by waswas
 # requires SQL::Abstract >= 1.20
-$it = $schema->class("CD")->search(
+$it = $schema->resultset("CD")->search(
     { title => [
         -and => 
             {