loncom/xml/lontexconvert.pm - diff

Return to lontexconvert.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.73, 2006/05/17 22:08:08	version 1.74, 2006/05/18 22:13:50
Line 50 use Apache::lonnet;	Line 50 use Apache::lonnet;

sub init_tth {	sub init_tth {
my $options=$env{'course.'.$env{'request.course.id'}.'.tthoptions'};	my $options=$env{'course.'.$env{'request.course.id'}.'.tthoptions'};
	if ($options =~ /\S/) {
	$options = ' '.$options;
	} else {
	undef($options);
	}
if ($env{'browser.mathml'}) {	if ($env{'browser.mathml'}) {
&tth::ttminit();	&tth::ttminit();
if ($env{'browser.unicode'}) {	if ($env{'browser.unicode'}) {
&tth::ttmoptions('-L -u1 '.$options);	&tth::ttmoptions('-L -u1'.$options);
} else {	} else {
&tth::ttmoptions('-L -u0 '.$options);	&tth::ttmoptions('-L -u0'.$options);
}	}
} else {	} else {
&tth::tthinit();	&tth::tthinit();
if ($env{'browser.unicode'}) {	if ($env{'browser.unicode'}) {
&tth::tthoptions('-L -u1 '.$options);	&tth::tthoptions('-L -u1'.$options);
} else {	} else {
&tth::tthoptions('-L -u0 '.$options);	&tth::tthoptions('-L -u0'.$options);
}	}
}	}
}	}