I hate you all.

[dbsrgits/DBIx-Class.git] / lib / DBIx / Class / CDBICompat / Pager.pm

diff --git a/lib/DBIx/Class/CDBICompat/Pager.pm b/lib/DBIx/Class/CDBICompat/Pager.pm
index c4bc3a4..8d02dc7 100644 (file)
--- a/lib/DBIx/Class/CDBICompat/Pager.pm
+++ b/lib/DBIx/Class/CDBICompat/Pager.pm
@@ -10,7 +10,7 @@ sub page {
   my $class = shift;
 \r
   my $rs = $class->search(@_);
-  unless ($rs->{page}) {
+  unless ($rs->{attrs}{page}) {
     $rs = $rs->page(1);
   }
   return ( $rs->pager, $rs );