loncom/interface/lonindexer.pm - diff

Return to lonindexer.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.134, 2005/06/17 18:18:38	version 1.135, 2005/06/17 20:15:51
Line 829 sub display_line {	Line 829 sub display_line {
$r->print ('<input src="'.$iconpath.'arrow_up.gif"');	$r->print ('<input src="'.$iconpath.'arrow_up.gif"');
$r->print (' name="'.$msg.'" height="22" type="image" border="0" />'.	$r->print (' name="'.$msg.'" height="22" type="image" border="0" />'.
"\n");	"\n");
$r->print(&mt("Up")."</form> $tabtag</tr>\n");	$r->print(&mt("Up")."</form>$tabtag</tr>\n");
return OK;	return OK;
}	}
# Do we have permission to look at this?	# Do we have permission to look at this?
Line 863 sub display_line {	Line 863 sub display_line {
$r->print("(".$Apache::lonnet::domaindescription{$listname}.	$r->print("(".$Apache::lonnet::domaindescription{$listname}.
")");	")");
}	}
$r->print ("</form> $tabtag</tr>\n");	$r->print ("</form>$tabtag</tr>\n");
return OK;	return OK;

# display user directory	# display user directory
Line 928 sub display_line {	Line 928 sub display_line {
$r->print("checked");	$r->print("checked");
}	}
$r->print(" />\n");	$r->print(" />\n");
$r->print("</form>\n");	$r->print("</form></td><td nowrap>");
$r->print("</td><td nowrap>");
$hash{"pre_${fnum}_link"}=$filelink;	$hash{"pre_${fnum}_link"}=$filelink;
$fnum++;	$fnum++;
}	}