loncom/xml/londefdef.pm - diff

Return to londefdef.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.11, 2000/11/06 17:03:29	version 1.12, 2000/11/30 10:41:27
Line 2	Line 2
# Tags Default Definition Module	# Tags Default Definition Module
#	#
# last modified 06/26/00 by Alexander Sakharuk	# last modified 06/26/00 by Alexander Sakharuk
# 11/6 Gerd Kortemeyer	# 11/6,11/30 Gerd Kortemeyer

package Apache::londefdef;	package Apache::londefdef;

Line 230 sub BEGIN {	Line 230 sub BEGIN {
if ($target eq 'web') {	if ($target eq 'web') {
$currentstring = $token->[4];	$currentstring = $token->[4];
}	}
	if ($target eq 'meta') {
	unless ($token->[2]->{'http-equiv'}) {
	my $name=$token->[2]->{'name'};
	$name=~tr/A-Z/a-z/;
	$name=~s/\s/\_/g;
	if ($name) {
	$currentstring='<'.$name.'>'.
	$token->[2]->{'content'}.
	'</'.$name.'>';
	}
	}
	}
return $currentstring;	return $currentstring;
}	}
sub end_meta {	sub end_meta {