loncom/interface/lonindexer.pm - diff

Return to lonindexer.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.149, 2006/07/21 08:25:25	version 1.150, 2006/07/28 19:16:08
Line 1163 sub coursecontext {	Line 1163 sub coursecontext {

sub showpreview {	sub showpreview {
my ($filelink)=@_;	my ($filelink)=@_;
	if ($filelink=~/^(\/ext\/\|http\:\/\/)/) {
	return &mt('External Resource, preview not enabled');
	}
my ($curfext)=($filelink=~/\.(\w+)$/);	my ($curfext)=($filelink=~/\.(\w+)$/);
my $output='';	my $output='';
my $embstyle=&Apache::loncommon::fileembstyle($curfext);	my $embstyle=&Apache::loncommon::fileembstyle($curfext);