loncom/xml/londefdef.pm - diff

Return to londefdef.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.358, 2007/03/13 13:35:39	version 1.359, 2007/03/13 13:38:43
Line 2220 sub end_table {	Line 2220 sub end_table {
$Apache::londefdef::table[-1]{'content'}=\@cleaned_table;	$Apache::londefdef::table[-1]{'content'}=\@cleaned_table;
@fwidth=@cleaned_header;	@fwidth=@cleaned_header;
}	}
# At this time we must be sure the table does not overhang the total width
# this can happen due to our 'average width' adjustment.
# Total the column widths and see if they are larger than the avail width;
# If so scale them down in proportion to their percentage of total width.

my $current_total_width = 0;
for (my $col = 0; $col < $#fwidth; $col++) {
$current_total_width = $current_total_width + $fwidth[$col];
}

#construct header of the table	#construct header of the table
my $header_of_table = '{'.$Apache::londefdef::table[-1]{'vvinc'};	my $header_of_table = '{'.$Apache::londefdef::table[-1]{'vvinc'};