loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.190, 2002/09/04 03:57:18	version 1.191, 2002/09/04 04:55:13
Line 539 sub htmlclean {	Line 539 sub htmlclean {
return $output;	return $output;
}	}

sub latex_special_sumbols {	sub latex_special_symbols {
my ($current_token,$stack,$parstack)=@_;	my ($current_token,$stack,$parstack)=@_;
my @temp_array = @$stack;	my @temp_array = @$stack;
if ($temp_array[-1] ne 'tt') {	if ($temp_array[-1] ne 'tt') {
Line 636 sub inner_xmlparse {	Line 636 sub inner_xmlparse {
}	}
if (($token->[0] eq 'T') \|\| ($token->[0] eq 'C') \|\| ($token->[0] eq 'D') ) {	if (($token->[0] eq 'T') \|\| ($token->[0] eq 'C') \|\| ($token->[0] eq 'D') ) {
if ($target eq 'tex') {	if ($target eq 'tex') {
$result=&latex_special_sumbols($result,$stack,$parstack);	$result=&latex_special_symbols($result,$stack,$parstack);
}	}
}	}