loncom/xml/londefdef.pm - diff

Return to londefdef.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.215, 2004/05/12 18:59:38	version 1.216, 2004/05/21 21:06:59
Line 1110 sub start_p {	Line 1110 sub start_p {
$currentstring='\makebox['.$ENV{'form.textwidth'}.']{\hfill\llap{';	$currentstring='\makebox['.$ENV{'form.textwidth'}.']{\hfill\llap{';
} elsif ($align eq 'left') {	} elsif ($align eq 'left') {
$currentstring='\noindent\makebox['.$ENV{'form.textwidth'}.']{\rlap{';	$currentstring='\noindent\makebox['.$ENV{'form.textwidth'}.']{\rlap{';
}	} else {
	$currentstring='\par ';
	}
my $signal=1;#<p> does not work inside <b>...</b>	my $signal=1;#<p> does not work inside <b>...</b>
foreach my $tag (@$tagstack) {if (lc($tag) eq 'b') {$signal=0;}	foreach my $tag (@$tagstack) {if (lc($tag) eq 'b') {$signal=0;}
if (!$signal) {$currentstring = '';}	if (!$signal) {$currentstring = '';}