--- loncom/interface/lonsearchcat.pm 2001/03/15 21:38:52 1.38 +++ loncom/interface/lonsearchcat.pm 2001/03/15 21:42:05 1.39 @@ -437,6 +437,14 @@ sub advancedsearch { &output_blank_field_error($r); return OK; } + + my $query=''; +# my $concatarg=join('," ",', +# ('title', 'author', 'subject', 'notes', 'abstract')); + + $query="select * from metadata where concat(title) like '\%$ENV{'form.title'}\%'"; + my $reply=&Apache::lonnet::metadata_query($query); + &output_results($r,$envhash,$reply); return OK; } @@ -462,7 +470,7 @@ sub basicsearch { return OK; } - my $query=$ENV{'form.basicexp'}; + my $query=''; my $concatarg=join('," ",', ('title', 'author', 'subject', 'notes', 'abstract'));