loncom/interface/lonpickcourse.pm - diff

Return to lonpickcourse.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.45, 2006/05/09 15:09:27	version 1.46, 2006/05/18 01:08:50
Line 34 use Apache::loncommon;	Line 34 use Apache::loncommon;
use Apache::loncoursedata;	use Apache::loncoursedata;
use Apache::lonnet;	use Apache::lonnet;
use Apache::lonlocal;	use Apache::lonlocal;
	use Apache::longroup;

sub handler {	sub handler {
my $r = shift;	my $r = shift;
Line 106 sub handler {	Line 107 sub handler {
my @sections = (sort {$a <=> $b} keys(%sections_count));	my @sections = (sort {$a <=> $b} keys(%sections_count));
$seclist = join('","',@sections);	$seclist = join('","',@sections);

my %curr_groups = &Apache::loncommon::coursegroups($cdom,$cnum);	my %curr_groups = &Apache::longroup::coursegroups($cdom,$cnum);
$groupslist = join(',',sort(keys(%curr_groups)));	$groupslist = join(',',sort(keys(%curr_groups)));
}	}
my $jscript;	my $jscript;