version 1.1, 2001/01/19 21:44:51
|
version 1.2, 2001/02/07 00:28:33
|
Line 11 sub BEGIN {
|
Line 11 sub BEGIN {
|
sub start_optionresponse { |
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')); |
&Apache::lonxml::register('Apache::optionresponse',('foilgroup','foil','conceptgroup')); |
my $id = &Apache::response::start_response($parstack,$safeeval); |
my $id = &Apache::response::start_response($parstack,$safeeval); |
return ''; |
return ''; |
} |
} |
Line 137 sub displayfoils {
|
Line 137 sub displayfoils {
|
return $result."<br />"; |
return $result."<br />"; |
} |
} |
|
|
|
sub start_conceptgroup { |
|
} |
|
|
|
sub end_conceptgroup { |
|
} |
|
|
sub start_foil { |
sub start_foil { |
$Apache::lonxml::redirection--; |
my ($target,$token,$parstack,$parser,$safeeval,$style)=@_; |
|
if ($target eq 'web') { |
|
$Apache::lonxml::redirection--; |
|
} |
return ''; |
return ''; |
} |
} |
|
|
Line 155 sub end_foil {
|
Line 164 sub end_foil {
|
$Apache::response::foilgroup{"$name.text"} = $Apache::lonxml::outputstack; |
$Apache::response::foilgroup{"$name.text"} = $Apache::lonxml::outputstack; |
} |
} |
} |
} |
|
if ($target eq 'web' ) { |
$Apache::lonxml::redirection++; |
$Apache::lonxml::redirection++; |
if ($Apache::lonxml::redirection == 1) { |
if ($Apache::lonxml::redirection == 1) { |
$Apache::lonxml::outputstack=''; |
$Apache::lonxml::outputstack=''; |
|
} |
} |
} |
return ''; |
return ''; |
} |
} |