loncom/interface/lonindexer.pm - diff

Return to lonindexer.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.56, 2003/01/15 23:58:58	version 1.57, 2003/01/20 16:41:13
Line 838 sub display_line {	Line 838 sub display_line {
}	}
if ($hash{'display_attrs_8'} == 1) {	if ($hash{'display_attrs_8'} == 1) {
my $output='';	my $output='';
if (&Apache::loncommon::fileembstyle($curfext) eq 'ssi') {	my $embstyle=&Apache::loncommon::fileembstyle($curfext);
	if ($embstyle eq 'ssi') {
$output=&Apache::lonnet::ssi($filelink);	$output=&Apache::lonnet::ssi($filelink);
$output=~s/^.\<body[^\>]\>//si;	$output=~s/^.\<body[^\>]\>//si;
$output=~s/\<\/body\s\>.$//si;	$output=~s/\<\/body\s\>.$//si;
$output='<font size="-2">'.$output.'</font>';	$output='<font size="-2">'.$output.'</font>';
}	} elsif ($embstyle eq 'img') {
	$output='<img src="'.$filelink.'" />';
	}
$r->print('<td valign=bottom> '.($output eq '' ? ' ':$output).	$r->print('<td valign=bottom> '.($output eq '' ? ' ':$output).
" </td>\n");	" </td>\n");
}	}