--- loncom/interface/statistics/lonstudentassessment.pm	2004/02/20 16:24:20	1.92
+++ loncom/interface/statistics/lonstudentassessment.pm	2004/02/26 18:28:33	1.94
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstudentassessment.pm,v 1.92 2004/02/20 16:24:20 matthew Exp $
+# $Id: lonstudentassessment.pm,v 1.94 2004/02/26 18:28:33 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -306,7 +306,7 @@ the chart page.
 #######################################################
 sub CreateInterface {
     my $Str = '';
-    $Str .= &Apache::lonhtmlcommon::breadcrumbs(undef,'Chart');
+    $Str .= &Apache::lonhtmlcommon::breadcrumbs(undef,&mt('Chart'));
 #    $Str .= &CreateLegend();
     $Str .= '<table cellspacing="5">'."\n";
     $Str .= '<tr>';
@@ -643,6 +643,7 @@ sub html_initialize {
             # Use 3 digits for the total
             $sequence->{'width_sum'}+=3;
         }
+	#
         if ($chosen_output->{'every_problem'}) {
             # one problem per digit
             $sequence->{'width_problem'} = $sequence->{'num_assess_parts'};
@@ -651,10 +652,8 @@ sub html_initialize {
         }
         $sequence->{'width_total'} = $sequence->{'width_problem'} + 
                                      $sequence->{'width_sum'};
-        if ($sequence->{'width_total'} < length($sequence->{'title'})) {
-            $sequence->{'width_total'} = length($sequence->{'title'});
-            $sequence->{'width_problem'} = 
-                $sequence->{'width_total'} - $sequence->{'width_sum'};
+        if ($sequence->{'width_total'} < length(&HTML::Entities::decode($sequence->{'title'}))) {
+            $sequence->{'width_total'} = length(&HTML::Entities::decode($sequence->{'title'}));
         }
         #
         # Output the sequence titles
@@ -728,8 +727,9 @@ sub html_outputstudent {
         #
         if (! $chosen_output->{'every_problem'}) {
             $performance = '';
+	    $performance_length=0;
         }
-        $performance .= ' 'x($seq->{'width_problem'}-$performance_length).
+        $performance .= ' 'x($seq->{'width_total'}-$performance_length-$seq->{'width_sum'}).
             $ratio;
         #
         $Str .= $performance.$padding;