[Koha-cvs] CVS: koha/authorities authorities-home.pl,1.8.2.1,1.8.2.2

[Paul POULAIN]

Update of /cvsroot/koha/koha/authorities
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15365/authorities

Modified Files:
      Tag: rel_2_2
        authorities-home.pl 
Log Message:
minor bugfix : link next & previous don't work if you search on mainentry.
It's due to cataloguesearch that replace mainentry by another value

Index: authorities-home.pl
===================================================================
RCS file: /cvsroot/koha/koha/authorities/authorities-home.pl,v
retrieving revision 1.8.2.1
retrieving revision 1.8.2.2
diff -C2 -r1.8.2.1 -r1.8.2.2
*** authorities-home.pl 28 Feb 2005 14:03:12 -0000      1.8.2.1
--- authorities-home.pl 31 May 2005 16:23:10 -0000      1.8.2.2
***************
*** 88,95 ****
        my @field_data = ();
  
! 
        for(my $i = 0 ; $i <= $#marclist ; $i++)
        {
!               push @field_data, { term => "marclist", val=>$marclist[$i] };
                push @field_data, { term => "and_or", val=>$and_or[$i] };
                push @field_data, { term => "excluding", val=>$excluding[$i] };
--- 88,96 ----
        my @field_data = ();
  
!       # we must get parameters once again. Because if there is a mainentry, 
it has been replaced by something else during the search, thus the links 
next/previous would not work anymore 
!       my @marclist_ini = $query->param('marclist');
        for(my $i = 0 ; $i <= $#marclist ; $i++)
        {
!               push @field_data, { term => "marclist", val=>$marclist_ini[$i] 
};
                push @field_data, { term => "and_or", val=>$and_or[$i] };
                push @field_data, { term => "excluding", val=>$excluding[$i] };