--- loncom/lonnet/perl/lonnet.pm 2006/03/29 19:56:36 1.724 +++ loncom/lonnet/perl/lonnet.pm 2006/04/06 18:04:23 1.725 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.724 2006/03/29 19:56:36 raeburn Exp $ +# $Id: lonnet.pm,v 1.725 2006/04/06 18:04:23 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -5114,9 +5114,6 @@ sub EXT { ($env{'user.domain'} eq $udom)) { $section=$env{'request.course.sec'}; @groups=&sort_course_groups($env{'request.course.groups'},$courseid); - if (@groups > 0) { - @groups = sort(@groups); - } } else { if (! defined($usection)) { $section=&getsection($udom,$uname,$courseid);