X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FCDBICompat%2FPager.pm;h=8d02dc7b9249de7f9ffc1ffcc2463db5a3aa5464;hb=cc3b77095de9f0e574b0ed32403f4299e6588f45;hp=a2099aa1d2003897c4461bad03c874bf7c90eb18;hpb=6aeb91850d436202eecee51d6c51c8e548961105;p=dbsrgits%2FDBIx-Class.git

diff --git a/lib/DBIx/Class/CDBICompat/Pager.pm b/lib/DBIx/Class/CDBICompat/Pager.pm
index a2099aa..8d02dc7 100644
--- a/lib/DBIx/Class/CDBICompat/Pager.pm
+++ b/lib/DBIx/Class/CDBICompat/Pager.pm
@@ -1,18 +1,19 @@
-package DBIx::Class::CDBICompat::Pager;
+package # hide from PAUSE
+    DBIx::Class::CDBICompat::Pager;
 
-use strict;
-use warnings FATAL => 'all';
+use strict;
+use warnings FATAL => 'all';
 
-*pager = \&page;
+*pager = \&page;
 
-sub page {
-  my $class = shift;
+sub page {
+  my $class = shift;
 
-  my $rs = $class->search(@_);
-  unless ($rs->{attrs}{page}) {
-    $rs = $rs->page(1);
-  }
-  return ( $rs->pager, $rs );
-}
+  my $rs = $class->search(@_);
+  unless ($rs->{attrs}{page}) {
+    $rs = $rs->page(1);
+  }
+  return ( $rs->pager, $rs );
+}
 
-1;
+1;