Update of /cvsroot/koha/koha/C4 In directory usw-pr-cvs1:/tmp/cvs-serv15057/C4 Modified Files: Search.pm Log Message: Making a "fix" to normal title search Index: Search.pm =================================================================== RCS file: /cvsroot/koha/koha/C4/Search.pm,v retrieving revision 1.13 retrieving revision 1.14 diff -C2 -r1.13 -r1.14 *** Search.pm 20 Feb 2002 20:53:29 -0000 1.13 --- Search.pm 20 Feb 2002 21:05:19 -0000 1.14 *************** *** 675,682 **** my $count=@key; my $i=1; ! $query="select * from biblio,bibliosubtitle,biblioitems where ! (biblio.biblionumber=bibliosubtitle.biblionumber and ! biblioitems.biblionumber=biblio.biblionumber) and (((title like '$key[0]%' or title like '% $key[0]%' or title like '% $key[0]')"; while ($i<$count){ --- 675,683 ---- my $count=@key; my $i=1; ! $query="select * from biblio,biblioitems ! left join bibliosubtitle on ! biblio.biblionumber=bibliosubtitle.biblionumber where ! biblioitems.biblionumber=biblio.biblionumber and (((title like '$key[0]%' or title like '% $key[0]%' or title like '% $key[0]')"; while ($i<$count){ *************** *** 796,800 **** } } ! #print $query; if ($type ne 'precise' && $type ne 'subject'){ if ($search->{'author'} ne ''){ --- 797,801 ---- } } ! print $query; if ($type ne 'precise' && $type ne 'subject'){ if ($search->{'author'} ne ''){