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

minaeibi lon-capa-cvs@mail.lon-capa.org
Tue, 22 Oct 2002 16:34:25 -0000


minaeibi		Tue Oct 22 12:34:25 2002 EDT

  Modified files:              
    /loncom/interface	loncoursedata.pm 
  Log:
  Fixed bug #752,  
  Added total points to each homework set total
  
  
  
Index: loncom/interface/loncoursedata.pm
diff -u loncom/interface/loncoursedata.pm:1.38 loncom/interface/loncoursedata.pm:1.39
--- loncom/interface/loncoursedata.pm:1.38	Thu Oct 17 15:36:30 2002
+++ loncom/interface/loncoursedata.pm	Tue Oct 22 12:34:24 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # (Publication Handler
 #
-# $Id: loncoursedata.pm,v 1.38 2002/10/17 19:36:30 matthew Exp $
+# $Id: loncoursedata.pm,v 1.39 2002/10/22 16:34:24 minaeibi Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -487,9 +487,9 @@
                 }
 		my @titleLength=split(//,$cache->{$currentSequence.
                                                     ':title'});
-                # $extra is 3 for problems correct and 3 for space
+                # $extra is 5 for problems correct and 3 for space
                 # between problems correct and problem output
-                my $extra = 6;
+                my $extra = 8;
 		if(($totalProblems + $extra) > (scalar @titleLength)) {
 		    $cache->{$currentSequence.':columnWidth'}=
                         $totalProblems + $extra;