gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fixed the subject search.

This commit is contained in:
wolfpac444 2003-02-21 02:25:03 +00:00
parent 6928584788
commit 4e3888e2ec
2 changed files with 8 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
C4/Search.pm
View File

@ -1001,20 +1001,14 @@ sub CatSearch {
}
}
if ($type eq 'subject'){
# FIXME - Subject search is badly broken. The query defined by
# $query returns a single item (the subject), but later code
# expects a ref-to-hash with all sorts of stuff in it.
# Also, the count of items (biblios?) with the given subject is
# wrong.
my @key=split(' ',$search->{'subject'});
my $count=@key;
my $i=1;
$query="select distinct(subject) from bibliosubject where( subject like
'$key[0]%' or subject like '% $key[0]%' or subject like '% $key[0]' or subject like '%($key[0])%')";
while ($i<$count){
$query.=" and (subject like '$key[$i]%' or subject like '% $key[$i]%'
or subject like '% $key[$i]'
$query="select * from bibliosubject, biblioitems where
(bibliosubject.biblionumber = biblioitems.biblionumber) and ( subject like
'$key[0]%' or subject like '% $key[0]%' or subject like '% $key[0]' or subject
like '%($key[0])%')"; while ($i<$count){ $query.=" and (subject like
'$key[$i]%' or subject like '% $key[$i]%' or subject like '% $key[$i]'
or subject like '%($key[$i])%')";
$i++;
}
@ -1180,7 +1174,7 @@ sub subsearch {
# print $query;
my @results;
while (my $data=$sth->fetchrow_hashref){
$results[$i]="$data->{'title'}\t$data->{'author'}\t$data->{'biblionumber'}";
push @results, $data;
$i++;
}
$sth->finish;

3
opac/opac-searchresults.pl
View File

@ -68,7 +68,8 @@ my $count;
my $startfrom = $query->param('startfrom');
my $subjectitems=$query->param('subjectitems');
if ($subjectitems) {
@results = subsearch($env,$subjectitems, $number_of_results, $startfrom);
#@results = subsearch($env,$subjectitems, $number_of_results, $startfrom);
@results = subsearch($enc, $subjectitems);
$count = $#results+1;
} else {
($count, @results) = catalogsearch($env,'',\%search,$number_of_results,$startfrom);