|
version 1.176, 2007/08/17 18:14:37
|
version 1.177, 2007/08/17 21:33:19
|
|
Line 479 ENDHEADER
|
Line 479 ENDHEADER
|
| <input type="hidden" name="attrs" value="1" /> |
<input type="hidden" name="attrs" value="1" /> |
| <label> |
<label> |
| END |
END |
| $r->print(&Apache::loncommon::filecategoryselect('only',$typeselect)); |
my @file_categories = &Apache::loncommon::filecategories(); |
| |
my %select_file_categories; |
| |
my @select_form_order = (''); |
| |
$select_file_categories{''} = 'All file types'; |
| |
foreach my $cat(@file_categories) { |
| |
my $types = join ",",&Apache::loncommon::filecategorytypes($cat); |
| |
$select_file_categories{$types} = $cat; |
| |
push(@select_form_order,$types); |
| |
} |
| |
$select_file_categories{'select_form_order'} = [@select_form_order]; |
| |
$r->print(&Apache::loncommon::select_form($typeselect,'only', |
| |
%select_file_categories |
| |
)); |
| $r->print(<<END); |
$r->print(<<END); |
| File Type Displayed</label> |
File Type Displayed</label> |
| <br /> |
<br /> |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonindexer.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface