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 /> |