version 1.317, 2004/04/15 20:18:46
|
version 1.318, 2004/05/21 21:07:54
|
Line 524 sub inner_xmlparse {
|
Line 524 sub inner_xmlparse {
|
return $finaloutput; |
return $finaloutput; |
} |
} |
|
|
|
## |
|
## Looks to see if there is a subroutine defined for this tag. If so, call it, |
|
## otherwise do not call it as we do not know what it is. |
|
## |
sub callsub { |
sub callsub { |
my ($sub,$target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |
my ($sub,$target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |
my $currentstring=''; |
my $currentstring=''; |
Line 556 sub callsub {
|
Line 560 sub callsub {
|
$parstack,$parser,$safeeval, |
$parstack,$parser,$safeeval, |
$style); |
$style); |
} else { |
} else { |
|
if ($target eq 'tex') { |
|
# throw away tag name |
|
return ''; |
|
} |
#&Apache::lonxml::debug("NOT Calling sub $sub in $space $metamode"); |
#&Apache::lonxml::debug("NOT Calling sub $sub in $space $metamode"); |
if ($metamode <1) { |
if ($metamode <1) { |
if (defined($token->[4]) && ($metamode < 1)) { |
if (defined($token->[4]) && ($metamode < 1)) { |