--- loncom/interface/lonhelper.pm 2005/07/07 04:12:01 1.105 +++ loncom/interface/lonhelper.pm 2005/07/07 04:16:01 1.106 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # .helper XML handler to implement the LON-CAPA helper # -# $Id: lonhelper.pm,v 1.105 2005/07/07 04:12:01 albertel Exp $ +# $Id: lonhelper.pm,v 1.106 2005/07/07 04:16:01 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3400,8 +3400,8 @@ sub render { my $classlist = Apache::loncoursedata::get_classlist(); my $username = $vars->{USER_NAME}; # Chop off everything after the last colon (section) - $username = substr($username, 0, rindex($username, ':')); - my $name = $classlist->{$username}->[6]; + my ($uname,$udom)=split(':',$username); + my $name = $classlist->{$uname.':'.$udom}->[6]; $result .= '
  • '.&mt('for [_1]',"$name").'
  • '; my ($uname, $udom) = split /:/, $vars->{USER_NAME}; $result .= "