loncom/homework/caparesponse/caparesponse.pm - diff

Return to caparesponse.pm CVS log

Up to [LON-CAPA] / loncom / homework / caparesponse

version 1.264, 2024/09/29 01:58:43	version 1.266, 2025/02/20 06:36:00
Line 653 sub end_numericalresponse {	Line 653 sub end_numericalresponse {
if ($previous eq $bubble_values->[$ind]) {	if ($previous eq $bubble_values->[$ind]) {
$checked=" checked='on' ";	$checked=" checked='on' ";
}	}
$result.='<td><input type="radio" name="HWVAL_'.$id.	$result.='<td><label><input type="radio" name="HWVAL_'.$id.
'" value="'.$bubble_values->[$ind].'" '.$checked	'" value="'.$bubble_values->[$ind].'" '.$checked
.' /><b>'.$alphabet[$ind].'</b>: '.	.' /><b>'.$alphabet[$ind].'</b>: '.
$bubble_display->[$ind].'</td>';	$bubble_display->[$ind].'</label></td>';
}	}
$result.='</tr></table>';	$result.='</tr></table>';
}	}
Line 1164 sub make_horizontal_latex_bubbles {	Line 1164 sub make_horizontal_latex_bubbles {
my $j=0;	my $j=0;
my $cou=0;	my $cou=0;
$result.='\vskip 2mm \noindent ';	$result.='\vskip 2mm \noindent ';
$result .= '\textbf{'.$Apache::lonxml::counter.'.} \vskip -3mm ';	if ($Apache::lonhomework::type eq 'exam') {
	$result .= '\textbf{'.$Apache::lonxml::counter.'.} \vskip -3mm ';
	}

for (my $i=0;$i<$number_of_tables;$i++) {	for (my $i=0;$i<$number_of_tables;$i++) {
if ($i == 0) {	if ($i == 0) {