version 1.44, 2006/05/09 14:38:10
|
version 1.45, 2006/05/09 15:09:27
|
Line 101 sub handler {
|
Line 101 sub handler {
|
if ($env{'form.form'} eq 'cu' && $env{'form.pickedcourse'}) { |
if ($env{'form.form'} eq 'cu' && $env{'form.pickedcourse'}) { |
$loaditem{'onload'} ="setSections()"; |
$loaditem{'onload'} ="setSections()"; |
my ($cdom,$cnum) = split/_/,$env{'form.pickedcourse'}; |
my ($cdom,$cnum) = split/_/,$env{'form.pickedcourse'}; |
my %sections_count = (); |
|
$num_sections = &Apache::loncommon::get_sections($cdom,$cnum,\%sections_count); |
my %sections_count = &Apache::loncommon::get_sections($cdom,$cnum); |
my @sections = (); |
my @sections = (sort {$a <=> $b} keys(%sections_count)); |
if ($num_sections > 0) { |
$seclist = join('","',@sections); |
@sections = (sort {$a <=> $b} keys(%sections_count)); |
|
$seclist = join('","',@sections); |
|
} |
|
my %curr_groups = &Apache::loncommon::coursegroups($cdom,$cnum); |
my %curr_groups = &Apache::loncommon::coursegroups($cdom,$cnum); |
$groupslist = join(',',sort(keys(%curr_groups))); |
$groupslist = join(',',sort(keys(%curr_groups))); |
} |
} |