version 1.166, 2007/06/29 19:21:15
|
version 1.167, 2007/06/29 22:42:17
|
Line 921 sub display_line {
|
Line 921 sub display_line {
|
my $title; |
my $title; |
my $filelink = $pathprefix.$filecom[0]; |
my $filelink = $pathprefix.$filecom[0]; |
if ($hash{'display_attrs_0'} == 1) { |
if ($hash{'display_attrs_0'} == 1) { |
my $title = &Apache::lonnet::gettitle($filelink,'title'); |
$title = &Apache::lonnet::gettitle($filelink,'title'); |
} |
} |
my @file_ext = split (/\./,$listname); |
my @file_ext = split (/\./,$listname); |
my $curfext = $file_ext[-1]; |
my $curfext = $file_ext[-1]; |
Line 957 sub display_line {
|
Line 957 sub display_line {
|
$hash{"pre_${fnum}_link"}=$filelink; |
$hash{"pre_${fnum}_link"}=$filelink; |
$hash{"pre_${fnum}_title"}=$title; |
$hash{"pre_${fnum}_title"}=$title; |
if (!$hash{"pre_${fnum}_title"}) { |
if (!$hash{"pre_${fnum}_title"}) { |
$hash{"pre_${fnum}_title"} = 'Untitled'; |
$hash{"pre_${fnum}_title"} = 'Not_retrieved'; |
} |
} |
$fnum++; |
$fnum++; |
} |
} |