--- loncom/xml/londefdef.pm	2003/07/28 19:18:02	1.156
+++ loncom/xml/londefdef.pm	2003/07/31 21:00:55	1.157
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Tags Default Definition Module 
 #
-# $Id: londefdef.pm,v 1.156 2003/07/28 19:18:02 sakharuk Exp $
+# $Id: londefdef.pm,v 1.157 2003/07/31 21:00:55 sakharuk Exp $
 # 
 #
 # Copyright Michigan State University Board of Trustees
@@ -1078,12 +1078,14 @@ sub end_q {
 
 #-- <p> tag
 sub start_p {
-    my ($target,$token) = @_;
+    my ($target,$token,$tagstack,$parstack,$parser,$safeeval) = @_;
     my $currentstring = '';
     if ($target eq 'web') {
 	$currentstring .= $token->[4];
     } elsif ($target eq 'tex') {
-	$currentstring .= '\par ';
+	my $signal=1;
+	foreach my $tag (@$tagstack) {if ($tag eq 'b') {$signal=0;}}
+	if ($signal) {$currentstring .= '\par ';}
     }
     return $currentstring;
 }