--- loncom/interface/lonpickcourse.pm 2006/05/08 21:40:20 1.43 +++ loncom/interface/lonpickcourse.pm 2006/05/09 14:38:10 1.44 @@ -1,7 +1,7 @@ # The LearningOnline Network # Pick a course # -# $Id: lonpickcourse.pm,v 1.43 2006/05/08 21:40:20 raeburn Exp $ +# $Id: lonpickcourse.pm,v 1.44 2006/05/09 14:38:10 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -108,12 +108,8 @@ sub handler { @sections = (sort {$a <=> $b} keys(%sections_count)); $seclist = join('","',@sections); } - my (%curr_groups,$numgroups); - $numgroups = &Apache::loncommon::coursegroups(\%curr_groups,$cdom, - $cnum); - if ($numgroups > 0) { - $groupslist = join(',',sort(keys(%curr_groups))); - } + my %curr_groups = &Apache::loncommon::coursegroups($cdom,$cnum); + $groupslist = join(',',sort(keys(%curr_groups))); } my $jscript; my $title = 'Selecting a course';