[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] };