[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-devel] CVS: koha search.pl,1.1.1.1,1.2
From: |
Chris Cornack |
Subject: |
[Koha-devel] CVS: koha search.pl,1.1.1.1,1.2 |
Date: |
Sun, 11 Feb 2001 14:38:19 -0800 |
Update of /cvsroot/koha/koha
In directory usw-pr-cvs1:/tmp/cvs-serv32557
Modified Files:
search.pl
Log Message:
Changing the front page search of the intranet site to just be a keyword search
Index: search.pl
===================================================================
RCS file: /cvsroot/koha/koha/search.pl,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -C2 -r1.1.1.1 -r1.2
*** search.pl 2000/12/19 23:45:53 1.1.1.1
--- search.pl 2001/02/11 22:38:17 1.2
***************
*** 41,44 ****
--- 41,45 ----
$search{'keyword'}=$keyword;
$search{'front'}=validate($input->param('front'));
+
my $author=validate($input->param('author'));
$search{'author'}=$author;
***************
*** 86,90 ****
($count,@results)=&KeywordSearch(\$blah,'intra',\%search,$num,$offset);
} elsif ($search{'front'} ne '') {
! ($count,@results)&FrontSearch(\$blah,'intra',\%search,$num,$offset);
# print "hey";
}elsif ($title ne '' || $author ne '' || $dewey ne '' || $class ne '') {
--- 87,92 ----
($count,@results)=&KeywordSearch(\$blah,'intra',\%search,$num,$offset);
} elsif ($search{'front'} ne '') {
! $search{'keyword'}=$search{'front'};
! ($count,@results)&KeywordSearch(\$blah,'intra',\%search,$num,$offset);
# print "hey";
}elsif ($title ne '' || $author ne '' || $dewey ne '' || $class ne '') {
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-devel] CVS: koha search.pl,1.1.1.1,1.2,
Chris Cornack <=