[Koha-cvs] CVS: koha/admin authorised_values.pl,1.10,1.11 marctagstructure.pl,1.16,1.17

[Paul POULAIN]

Update of /cvsroot/koha/koha/admin
In directory sc8-pr-cvs1:/tmp/cvs-serv22352/admin

Modified Files:
        authorised_values.pl marctagstructure.pl 
Log Message:
fix for #577

Index: authorised_values.pl
===================================================================
RCS file: /cvsroot/koha/koha/admin/authorised_values.pl,v
retrieving revision 1.10
retrieving revision 1.11
diff -C2 -r1.10 -r1.11
*** authorised_values.pl        24 Jun 2003 10:26:17 -0000      1.10
--- authorised_values.pl        21 Oct 2003 15:47:07 -0000      1.11
***************
*** 66,70 ****
                             debug => 1,
                             });
! my $pagesize=20;
  my $op = $input->param('op');
  
--- 66,70 ----
                             debug => 1,
                             });
! my $pagesize=5;
  my $op = $input->param('op');
  
***************
*** 188,198 ****
        if ($offset>0) {
                my $prevpage = $offset-$pagesize;
!               $template->param(previous => "<a 
href=\"$script_name?offset=$prevpage&searchfield=$searchfield\">");
        }
        if ($offset+$pagesize<$count) {
                my $nextpage =$offset+$pagesize;
!               $template->param(next => "<a 
href=\"$script_name?offset=$nextpage&searchfield=$searchfield\">");
! 
! 
        }
  } #---- END $OP eq DEFAULT
--- 188,203 ----
        if ($offset>0) {
                my $prevpage = $offset-$pagesize;
!               $template->param(isprevpage => $offset,
!                                               prevpage=> $prevpage,
!                                               searchfield => $searchfield,
!                                               script_name => $script_name,
!                );
        }
        if ($offset+$pagesize<$count) {
                my $nextpage =$offset+$pagesize;
!               $template->param(nextpage =>$nextpage,
!                                               searchfield => $searchfield,
!                                               script_name => $script_name,
!               );
        }
  } #---- END $OP eq DEFAULT

Index: marctagstructure.pl
===================================================================
RCS file: /cvsroot/koha/koha/admin/marctagstructure.pl,v
retrieving revision 1.16
retrieving revision 1.17
diff -C2 -r1.16 -r1.17
*** marctagstructure.pl 1 Aug 2003 14:23:52 -0000       1.16
--- marctagstructure.pl 21 Oct 2003 15:47:07 -0000      1.17
***************
*** 193,201 ****
        if ($offset>0) {
                my $prevpage = $offset-$pagesize;
!               $template->param(previous => "<a 
href=\"$script_name?offset=".$prevpage.'">');
        }
        if ($offset+$pagesize<$count) {
                my $nextpage =$offset+$pagesize;
!               $template->param(next => "<a 
href=\"$script_name?offset=".$nextpage.'">');
        }
  } #---- END $OP eq DEFAULT
--- 193,208 ----
        if ($offset>0) {
                my $prevpage = $offset-$pagesize;
!               $template->param(isprevpage => $offset,
!                                               prevpage=> $prevpage,
!                                               searchfield => $searchfield,
!                                               script_name => $script_name,
!                );
        }
        if ($offset+$pagesize<$count) {
                my $nextpage =$offset+$pagesize;
!               $template->param(nextpage =>$nextpage,
!                                               searchfield => $searchfield,
!                                               script_name => $script_name,
!               );
        }
  } #---- END $OP eq DEFAULT