--- loncom/interface/lonstatistics.pm 2003/05/29 21:38:32 1.72 +++ loncom/interface/lonstatistics.pm 2003/06/10 18:22:17 1.75 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstatistics.pm,v 1.72 2003/05/29 21:38:32 matthew Exp $ +# $Id: lonstatistics.pm,v 1.75 2003/06/10 18:22:17 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -519,10 +519,8 @@ sub PrepareCourseData { my $name_length = length($seq->{'title'}); my $num_parts = $seq->{'num_assess_parts'}; # - # The number of columns needed for the summation text: - # " 1/5" = 1+3 columns, " 10/99" = 1+5 columns - my $sum_length = 1+1+2*(length($num_parts)); - my $num_col = $num_parts+$sum_length; + # Use 3 digits for each the sum and total, which means 7 total... + my $num_col = $num_parts+7; if ($num_col < $name_length) { $num_col = $name_length; } @@ -859,16 +857,14 @@ sub CreateMainMenu { # $Str .= '
'."\n"; - $Str .= ' | '."\n"; $Str .= ' | Select a Report | '."\n"; + $Str .= ''."\n"; + $Str .= ' | '."\n"; $Str .= ' |
'. ''. " | \n"; - $Str .= ''. - ''. - " | \n"; # $Str .= ''; $Str .= ' | '."\n"; # + $Str .= ''.(' 'x30).' | '; + $Str .= ''. + ''. + " | \n"; $Str .= '