Browse Source

Changing the front page search of the intranet site to just be a keyword search

3.0.x
rangi 24 years ago
parent
commit
17ab6b0b68
  1. 4
      search.pl

4
search.pl

@ -40,6 +40,7 @@ $search{'title'}=$title;
my $keyword=validate($input->param('keyword')); my $keyword=validate($input->param('keyword'));
$search{'keyword'}=$keyword; $search{'keyword'}=$keyword;
$search{'front'}=validate($input->param('front')); $search{'front'}=validate($input->param('front'));
my $author=validate($input->param('author')); my $author=validate($input->param('author'));
$search{'author'}=$author; $search{'author'}=$author;
my $subject=validate($input->param('subject')); my $subject=validate($input->param('subject'));
@ -85,7 +86,8 @@ if ($itemnumber ne '' || $isbn ne ''){
# print "hey"; # print "hey";
($count,@results)=&KeywordSearch(\$blah,'intra',\%search,$num,$offset); ($count,@results)=&KeywordSearch(\$blah,'intra',\%search,$num,$offset);
} elsif ($search{'front'} ne '') { } elsif ($search{'front'} ne '') {
($count,@results)&FrontSearch(\$blah,'intra',\%search,$num,$offset); $search{'keyword'}=$search{'front'};
($count,@results)&KeywordSearch(\$blah,'intra',\%search,$num,$offset);
# print "hey"; # print "hey";
}elsif ($title ne '' || $author ne '' || $dewey ne '' || $class ne '') { }elsif ($title ne '' || $author ne '' || $dewey ne '' || $class ne '') {
($count,@results)=&CatSearch(\$blah,'loose',\%search,$num,$offset); ($count,@results)=&CatSearch(\$blah,'loose',\%search,$num,$offset);

Loading…
Cancel
Save