[LON-CAPA-cvs] cvs: loncom /interface lonstatistics.pm

matthew lon-capa-cvs@mail.lon-capa.org
Tue, 10 Jun 2003 18:22:18 -0000


matthew		Tue Jun 10 14:22:18 2003 EDT

  Modified files:              
    /loncom/interface	lonstatistics.pm 
  Log:
  Give 3 columns each for score and max output.
  
  
Index: loncom/interface/lonstatistics.pm
diff -u loncom/interface/lonstatistics.pm:1.74 loncom/interface/lonstatistics.pm:1.75
--- loncom/interface/lonstatistics.pm:1.74	Tue Jun  3 14:10:33 2003
+++ loncom/interface/lonstatistics.pm	Tue Jun 10 14:22:17 2003
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstatistics.pm,v 1.74 2003/06/03 18:10:33 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 @@
         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;
         }