version 1.32, 2001/12/13 23:36:39
|
version 1.33, 2001/12/14 23:00:52
|
Line 65 sub end_radiobuttonresponse {
|
Line 65 sub end_radiobuttonresponse {
|
if ($target eq 'edit') { $result=&Apache::edit::end_table(); } |
if ($target eq 'edit') { $result=&Apache::edit::end_table(); } |
&Apache::response::end_response; |
&Apache::response::end_response; |
pop @Apache::lonxml::namespace; |
pop @Apache::lonxml::namespace; |
|
&Apache::lonxml::deregister('Apache::radiobuttonresponse',('foilgroup','foil','conceptgroup')); |
return $result; |
return $result; |
} |
} |
|
|
Line 77 sub start_foilgroup {
|
Line 78 sub start_foilgroup {
|
} |
} |
|
|
sub storesurvey { |
sub storesurvey { |
if ( defined $ENV{'form.submitted'}) { |
if ( !defined($ENV{'form.submitted'})) { return ''; } |
my $response = $ENV{'form.HWVAL'.$Apache::inputtags::response['-1']}; |
my $response = $ENV{'form.HWVAL'.$Apache::inputtags::response['-1']}; |
&Apache::lonxml::debug("Here I am!:$response:"); |
&Apache::lonxml::debug("Here I am!:$response:"); |
if ( $response =~ /[0-9]+/) { |
if ( $response !~ /[0-9]+/) { return ''; } |
my $id = $Apache::inputtags::response['-1']; |
my $id = $Apache::inputtags::response['-1']; |
my @whichfoils=@{ $Apache::response::foilgroup{'names'} }; |
my @whichfoils=@{ $Apache::response::foilgroup{'names'} }; |
my %responsehash; |
my %responsehash; |
$responsehash{$whichfoils[$response]}=$response; |
$responsehash{$whichfoils[$response]}=$response; |
$Apache::lonhomework::results{"resource.$Apache::inputtags::part.$id.submission"}=&Apache::lonnet::hash2str(%responsehash); |
$Apache::lonhomework::results{"resource.$Apache::inputtags::part.$id.submission"}=&Apache::lonnet::hash2str(%responsehash); |
$Apache::lonhomework::results{"resource.$Apache::inputtags::part.$id.awarddetail"}='SUBMITTED'; |
$Apache::lonhomework::results{"resource.$Apache::inputtags::part.$id.awarddetail"}='SUBMITTED'; |
&Apache::lonxml::debug("submitted a $response<br />\n"); |
&Apache::lonxml::debug("submitted a $response<br />\n"); |
} |
|
} |
|
return ''; |
return ''; |
} |
} |
|
|