--- loncom/interface/lonsearchcat.pm	2001/03/15 19:22:09	1.24
+++ loncom/interface/lonsearchcat.pm	2001/03/15 19:23:10	1.25
@@ -435,7 +435,7 @@ sub basicsearch {
     my ($r,$envhash)=@_;
     my %ENV=%{$envhash};
 
-    unless (length($ENV{'form.basicexp'}) {
+    unless (length($ENV{'form.basicexp'})) {
 	&output_blank_field_error($r);
 	return OK;
     }