version 1.68, 2007/05/23 22:36:21
|
version 1.71, 2008/09/13 02:08:32
|
Line 160 sub end_numericalhint {
|
Line 160 sub end_numericalhint {
|
|
|
my $partid=$Apache::inputtags::part; |
my $partid=$Apache::inputtags::part; |
my $id=$Apache::inputtags::hint[-1]; |
my $id=$Apache::inputtags::hint[-1]; |
#id submissions occured under |
#id submissions occurred under |
my $submitid=$Apache::inputtags::response[-1]; |
my $submitid=$Apache::inputtags::response[-1]; |
|
|
my $response = $Apache::lonhomework::history{ |
my $response = $Apache::lonhomework::history{ |
Line 395 sub end_stringhint {
|
Line 395 sub end_stringhint {
|
&Apache::response::setup_params('stringhint',$safeeval); |
&Apache::response::setup_params('stringhint',$safeeval); |
my $partid=$Apache::inputtags::part; |
my $partid=$Apache::inputtags::part; |
my $id=$Apache::inputtags::hint[-1]; |
my $id=$Apache::inputtags::hint[-1]; |
#id submissions occured under |
#id submissions occurred under |
my $submitid=$Apache::inputtags::response[-1]; |
my $submitid=$Apache::inputtags::response[-1]; |
my $response = $Apache::lonhomework::history{ |
my $response = $Apache::lonhomework::history{ |
"resource.$partid.$submitid.submission"}; |
"resource.$partid.$submitid.submission"}; |
Line 422 sub end_stringhint {
|
Line 422 sub end_stringhint {
|
my $args_ref = |
my $args_ref = |
&Apache::caparesponse::setup_capa_args($safeeval,$parstack, |
&Apache::caparesponse::setup_capa_args($safeeval,$parstack, |
\@args,$response); |
\@args,$response); |
|
if ($$args_ref{'type'} eq '') { |
|
$$args_ref{'type'} = 'ci'; |
|
} |
&Apache::caparesponse::add_in_tag_answer($parstack,$safeeval); |
&Apache::caparesponse::add_in_tag_answer($parstack,$safeeval); |
my (@final_awards,@final_msgs,@ans_names); |
my (@final_awards,@final_msgs,@ans_names); |
my %answer = &Apache::caparesponse::get_answer(); |
my %answer = &Apache::caparesponse::get_answer(); |
Line 530 sub end_optionhint {
|
Line 533 sub end_optionhint {
|
my ($foilmatch,$conceptmatch)=(-1,-1); |
my ($foilmatch,$conceptmatch)=(-1,-1); |
my $name= &Apache::lonxml::get_param('name',$parstack,$safeeval); |
my $name= &Apache::lonxml::get_param('name',$parstack,$safeeval); |
my $partid=$Apache::inputtags::part; |
my $partid=$Apache::inputtags::part; |
#id submissions occured under |
#id submissions occurred under |
my $submitid=$Apache::inputtags::response[-1]; |
my $submitid=$Apache::inputtags::response[-1]; |
my $part_id="$partid.$submitid"; |
my $part_id="$partid.$submitid"; |
my %answer; |
my %answer; |
Line 610 sub end_radiobuttonhint {
|
Line 613 sub end_radiobuttonhint {
|
my $answer=&Apache::lonxml::get_param('answer',$parstack,$safeeval); |
my $answer=&Apache::lonxml::get_param('answer',$parstack,$safeeval); |
eval('@answer ='.$answer); |
eval('@answer ='.$answer); |
my $partid=$Apache::inputtags::part; |
my $partid=$Apache::inputtags::part; |
#id submissions occured under |
#id submissions occurred under |
my $submitid=$Apache::inputtags::response[-1]; |
my $submitid=$Apache::inputtags::response[-1]; |
my $part_id="$partid.$submitid"; |
my $part_id="$partid.$submitid"; |
my $response = $Apache::lonhomework::history{ |
my $response = $Apache::lonhomework::history{ |