Bug 3663 screen changes to OPAC advanced search

[koha.git] / members / member.pl

diff --git a/members/member.pl b/members/member.pl
index 1d33191..13daa0d 100755 (executable)
--- a/members/member.pl
+++ b/members/member.pl
@@ -61,7 +61,7 @@ $template->param(
         "AddPatronLists_".C4::Context->preference("AddPatronLists")=> "1",
             );
 if (C4::Context->preference("AddPatronLists")=~/code/){
-    my $categories=GetBorrowercategory();
+    my $categories=GetBorrowercategoryList;
     $categories->[0]->{'first'}=1;
     $template->param(categories=>$categories);  
 }  
@@ -138,7 +138,7 @@ my $base_url =
 
 $template->param(
     paginationbar => pagination_bar(
-        $base_url,  int( $count / $resultsperpage ) + 1,
+        $base_url,  int( ($count - 1) / $resultsperpage ) + 1,
         $startfrom, 'startfrom'
     ),
     startfrom => $startfrom,