loncom/interface/lonindexer.pm - diff

Return to lonindexer.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.133, 2005/04/07 06:56:23	version 1.134, 2005/06/17 18:18:38
Line 970 sub display_line {	Line 970 sub display_line {
}	}
# Filetype icons	# Filetype icons
$r->print("<img src='$iconname' border='0' />\n");	$r->print("<img src='$iconname' border='0' />\n");
# Close form to open/close sequence
if ($filelink=~/\.(page\|sequence)$/) {
$r->print('</form>');
}
my $quotable_filelink = &Apache::loncommon::escape_single($filelink);	my $quotable_filelink = &Apache::loncommon::escape_single($filelink);


Line 984 sub display_line {	Line 980 sub display_line {
$r->print (" (<a href=\"javascript:openWindow('".$quotable_filelink.	$r->print (" (<a href=\"javascript:openWindow('".$quotable_filelink.
".meta', 'metadatafile', '500', '550', 'no', 'yes','no')\"; ".	".meta', 'metadatafile', '500', '550', 'no', 'yes','no')\"; ".
"TARGET=_self>metadata</a>) ");	"TARGET=_self>metadata</a>) ");
	# Close form to open/close sequence
	if ($filelink=~/\.(page\|sequence)$/) {
	$r->print('</form>');
	}
$r->print("</td>\n");	$r->print("</td>\n");
if ($hash{'display_attrs_0'} == 1) {	if ($hash{'display_attrs_0'} == 1) {
my $title = &Apache::lonnet::gettitle($filelink,'title');	my $title = &Apache::lonnet::gettitle($filelink,'title');