--- loncom/interface/statistics/lonproblemanalysis.pm	2005/04/19 13:59:34	1.121
+++ loncom/interface/statistics/lonproblemanalysis.pm	2006/01/22 04:10:04	1.123
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonproblemanalysis.pm,v 1.121 2005/04/19 13:59:34 matthew Exp $
+# $Id: lonproblemanalysis.pm,v 1.123 2006/01/22 04:10:04 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -97,8 +97,11 @@ sub BuildProblemAnalysisPage {
             $r->print($html.(' 'x5));
         }
         #
-        $r->print(&Apache::lonstathelpers::submission_report_form
-                                                      ('problem_analysis'));
+
+        # This is commented out pending actual implementation of 
+        # CSV and Excel output.
+        #$r->print(&Apache::lonstathelpers::submission_report_form
+        #                                              ('problem_analysis'));
         #
         $r->print('<hr />');
         $r->rflush();
@@ -341,7 +344,9 @@ sub numerical_plot_percent {
     while (my ($ans,$submissions) = each(%$responses)) {
         while (my ($submission,$counts) = each(%$submissions)) {
             my ($correct_count,$incorrect_count) = @$counts;
-            my $scaled_value = 100*($submission-$ans)/abs($ans);
+	    my $scaled_value = 
+		($ans) ? 100*($submission-$ans)/abs($ans)
+		       : 0;
             if ($scaled_value < $bins[0]) {
                 $bins[0]=$scaled_value -1;
             }