Update of /cvsroot/koha/koha/C4 In directory usw-pr-cvs1:/tmp/cvs-serv10044/C4 Modified Files: Search.pm Log Message: Fixing error in keyword search (fixing my mistake from yesterday) Index: Search.pm =================================================================== RCS file: /cvsroot/koha/koha/C4/Search.pm,v retrieving revision 1.9 retrieving revision 1.10 diff -C2 -r1.9 -r1.10 *** Search.pm 2001/11/26 04:33:42 1.9 --- Search.pm 2001/11/27 02:01:39 1.10 *************** *** 302,306 **** } $query=$query."))"; ! if ($search->{'class'} ne ''){ my @temp=split(/\|/,$search->{'class'}); my $count=@temp; --- 302,306 ---- } $query=$query."))"; ! if ($search->{'class'} ne ''){ my @temp=split(/\|/,$search->{'class'}); my $count=@temp; *************** *** 308,313 **** for (my $i=1;$i<$count;$i++){ $query.=" or itemtype='$temp[$i]'"; ! } ! $query.=")"; } $query.="group by biblio.biblionumber order by author,title"; --- 308,313 ---- for (my $i=1;$i<$count;$i++){ $query.=" or itemtype='$temp[$i]'"; ! } ! $query.=")"; } $query.="group by biblio.biblionumber order by author,title"; *************** *** 335,340 **** while (my $data=$sth->fetchrow_hashref){ $query="Select * from biblio,biblioitems where ! biblio.biblionumber=$data->{'biblionumber'} and biblio.biblionumber=biblioitems.biblionumber ! group by biblio.biblionumber"; if ($search->{'class'} ne ''){ my @temp=split(/\|/,$search->{'class'}); --- 335,340 ---- while (my $data=$sth->fetchrow_hashref){ $query="Select * from biblio,biblioitems where ! biblio.biblionumber=$data->{'biblionumber'} and ! biblio.biblionumber=biblioitems.biblionumber "; if ($search->{'class'} ne ''){ my @temp=split(/\|/,$search->{'class'});