[Bast-commits] r6321 - DBIx-Class/0.08/trunk/t

[abraxxa at dev.catalyst.perl.org]

Author: abraxxa
Date: 2009-05-19 17:07:08 +0000 (Tue, 19 May 2009)
New Revision: 6321

Modified:
   DBIx-Class/0.08/trunk/t/67pager.t
Log:
added test for total_entries on a paged resultset


Modified: DBIx-Class/0.08/trunk/t/67pager.t
===================================================================
--- DBIx-Class/0.08/trunk/t/67pager.t	2009-05-19 16:11:00 UTC (rev 6320)
+++ DBIx-Class/0.08/trunk/t/67pager.t	2009-05-19 17:07:08 UTC (rev 6321)
@@ -21,6 +21,8 @@
 
 is( $it->count, 3, "count on paged rs ok" );
 
+is( $it->pager->total_entries, 5, "total_entries ok" );
+
 is( $it->next->title, "Caterwaulin' Blues", "iterator->next ok" );
 
 $it->next;