loncom/interface/lonindexer.pm - diff

Return to lonindexer.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.109, 2004/06/12 01:08:11	version 1.110, 2004/06/12 04:44:31
Line 1010 sub display_line {	Line 1010 sub display_line {
}	}
if ($hash{'display_attrs_10'} == 1) {	if ($hash{'display_attrs_10'} == 1) {
my $source = &Apache::lonnet::metadata($filelink,'sourceavail');	my $source = &Apache::lonnet::metadata($filelink,'sourceavail');
if($source eq 'open') {	if($source eq 'open') {
my $sourcelink = &Apache::lonsource::make_link($filelink);	my $sourcelink = &Apache::lonsource::make_link($filelink);
$r->print('<td>'."<a href=\"javascript:openWindow('".$sourcelink.	$r->print('<td>'."<a href=\"javascript:openWindow('".$sourcelink.
"', 'previewsource', '700', '700', 'no', 'yes','yes')\";".	"', 'previewsource', '700', '700', 'no', 'yes','yes')\";".
" TARGET=_self>Yes</a> "."</td>\n");	" TARGET=_self>Yes</a> "."</td>\n");
} else { #A cuddled else. :P	} else { #A cuddled else. :P
$r->print('<td>'."</td>\n");	$r->print('<td>'."</td>\n");
}	}
}	}
$r->print("</tr>\n");	$r->print("</tr>\n");
}	}