X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FCDBICompat%2FPager.pm;fp=lib%2FDBIx%2FClass%2FCDBICompat%2FPager.pm;h=7316d9d110666cf5bff476a141faf097ca77fd5e;hb=51ec03826afb5b20a686a7303bc55c42f4715945;hp=c8f76feee0349b906569d16b94ef0ffbe41d5c0c;hpb=5e0eea3522876a30453af24097507198bbbc9409;p=dbsrgits%2FDBIx-Class.git

diff --git a/lib/DBIx/Class/CDBICompat/Pager.pm b/lib/DBIx/Class/CDBICompat/Pager.pm
index c8f76fe..7316d9d 100644
--- a/lib/DBIx/Class/CDBICompat/Pager.pm
+++ b/lib/DBIx/Class/CDBICompat/Pager.pm
@@ -10,7 +10,7 @@ use warnings FATAL => 'all';
 
 use base 'DBIx::Class';
 
-*pager = \&page;
+sub pager { shift->page(@_) }
 
 sub page {
   my $class = shift;