--- loncom/xml/londefdef.pm 2006/09/02 18:49:37 1.335 +++ loncom/xml/londefdef.pm 2006/09/05 21:57:57 1.336 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Tags Default Definition Module # -# $Id: londefdef.pm,v 1.335 2006/09/02 18:49:37 albertel Exp $ +# $Id: londefdef.pm,v 1.336 2006/09/05 21:57:57 foxr Exp $ # # # Copyright Michigan State University Board of Trustees @@ -1214,20 +1214,11 @@ sub start_br { $signal=1; } if (($tempo[$i] eq 'td') || ($tempo[$i] eq 'th')) { - my $colspan = - &Apache::lonxml::get_param('colspan', $parstack, - $safeeval, $i, 0); - if ($colspan) { - $signal = 2; - } else { - $signal = 1; - } + $signal = 1; } } if ($signal eq 1) { $currentstring .= ' \vskip 0 mm '; - } elsif ($signal eq '2') { - # multicol doesn't like blank lines } elsif ($$tagstack[-2] ne 'sub' && $$tagstack[-2] ne 'sup') { $currentstring .= '\strut \\\\ \strut '; } @@ -2209,9 +2200,13 @@ sub end_table { # if ($colspan > 1) { + my $spanwidth = 0; + for (my $spancol = $jn; $spancol < $jn + $colspan; $spancol++) { + $spanwidth += $fwidth[$spancol]; + } $output .= '\multicolumn{'. $colspan - .'}{|l|}{'; + ."}{|p{$spanwidth mm}|}{"; } if ($rowspan > 1) {