--- loncom/xml/londefdef.pm 2000/11/30 11:44:50 1.13 +++ loncom/xml/londefdef.pm 2001/01/04 19:15:20 1.14 @@ -750,13 +750,21 @@ sub BEGIN { } #---------------------------------------------------------------------- tag sub start_basefont { - my ($target,$token) = @_; - my $currentstring = ''; - if ($target eq 'web') { - $currentstring = $token->[4]; - } - return $currentstring; - } + my ($target,$token) = @_; + my $currentstring = ''; + if ($target eq 'web') { + $currentstring = $token->[4]; + } + return $currentstring; + } + sub end_basefont { + my ($target,$token) = @_; + my $currentstring = ''; + if ($target eq 'web') { + $currentstring = $token->[4]; + } + return $currentstring; + } #-------------------------------------------------------------------------- tag sub start_font { my ($target,$token) = @_;