loncom/auth/lonroles.pm - diff

Return to lonroles.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.62, 2003/06/24 15:52:32	version 1.63, 2003/07/05 10:07:11
Line 306 ENDHEADER	Line 306 ENDHEADER
$r->print('<input type=hidden name=orgurl value="'.$fn.'">');	$r->print('<input type=hidden name=orgurl value="'.$fn.'">');
$r->print('<input type=hidden name=selectrole value=1>');	$r->print('<input type=hidden name=selectrole value=1>');
}	}
$r->print('<br>Show all roles: <input type=checkbox name=showall');	if ($ENV{'user.adv'}) {
if ($ENV{'form.showall'}) { $r->print(' checked'); }	$r->print(
$r->print('><input type=submit value="Display"><br>');	'<br />Show all roles: <input type="checkbox" name="showall"');
	if ($ENV{'form.showall'}) { $r->print(' checked'); }
	$r->print('><input type=submit value="Display">');
	}
# ----------------------------------------------------------------------- Table	# ----------------------------------------------------------------------- Table
$r->print('<table><tr>');	$r->print('<br /><table><tr>');
unless ($nochoose) { $r->print('<th> </th>'); }	unless ($nochoose) { $r->print('<th> </th>'); }
$r->print('<th>User Role</th><th colspan=2>Extent</th>'.	$r->print('<th>User Role</th><th colspan=2>Extent</th>'.
'<th>Start</th><th>End</th><th>Remark</th></tr>'."\n");	'<th>Start</th><th>End</th><th>Remark</th></tr>'."\n");