loncom/interface/loncreateuser.pm - diff

Return to loncreateuser.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.94, 2004/12/28 22:30:28	version 1.95, 2005/01/11 20:49:05
Line 1722 sub course_sections {	Line 1722 sub course_sections {
$output = '<select name="currsec_'.$role.'" ';	$output = '<select name="currsec_'.$role.'" ';
my $multiple = 4;	my $multiple = 4;
if ($num_sections <4) { $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="'.$_.'">'.$_."</option>\n";	$output .= '<option value="'.$_.'">'.$_."</option>\n";
}	}