version 1.126, 2007/08/29 10:07:42
|
version 1.128, 2007/10/08 09:22:50
|
Line 56 sub start_radiobuttonresponse {
|
Line 56 sub start_radiobuttonresponse {
|
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |
my $result; |
my $result; |
|
|
|
|
|
|
#when in a radiobutton response use these |
#when in a radiobutton response use these |
&Apache::lonxml::register('Apache::radiobuttonresponse',('foilgroup','foil','conceptgroup')); |
&Apache::lonxml::register('Apache::radiobuttonresponse',('foilgroup','foil','conceptgroup')); |
push (@Apache::lonxml::namespace,'radiobuttonresponse'); |
push (@Apache::lonxml::namespace,'radiobuttonresponse'); |
Line 253 sub end_foilgroup {
|
Line 251 sub end_foilgroup {
|
('true','false')); |
('true','false')); |
push (@{ $Apache::lonhomework::analyze{"$part_id.bubble_lines"} }, |
push (@{ $Apache::lonhomework::analyze{"$part_id.bubble_lines"} }, |
$bubble_lines); |
$bubble_lines); |
my $hash_value = $Apache::lonhomework::analyze{"$part_id.bubble_lines"}[0]; |
|
|
|
} |
} |
} |
} |
$Apache::lonxml::post_evaluate=0; |
$Apache::lonxml::post_evaluate=0; |
Line 263 sub end_foilgroup {
|
Line 259 sub end_foilgroup {
|
&Apache::response::setup_prior_tries_hash(\&format_prior_answer, |
&Apache::response::setup_prior_tries_hash(\&format_prior_answer, |
[\%Apache::response::foilgroup]); |
[\%Apache::response::foilgroup]); |
} |
} |
$bubble_lines = &bubble_line_count($answer_count, $bubbles_per_line); |
|
&Apache::response::poprandomnumber(); |
&Apache::response::poprandomnumber(); |
&Apache::lonxml::increment_counter($bubble_lines); |
$bubble_lines = &bubble_line_count($answer_count, $bubbles_per_line); |
|
&Apache::lonxml::increment_counter($bubble_lines, |
|
$id); |
|
if ($target eq 'analyze') { |
|
&Apache::lonhomework::set_bubble_lines(); |
|
} |
return $result; |
return $result; |
} |
} |
|
|