Return to optionresponse.pm CVS log | Up to [LON-CAPA] / loncom / homework |
version 1.18, 2001/06/26 21:41:58 | version 1.19, 2001/06/27 18:51:59 |
---|---|
Line 40 sub end_optionresponse { | Line 40 sub end_optionresponse { |
return $result; | return $result; |
} | } |
sub insert_optionresponse { | |
return ' | |
<optionresponse max="10"> | |
<foilgroup options=\"\"> | |
</foilgroup> | |
</optionresponse>'; | |
} | |
%Apache::response::foilgroup={}; | %Apache::response::foilgroup={}; |
sub start_foilgroup { | sub start_foilgroup { |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; | my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |