loncom/interface/lonindexer.pm - diff

Return to lonindexer.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.156, 2007/01/16 21:20:57	version 1.158, 2007/03/08 01:58:45
Line 856 sub display_line {	Line 856 sub display_line {
'\')"><img alt="" src="'.$iconpath.'server.gif"');	'\')"><img alt="" src="'.$iconpath.'server.gif"');
$r->print (' border="0" /></a>'."\n");	$r->print (' border="0" /></a>'."\n");
$r->print (&mt("Domain")." - $listname ");	$r->print (&mt("Domain")." - $listname ");
if ($Apache::lonnet::domaindescription{$listname}) {	if (&Apache::lonnet::domain($listname,'description')) {
$r->print("(".$Apache::lonnet::domaindescription{$listname}.	$r->print("(".&Apache::lonnet::domain($listname,'description').
")");	")");
}	}
$r->print ("</form>$tabtag</tr>\n");	$r->print ("</form>$tabtag</tr>\n");
Line 1203 sub showpreview {	Line 1203 sub showpreview {
$output='<img alt="'.&mt('Preview').'" src="'.$filelink.'" />';	$output='<img alt="'.&mt('Preview').'" src="'.$filelink.'" />';
} elsif ($filelink=~m{^/res/($match_domain)/($match_username)/}) {	} elsif ($filelink=~m{^/res/($match_domain)/($match_username)/}) {
$output='<img alt="'.&mt('Preview').'" src="http://'.	$output='<img alt="'.&mt('Preview').'" src="http://'.
$Apache::lonnet::hostname{&Apache::lonnet::homeserver($2,$1)}.	&Apache::lonnet::hostname(&Apache::lonnet::homeserver($2,$1)).
'/cgi-bin/thumbnail.gif?url='.$filelink.'" />';	'/cgi-bin/thumbnail.gif?url='.$filelink.'" />';
}	}
return $output;	return $output;