version 1.94, 2001/04/13 18:09:15
|
version 1.95, 2001/04/16 17:11:57
|
Line 658 sub basicsearch {
|
Line 658 sub basicsearch {
|
my $query=''; |
my $query=''; |
my $concatarg=join('," ",', |
my $concatarg=join('," ",', |
('title', 'author', 'subject', 'notes', 'abstract')); |
('title', 'author', 'subject', 'notes', 'abstract')); |
# $query='select * from metadata where concat(' . $concatarg . ') like "%' . |
$concatarg='title' if $ENV{'form.titleonly'}; |
# $ENV{'form.basicexp'} . '%"'; |
|
|
|
$query=&build_SQL_query('concat('.$concatarg.')',$ENV{'form.'.'basicexp'}); |
$query=&build_SQL_query('concat('.$concatarg.')',$ENV{'form.'.'basicexp'}); |
|
|