--- loncom/auth/lonroles.pm 2005/08/09 20:06:40 1.128 +++ loncom/auth/lonroles.pm 2005/09/16 19:47:42 1.129 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # User Roles Screen # -# $Id: lonroles.pm,v 1.128 2005/08/09 20:06:40 albertel Exp $ +# $Id: lonroles.pm,v 1.129 2005/09/16 19:47:42 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -596,7 +596,7 @@ ENDHEADER ''.&mt('Start').''.&mt('End').''. &mt('Remarks and Calendar Announcements').''."\n"); my $doheaders=-1; - foreach my $type ('Construction Space','Course','Domain','System') { + foreach my $type ('Domain','Construction Space','Course','System') { my $haverole=0; foreach my $which (sort {uc($a) cmp uc($b)} (keys(%sortrole))) { if ($roleclass{$sortrole{$which}} =~ /^\Q$type\E/) {