--- loncom/interface/lonstatistics.pm 2005/10/04 18:27:32 1.125 +++ loncom/interface/lonstatistics.pm 2005/12/13 16:32:22 1.127 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstatistics.pm,v 1.125 2005/10/04 18:27:32 albertel Exp $ +# $Id: lonstatistics.pm,v 1.127 2005/12/13 16:32:22 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -267,8 +267,9 @@ sub PrepareClasslist { # Sort the Students my $sortby = 'fullname'; $sortby = $env{'form.sort'} if (exists($env{'form.sort'})); - my @TmpStudents = sort { $a->{$sortby} cmp $b->{$sortby} || - $a->{'fullname'} cmp $b->{'fullname'} } @Students; + my @TmpStudents = sort { lc($a->{$sortby}) cmp lc($b->{$sortby}) || + lc($a->{'fullname'}) cmp lc($b->{'fullname'}) || + lc($a->{'username'}) cmp lc($b->{'username'}) } @Students; @Students = @TmpStudents; # # Now deal with that current student thing....