--- loncom/interface/lonsearchcat.pm	2001/03/15 20:47:04	1.35
+++ loncom/interface/lonsearchcat.pm	2001/03/15 20:58:03	1.36
@@ -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,$query,$reply);
+    &output_results($r,$envhash,$reply);
     return OK;
 }
 
@@ -521,7 +521,7 @@ RESULTS
 
 # ----------------------------- format and output results based on a reply list
 sub output_results {
-    my ($r,$envhash,$testval,@replylist)=@_;
+    my ($r,$envhash,@replylist)=@_;
     my %ENV=%{$envhash};
     foreach my $reply (@replylist) {