--- loncom/xml/londefdef.pm 2002/07/12 16:37:38 1.73 +++ loncom/xml/londefdef.pm 2002/07/23 19:15:08 1.75 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Tags Default Definition Module # -# $Id: londefdef.pm,v 1.73 2002/07/12 16:37:38 albertel Exp $ +# $Id: londefdef.pm,v 1.75 2002/07/23 19:15:08 sakharuk Exp $ # # # Copyright Michigan State University Board of Trustees @@ -837,12 +837,15 @@ EDITBUTTON } #--
tag sub start_br { - my ($target,$token) = @_; + my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; my $currentstring = ''; if ($target eq 'web') { $currentstring .= $token->[4]; } elsif ($target eq 'tex') { - $currentstring .= '\vskip 0 mm'; + my @temp = @$tagstack; + if ($temp[-2] ne 'sub' && $temp[-2] ne 'sup') { + $currentstring .= '\vskip 0 mm'; + } } elsif ($target eq 'latexsource') { $currentstring .= '\\'; } @@ -1035,7 +1038,7 @@ EDITBUTTON if ($target eq 'web') { $currentstring .= $token->[4]; } elsif ($target eq 'tex') { - $currentstring .= "\\hline "; + $currentstring .= '\vskip 0 mm \noindent\makebox[\textwidth - 8 mm][b]{\hrulefill}'; } return $currentstring; }