loncom/interface/lonparmset.pm - diff

Return to lonparmset.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.423, 2009/01/20 18:23:19	version 1.424, 2009/01/20 18:37:30
Line 1816 sub assessparms {	Line 1816 sub assessparms {
if (!$pssymb) {	if (!$pssymb) {
$r->print('<table border="1"><tr><td>');	$r->print('<table border="1"><tr><td>');
&levelmenu($r,\%alllevs,$parmlev);	&levelmenu($r,\%alllevs,$parmlev);
	$r->print('</td>');
if ($parmlev ne 'general') {	if ($parmlev ne 'general') {
$r->print('<td>');	$r->print('<td>');
&mapmenu($r,\%allmaps,$pschp,\%maptitles);	&mapmenu($r,\%allmaps,$pschp,\%maptitles);
$r->print('</td>');	$r->print('</td>');
}	}
$r->print('</td></tr></table>');	$r->print('</tr></table>');
&displaymenu($r,\%allparms,\%allparts,\@pscat,\@psprt,\%keyorder);	&displaymenu($r,\%allparms,\%allparts,\@pscat,\@psprt,\%keyorder);
} else {	} else {
my ($map,$id,$resource)=&Apache::lonnet::decode_symb($pssymb);	my ($map,$id,$resource)=&Apache::lonnet::decode_symb($pssymb);