loncom/interface/lonindexer.pm - diff

Return to lonindexer.pm CVS log

Up to [LON-CAPA] / loncom / interface

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++;
}	}