--- loncom/interface/lonsearchcat.pm 2001/03/15 19:53:24 1.33 +++ loncom/interface/lonsearchcat.pm 2001/03/15 20:11:18 1.34 @@ -471,7 +471,7 @@ sub basicsearch { $query="select * from metadata where concat($concatarg) like '\%$ENV{'form.basicexp'}\%'"; my $reply=&Apache::lonnet::metadata_query($query); - &output_results($r,$envhash,$reply); + &output_results($r,$envhash,$concatarg,$reply); return OK; } @@ -521,7 +521,7 @@ RESULTS # ----------------------------- format and output results based on a reply list sub output_results { - my ($r,$envhash,@replylist)=@_; + my ($r,$envhash,$testval,@replylist)=@_; my %ENV=%{$envhash}; foreach my $reply (@replylist) { @@ -628,6 +628,7 @@ SCRIPT

Search Catalog

+$testval