version 1.181.4.4, 2010/01/28 00:01:13
|
version 1.181.6.1, 2009/12/02 17:46:46
|
Line 503 END
|
Line 503 END
|
$select_file_categories{''} = &mt('All file types'); |
$select_file_categories{''} = &mt('All file types'); |
foreach my $cat (@file_categories) { |
foreach my $cat (@file_categories) { |
my $types = join(",",&Apache::loncommon::filecategorytypes($cat)); |
my $types = join(",",&Apache::loncommon::filecategorytypes($cat)); |
$select_file_categories{$types} = &mt($cat); |
$select_file_categories{$types} = $cat; |
push(@select_form_order,$types); |
push(@select_form_order,$types); |
} |
} |
$select_file_categories{'select_form_order'} = \@select_form_order; |
$select_file_categories{'select_form_order'} = \@select_form_order; |
my $type_element= |
my $type_element= |
&Apache::loncommon::select_form( |
&Apache::loncommon::select_form($typeselect,'only', |
$typeselect, |
%select_file_categories); |
'only', |
|
%select_file_categories); |
|
$type_element = '<label>'.&mt('File Type Displayed: [_1]', |
$type_element = '<label>'.&mt('File Type Displayed: [_1]', |
$type_element).'</label>'; |
$type_element).'</label>'; |
$r->print($type_element |
$r->print($type_element |
Line 897 sub display_line {
|
Line 895 sub display_line {
|
} |
} |
# Do we have permission to look at this? |
# Do we have permission to look at this? |
|
|
if($filecom[15] ne '1') { return OK if ((!&Apache::lonnet::allowed('bre',$pathprefix.$filecom[0])) && (!&Apache::lonnet::allowed('bro',$pathprefix.$filecom[0]))); } |
if($filecom[15] ne '1') { return OK if (!&Apache::lonnet::allowed('bre',$pathprefix.$filecom[0])); } |
|
|
# make absolute links appear on different background |
# make absolute links appear on different background |
if ($absolute) { $fileclr='#ccdd99'; } |
if ($absolute) { $fileclr='#ccdd99'; } |