![[BACK]](/icons/back.gif){kind=icon}
Return to lonsearchcat.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to lonsearchcat.pm CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.24, 2001/03/15 19:22:09 | version 1.25, 2001/03/15 19:23:10 |
|---|---|
| Line 435 sub basicsearch { | Line 435 sub basicsearch { |
| my ($r,$envhash)=@_; | my ($r,$envhash)=@_; |
| my %ENV=%{$envhash}; | my %ENV=%{$envhash}; |
| unless (length($ENV{'form.basicexp'}) { | unless (length($ENV{'form.basicexp'})) { |
| &output_blank_field_error($r); | &output_blank_field_error($r); |
| return OK; | return OK; |
| } | } |