loncom/interface/lonparmset.pm - diff

Return to lonparmset.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.256, 2005/10/03 19:10:22	version 1.257, 2005/10/03 20:21:24
Line 2761 sub output_row {	Line 2761 sub output_row {
$values = 'Type a list of values separated by commas.';	$values = 'Type a list of values separated by commas.';
}	}
if ($options =~ m/active/) {	if ($options =~ m/active/) {
$checked = ' CHECKED ';	$checked = ' checked="checked" ';
} else {	} else {
$checked = ' ';	$checked = ' ';
}	}
Line 2769 sub output_row {	Line 2769 sub output_row {
$output.='<td><strong>'.$field_text.'</strong></td>';	$output.='<td><strong>'.$field_text.'</strong></td>';
$output.='<td><input name="'.$field_name.'_values" type="text" value="'.$values.'" /></td>';	$output.='<td><input name="'.$field_name.'_values" type="text" value="'.$values.'" /></td>';
if ($options =~ m/onlyone/) {	if ($options =~ m/onlyone/) {
$checked = ' CHECKED ';	$checked = ' checked="checked" ';
} else {	} else {
$checked = ' ';	$checked = ' ';
}	}
$output.='<td><center><input type="checkbox" name="'.$field_name.'_onlyone" value="yes"'.$checked.' /></center></td>';	$output.='<td><center><input type="checkbox" name="'.$field_name.'_onlyone" value="yes"'.$checked.' /></center></td>';
if ($options =~ m/stuadd/) {	if ($options =~ m/stuadd/) {
$checked = ' CHECKED ';	$checked = ' checked="checked" ';
} else {	} else {
$checked = ' ';	$checked = ' ';
}	}