version 1.16, 2016/10/22 01:53:27
|
version 1.17, 2016/10/22 02:03:31
|
Line 324 SCRIPT
|
Line 324 SCRIPT
|
$result .= '<table><tr><td>'; |
$result .= '<table><tr><td>'; |
|
|
my $size = scalar(keys(%sections)); |
my $size = scalar(keys(%sections)); |
$size += 3; # We have allstudents allpersonel nosection too. |
if ($context eq 'accesstimes') { |
if ($size > 5) { |
$size += 2; |
|
} else { |
|
$size += 3; # We have allstudents allpersonel nosection too. |
|
} |
|
if ($size > 5) { |
$size = 5; |
$size = 5; |
} |
} |
$result .= '<select multiple="multiple" name="'.$formprefix |
$result .= '<select multiple="multiple" name="'.$formprefix |
.'.chosensections" size="'.$size.'">'."\n"; |
.'.chosensections" size="'.$size.'">'."\n"; |
$result .= '<option value="allstudents">'.&mt('All Students').'</option>'; |
$result .= '<option value="allstudents">'.&mt('All Students').'</option>'; |
$result .= '<option value="allpersonnel">'.&mt('All Course Personnel').'</option>'; |
unless ($context eq 'accesstimes') { |
|
$result .= '<option value="allpersonnel">'.&mt('All Course Personnel').'</option>'; |
|
} |
$result .= '<option value="nosection">'.&mt('No Section').'</option>'; |
$result .= '<option value="nosection">'.&mt('No Section').'</option>'; |
$result .= "\n"; |
$result .= "\n"; |
foreach my $sec (sort {lc($a) cmp lc($b)} (keys(%sections))) { |
foreach my $sec (sort {lc($a) cmp lc($b)} (keys(%sections))) { |