loncom/interface/lonindexer.pm - diff

Return to lonindexer.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonindexer.pm between versions 1.181 and 1.181.2.1

version 1.181, 2008/08/01 14:53:42	version 1.181.2.1, 2008/12/13 15:33:04
Line 542 END	Line 542 END
$r->print("<td $colspan><b>".&mt('Name')."</b></td>\n");	$r->print("<td $colspan><b>".&mt('Name')."</b></td>\n");
$r->print("<td><b>".&mt('Title')."</b></td>\n")	$r->print("<td><b>".&mt('Title')."</b></td>\n")
if ($hash{'display_attrs_0'} == 1);	if ($hash{'display_attrs_0'} == 1);
$r->print("<td align=right><b>".&mt("Size")." (".&mt("bytes").") ".	$r->print("<td align="right"><b>".&mt("Size")." (".&mt("bytes").") ".
"</b></td>\n") if ($hash{'display_attrs_1'} == 1);	"</b></td>\n") if ($hash{'display_attrs_1'} == 1);
$r->print("<td><b>".&mt("Last accessed")."</b></td>\n")	$r->print("<td><b>".&mt("Last accessed")."</b></td>\n")
if ($hash{'display_attrs_2'} == 1);	if ($hash{'display_attrs_2'} == 1);
Line 944 sub display_line {	Line 944 sub display_line {
}	}
# Set the icon for the file	# Set the icon for the file
my $iconname = &Apache::loncommon::icon($listname);	my $iconname = &Apache::loncommon::icon($listname);
$r->print("<tr valign='$valign' bgcolor=\"$fileclr\"><td nowrap='nowrap' valign='top'>");	$r->print('<tr valign="'.$valign.'" bgcolor="'.$fileclr.'">'.
	'<td valign="top"><span class="LC_nobreak">');

if ($env{'form.catalogmode'} eq 'interactive') {	if ($env{'form.catalogmode'} eq 'interactive') {
my $quotable_filelink = &Apache::loncommon::escape_single($filelink);	my $quotable_filelink = &Apache::loncommon::escape_single($filelink);
Line 952 sub display_line {	Line 953 sub display_line {
$quotable_filelink,"')\">");	$quotable_filelink,"')\">");
$r->print("<img alt=\"\" src='",$iconpath,"select.gif' class='LC_icon' /></a>".	$r->print("<img alt=\"\" src='",$iconpath,"select.gif' class='LC_icon' /></a>".
"\n");	"\n");
$r->print("</td><td nowrap='nowrap' valign='top'>");	$r->print('</span></td><td valign="top"><span class="LC_nobreak">');
} elsif ($env{'form.catalogmode'} eq 'import') {	} elsif ($env{'form.catalogmode'} eq 'import') {
$r->print("<form name='form$fnum' action=''>\n");	$r->print("<form name='form$fnum' action=''>\n");
$r->print("<input type='checkbox' name='filelink"."' ".	$r->print("<input type='checkbox' name='filelink"."' ".
Line 962 sub display_line {	Line 963 sub display_line {
$r->print("checked");	$r->print("checked");
}	}
$r->print(" />\n");	$r->print(" />\n");
$r->print("</form></td><td nowrap='nowrap' valign='top'>");	$r->print('</form></span></td><td valign="top"><span class="LC_nobreak">');
$hash{"pre_${fnum}_link"}=$filelink;	$hash{"pre_${fnum}_link"}=$filelink;
$hash{"pre_${fnum}_title"}=$title;	$hash{"pre_${fnum}_title"}=$title;
if (!$hash{"pre_${fnum}_title"}) {	if (!$hash{"pre_${fnum}_title"}) {
Line 1019 sub display_line {	Line 1020 sub display_line {
if ($filelink=~/\.(page\|sequence)$/) {	if ($filelink=~/\.(page\|sequence)$/) {
$r->print('</form>');	$r->print('</form>');
}	}
$r->print("</td>\n");	$r->print("</span></td>\n");
if ($hash{'display_attrs_0'} == 1) {	if ($hash{'display_attrs_0'} == 1) {
$r->print('<td> '.($title eq '' ? ' ' : $title).	$r->print('<td> '.($title eq '' ? ' ' : $title).
' </td>'."\n");	' </td>'."\n");
}	}
$r->print('<td align=right> ',	$r->print('<td align="right"> ',
$filecom[8]," </td>\n")	$filecom[8]," </td>\n")
if $hash{'display_attrs_1'} == 1;	if $hash{'display_attrs_1'} == 1;
$r->print('<td> '.	$r->print('<td> '.
Line 1149 sub display_line {	Line 1150 sub display_line {
$r->print('<td> '.($title eq '' ? ' ' : $title).	$r->print('<td> '.($title eq '' ? ' ' : $title).
' </td>'."\n");	' </td>'."\n");
}	}
$r->print('<td align=right> ',	$r->print('<td align="right"> ',
$filecom[8]," </td>\n")	$filecom[8]," </td>\n")
if $hash{'display_attrs_1'} == 1;	if $hash{'display_attrs_1'} == 1;
$r->print('<td> '.	$r->print('<td> '.

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.181
changed lines
	Added in v.1.181.2.1