--- loncom/interface/lonuserutils.pm 2010/03/24 03:09:41 1.97.2.16 +++ loncom/interface/lonuserutils.pm 2010/08/20 20:28:21 1.97.2.18 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Utility functions for managing LON-CAPA user accounts # -# $Id: lonuserutils.pm,v 1.97.2.16 2010/03/24 03:09:41 raeburn Exp $ +# $Id: lonuserutils.pm,v 1.97.2.18 2010/08/20 20:28:21 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -4389,7 +4389,6 @@ sub update_user_list { my ($r,$context,$setting,$choice,$crstype) = @_; my $now = time; my $count=0; - my $crstype; if ($context eq 'course') { $crstype = &Apache::loncommon::course_type(); } @@ -4678,12 +4677,12 @@ sub update_user_list { } } elsif ($choice eq 'chgdates') { $r->print(&mt("$result_text{'ok'}{$choice} role of '[_1]' in [_2] for '[_3]' - [_4]",$plrole,$extent, - ''.&Apache::loncommon::plainname($uname.':'.$udom).'', + ''.&Apache::loncommon::plainname($uname,$udom).'', $dates).'
'); $count ++; } else { $r->print(&mt("$result_text{'ok'}{$choice} role of '[_1]' in [_2] for '[_3]'.",$plrole,$extent, - ''.&Apache::loncommon::plainname($uname.':'.$udom).''). + ''.&Apache::loncommon::plainname($uname,$udom).''). '
'); $count ++; } @@ -4691,7 +4690,7 @@ sub update_user_list { $r->print( &mt("Error $result_text{'error'}{$choice} [_1] in [_2] for '[_3]': [_4].", $plrole,$extent, - ''.&Apache::loncommon::plainname($uname.':'.$udom).'', + ''.&Apache::loncommon::plainname($uname,$udom).'', $result).'
'); } }