|
version 1.58, 2001/03/21 03:37:43
|
version 1.59, 2001/03/21 03:40:39
|
|
Line 502 sub advancedsearch {
|
Line 502 sub advancedsearch {
|
| } |
} |
| } |
} |
| if ($ENV{'form.language'} and $ENV{'form.language'} ne 'any') { |
if ($ENV{'form.language'} and $ENV{'form.language'} ne 'any') { |
| push @queries,"language like $ENV{'form.language'}"; |
push @queries,"(language like \"\%$ENV{'form.language'}\%\")"; |
| } |
} |
| if ($ENV{'form.mime'} and $ENV{'form.mime'} ne 'any') { |
if ($ENV{'form.mime'} and $ENV{'form.mime'} ne 'any') { |
| push @queries,"mime like $ENV{'form.mime'}"; |
push @queries,"(mime like \"\%$ENV{'form.mime'}\%\")"; |
| } |
} |
| if ($ENV{'form.copyright'} and $ENV{'form.copyright'} ne 'any') { |
if ($ENV{'form.copyright'} and $ENV{'form.copyright'} ne 'any') { |
| push @queries,"copyright like $ENV{'form.copyright'}"; |
push @queries,"(copyright like \"\%$ENV{'form.copyright'}\%\")"; |
| } |
} |
| if (@queries) { |
if (@queries) { |
| $query=join(" AND ",@queries); |
$query=join(" AND ",@queries); |
![[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