version 1.327, 2004/07/08 14:35:12
|
version 1.328, 2004/07/12 16:25:51
|
Line 788 sub default_homework_load {
|
Line 788 sub default_homework_load {
|
} |
} |
} |
} |
|
|
|
my $metamode_was; |
sub startredirection { |
sub startredirection { |
$Apache::lonxml::redirection++; |
if (!$Apache::lonxml::redirection) { |
push (@Apache::lonxml::outputstack, ''); |
$metamode_was=$Apache::lonxml::metamode; |
|
} |
|
$Apache::lonxml::metamode=0; |
|
$Apache::lonxml::redirection++; |
|
push (@Apache::lonxml::outputstack, ''); |
} |
} |
|
|
sub endredirection { |
sub endredirection { |
if (!$Apache::lonxml::redirection) { |
if (!$Apache::lonxml::redirection) { |
&Apache::lonxml::error("Endredirection was called, before a startredirection, perhaps you have unbalanced tags. Some debuging information:".join ":",caller); |
&Apache::lonxml::error("Endredirection was called, before a startredirection, perhaps you have unbalanced tags. Some debuging information:".join ":",caller); |
return ''; |
return ''; |
} |
} |
$Apache::lonxml::redirection--; |
$Apache::lonxml::redirection--; |
pop @Apache::lonxml::outputstack; |
if (!$Apache::lonxml::redirection) { |
|
$Apache::lonxml::metamode=$metamode_was; |
|
} |
|
pop @Apache::lonxml::outputstack; |
} |
} |
|
|
sub end_tag { |
sub end_tag { |