loncom/interface/loncreateuser.pm - diff

Return to loncreateuser.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.89, 2004/11/30 00:21:24	version 1.91, 2004/12/07 00:49:27
Line 211 sub print_user_modification_page {	Line 211 sub print_user_modification_page {
return;	return;
}	}
var userrole = document.cu.role.options[document.cu.role.selectedIndex].value	var userrole = document.cu.role.options[document.cu.role.selectedIndex].value
var section;	var section="";
var numsections = 0;	var numsections = 0;
for (var i=0; i<document.cu.currsec.length; i++) {	for (var i=0; i<document.cu.currsec.length; i++) {
if (document.cu.currsec.options[i].selected == true ) {	if (document.cu.currsec.options[i].selected == true ) {
Line 1707 sub course_sections {	Line 1707 sub course_sections {
my $output = '';	my $output = '';
my @sections = (sort {$a <=> $b} keys %{$sections_count});	my @sections = (sort {$a <=> $b} keys %{$sections_count});
$output = '<select name="currsec_'.$role.'" ';	$output = '<select name="currsec_'.$role.'" ';
my $multiple = 3;	my $multiple = 4;
if ($num_sections <3) { $multiple = $num_sections; }	if ($num_sections <4) { $multiple = $num_sections; }
$output .= '"multiple size="'.$multiple.'" >'."\n";	$output .= '"multiple size="'.$multiple.'" >'."\n";
foreach (@sections) {	foreach (@sections) {
$output .= '<option value="'.$_.'" />'.$_."\n";	$output .= '<option value="'.$_.'" />'.$_."\n";