version 1.6, 2001/05/04 21:19:37
|
version 1.7, 2001/05/15 20:48:43
|
Line 13 sub start_optionresponse {
|
Line 13 sub start_optionresponse {
|
my ($target,$token,$parstack,$parser,$safeeval,$style)=@_; |
my ($target,$token,$parstack,$parser,$safeeval,$style)=@_; |
#when in a radiobutton response use these |
#when in a radiobutton response use these |
&Apache::lonxml::register('Apache::optionresponse',('foilgroup','foil','conceptgroup')); |
&Apache::lonxml::register('Apache::optionresponse',('foilgroup','foil','conceptgroup')); |
|
push (@Apache::lonxml::namespace,'optionresponse'); |
my $id = &Apache::response::start_response($parstack,$safeeval); |
my $id = &Apache::response::start_response($parstack,$safeeval); |
return ''; |
return ''; |
} |
} |
|
|
sub end_optionresponse { |
sub end_optionresponse { |
&Apache::response::end_response; |
&Apache::response::end_response; |
|
pop @Apache::lonxml::namespace; |
return ''; |
return ''; |
} |
} |
|
|
|
sub insert_optionresponse { |
|
return ' |
|
<optionresponse max="10"> |
|
<foilgroup options=\"\"> |
|
</foilgroup> |
|
</optionresponse>'; |
|
} |
|
|
%Apache::response::foilgroup={}; |
%Apache::response::foilgroup={}; |
sub start_foilgroup { |
sub start_foilgroup { |
%Apache::response::foilgroup={}; |
%Apache::response::foilgroup={}; |
Line 193 sub end_foil {
|
Line 203 sub end_foil {
|
return ''; |
return ''; |
} |
} |
|
|
|
sub insert_foil { |
|
return ' |
|
<foil name="" value=""> |
|
</foil>'; |
|
} |
1; |
1; |
__END__ |
__END__ |
|
|