loncom/auth/lonroles.pm - diff

Return to lonroles.pm CVS log

Up to [LON-CAPA] / loncom / auth

version 1.128, 2005/08/09 20:06:40	version 1.129, 2005/09/16 19:47:42
Line 596 ENDHEADER	Line 596 ENDHEADER
'</th><th>'.&mt('Start').'</th><th>'.&mt('End').'</th><th>'.	'</th><th>'.&mt('Start').'</th><th>'.&mt('End').'</th><th>'.
&mt('Remarks and Calendar Announcements').'</th></tr>'."\n");	&mt('Remarks and Calendar Announcements').'</th></tr>'."\n");
my $doheaders=-1;	my $doheaders=-1;
foreach my $type ('Construction Space','Course','Domain','System') {	foreach my $type ('Domain','Construction Space','Course','System') {
my $haverole=0;	my $haverole=0;
foreach my $which (sort {uc($a) cmp uc($b)} (keys(%sortrole))) {	foreach my $which (sort {uc($a) cmp uc($b)} (keys(%sortrole))) {
if ($roleclass{$sortrole{$which}} =~ /^\Q$type\E/) {	if ($roleclass{$sortrole{$which}} =~ /^\Q$type\E/) {