[Koha-cvs] CVS: koha/authorities auth_finder.pl,1.8,1.9

[Paul POULAIN]

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

Modified Files:
        auth_finder.pl 
Log Message:
synch'ing 2.2 and head

Index: auth_finder.pl
===================================================================
RCS file: /cvsroot/koha/koha/authorities/auth_finder.pl,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -r1.8 -r1.9
*** auth_finder.pl      17 May 2005 14:54:16 -0000      1.8
--- auth_finder.pl      4 Aug 2005 12:13:35 -0000       1.9
***************
*** 93,98 ****
  
  
        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] };
--- 93,99 ----
  
  
+       my @marclist_ini = $query->param('marclist'); # get marclist again, as 
the previous one has been modified by catalogsearch (mainentry replaced by 
field name
        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] };
***************
*** 158,162 ****
  $template->param(authtypesloop => address@hidden,
                                authtypecode => $authtypecode);
- #warn "CAT : $authtypecode";
  
  # Print the page
--- 159,162 ----