loncom/xml/londefdef.pm - diff

Return to londefdef.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.241, 2004/09/15 06:31:57	version 1.242, 2004/10/12 22:55:22
Line 151 sub start_html {	Line 151 sub start_html {
my $options=$ENV{'course.'.$ENV{'request.course.id'}.'.tthoptions'};	my $options=$ENV{'course.'.$ENV{'request.course.id'}.'.tthoptions'};
&Apache::lontexconvert::init_tth();	&Apache::lontexconvert::init_tth();
if ($target eq 'web' \|\| $target eq 'edit') {	if ($target eq 'web' \|\| $target eq 'edit') {
$currentstring = &Apache::lonxml::xmlbegin().	$currentstring = &Apache::lonxml::xmlbegin();
&Apache::lonxml::fontsettings();
} elsif ($target eq 'tex') {	} elsif ($target eq 'tex') {
@Apache::londefdef::table = ();	@Apache::londefdef::table = ();
$currentstring .= '\documentclass[letterpaper]{book}';	$currentstring .= '\documentclass[letterpaper]{book}';
Line 190 sub start_head {	Line 189 sub start_head {
my ($target,$token) = @_;	my ($target,$token) = @_;
my $currentstring = '';	my $currentstring = '';
if ($target eq 'web') {	if ($target eq 'web') {
$currentstring = $token->[4];	$currentstring = $token->[4].&Apache::lonxml::fontsettings();
}	}
return $currentstring;	return $currentstring;
}	}