[LON-CAPA-cvs] cvs: loncom /interface lonwhatsnew.pm

[raeburn]

raeburn		Sun Nov  3 18:58:05 2013 EDT

  Modified files:              
    /loncom/interface	lonwhatsnew.pm 
  Log:
  - Correction to rev. 1.114 when retrieving students' fullnames from classlist
    to use in role additions, role expirations, or last login.
  - Remove a trailing space.
  
  
Index: loncom/interface/lonwhatsnew.pm
diff -u loncom/interface/lonwhatsnew.pm:1.114 loncom/interface/lonwhatsnew.pm:1.115
--- loncom/interface/lonwhatsnew.pm:1.114	Mon Oct 21 22:34:33 2013
+++ loncom/interface/lonwhatsnew.pm	Sun Nov  3 18:58:05 2013
@@ -1,5 +1,5 @@
 #
-# $Id: lonwhatsnew.pm,v 1.114 2013/10/21 22:34:33 raeburn Exp $
+# $Id: lonwhatsnew.pm,v 1.115 2013/11/03 18:58:05 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -600,7 +600,7 @@
     }
     my $classlist;
     if ($show{'oldroles'} || $show{'newroles'} || $show{'crslogin'}) {
-        $classlist = &Apache::loncoursedata::get_classlist(); 
+        $classlist = &Apache::loncoursedata::get_classlist();
     }
     if ($show{'coursenormalmail'}) {
         $msgcount = &getnormalmail(\@newmsgs);
@@ -1866,7 +1866,7 @@
                             my $udom = $user->{'udom'};
                             my $fullname;
                             if (ref($classlist->{$uname.':'.$udom}) eq 'ARRAY') {
-                                $fullname = $classlist->{$user}->[$fullnameidx];
+                                $fullname = $classlist->{$uname.':'.$udom}->[$fullnameidx];
                             } else {
                                 $fullname = &Apache::loncommon::plainname($uname,$udom,'lastname');
                             }