loncom/xml/londefdef.pm - diff

Return to londefdef.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.415, 2010/02/01 12:03:19	version 1.416, 2010/05/04 19:40:47
Line 3897 sub end_colgroup {	Line 3897 sub end_colgroup {
return $currentstring;	return $currentstring;
}	}


#-- <del> tag (end tag required)	#-- <del> tag (end tag required)
sub start_del {	sub start_del {
my ($target,$token) = @_;	my ($target,$token) = @_;
my $currentstring = '';	my $currentstring = '';
if ($target eq 'web' \|\| $target eq 'webgrade') {	if ($target eq 'web' \|\| $target eq 'webgrade') {
$currentstring = $token->[4];	$currentstring = $token->[4];
	} elsif ($target eq 'tex') {
	&disable_para();
	$currentstring .= '\st{';
}	}
return $currentstring;	return $currentstring;
}	}
Line 3911 sub end_del {	Line 3915 sub end_del {
my ($target,$token) = @_;	my ($target,$token) = @_;
my $currentstring = '';	my $currentstring = '';
if ($target eq 'web' \|\| $target eq 'webgrade') {	if ($target eq 'web' \|\| $target eq 'webgrade') {
$currentstring = $token->[2];	$currentstring = $token->[2];
	} elsif ($target eq 'tex') {
	&enable_para();
	$currentstring = '}';
}	}
return $currentstring;	return $currentstring;
}	}
Line 4847 sub latex_header {	Line 4854 sub latex_header {
"\\usepackage{xcolor}\n".	"\\usepackage{xcolor}\n".
'\usepackage{calc}'.	'\usepackage{calc}'.
'\usepackage{amsmath}'.	'\usepackage{amsmath}'.
	'\usepackage{soul}',
'\usepackage{amssymb}'.	'\usepackage{amssymb}'.
'\usepackage{amsfonts}'.	'\usepackage{amsfonts}'.
'\usepackage{amsthm}'.	'\usepackage{amsthm}'.