--- loncom/xml/londefdef.pm 2000/11/06 16:22:59 1.10 +++ loncom/xml/londefdef.pm 2000/11/30 10:41:27 1.12 @@ -2,7 +2,7 @@ # Tags Default Definition Module # # last modified 06/26/00 by Alexander Sakharuk -# 11/6 Gerd Kortemeyer +# 11/6,11/30 Gerd Kortemeyer package Apache::londefdef; @@ -230,6 +230,18 @@ sub BEGIN { if ($target eq 'web') { $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'}. + ''; + } + } + } return $currentstring; } sub end_meta { @@ -1169,7 +1181,7 @@ sub BEGIN { # ------------------------------------------------------------------------ tag - sub start_img { + sub start_param { my ($target,$token) = @_; if ($token->[2]->{'name'} eq 'cabbase') { $Apache::lonxml::extlinks[$#Apache::lonxml::extlinks+1]= @@ -1185,7 +1197,7 @@ sub BEGIN { } return $currentstring; } - sub end_img { + sub end_param { my ($target,$token) = @_; my $currentstring = ''; if ($target eq 'web') {