--- loncom/auth/lonroles.pm 2004/07/21 20:25:10 1.96 +++ loncom/auth/lonroles.pm 2004/09/02 13:15:54 1.99 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # User Roles Screen # -# $Id: lonroles.pm,v 1.96 2004/07/21 20:25:10 albertel Exp $ +# $Id: lonroles.pm,v 1.99 2004/09/02 13:15:54 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -84,7 +84,6 @@ sub handler { # ================================================================== Roles Init - if ($ENV{'form.selectrole'}) { if ($ENV{'request.course.id'}) { my %temp=('logout_'.$ENV{'request.course.id'} => time); @@ -461,7 +460,7 @@ ENDHEADER $Apache::lonnet::hostname{$home}. '/adm/login?domain='.$ENV{'user.domain'}. '&username='.$ENV{'user.name'}. - '&firsturl=/priv/'.$trest); + '&firsturl=/priv/'.$trest.'/'); } #next if ($home eq 'no_host'); $home = $Apache::lonnet::hostname{$home}; @@ -485,7 +484,7 @@ ENDHEADER $Apache::lonnet::hostname{$home}. '/adm/login?domain='.$ENV{'user.domain'}. '&username='.$ENV{'user.name'}. - '&firsturl=/priv/'.$ENV{'user.name'}); + '&firsturl=/priv/'.$ENV{'user.name'}.'/'); } #next if ($home eq 'no_host'); $home = $Apache::lonnet::hostname{$home}; @@ -606,7 +605,7 @@ ENDHEADER unless ($nochoose) { $r->print(' '); } $r->print(''.&mt('User Role').''.&mt('Extent'). ''.&mt('Start').''.&mt('End').''. - &mt('Remark').''."\n"); + &mt('Remarks and Calendar Announcements').''."\n"); my $doheaders=-1; foreach my $type ('Construction Space','Course','Domain','System') { my $haverole=0;