[LON-CAPA-cvs] cvs: loncom(version_0_6) /interface lonstatistics.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Mon, 13 Jan 2003 20:34:24 -0000
albertel Mon Jan 13 15:34:24 2003 EDT
Modified files: (Branch: version_0_6)
/loncom/interface lonstatistics.pm
Log:
- backport 1.57 and 1.58
Index: loncom/interface/lonstatistics.pm
diff -u loncom/interface/lonstatistics.pm:1.55 loncom/interface/lonstatistics.pm:1.55.2.1
--- loncom/interface/lonstatistics.pm:1.55 Tue Nov 26 13:02:38 2002
+++ loncom/interface/lonstatistics.pm Mon Jan 13 15:34:24 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# (Publication Handler
#
-# $Id: lonstatistics.pm,v 1.55 2002/11/26 18:02:38 minaeibi Exp $
+# $Id: lonstatistics.pm,v 1.55.2.1 2003/01/13 20:34:24 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -490,8 +490,8 @@
$Str .= '<table border="0"><tbody><tr>'."\n";
$Str .= '<td></td><td></td>'."\n";
- $Str .= '<td align="center"><b>Analysis Reports:</b></td>'."\n";
- $Str .= '<td align="center"><b>Student Status:</b></td></tr>'."\n";
+ $Str .= '<td align="center"><b>Select a Report</b></td>'."\n";
+ $Str .= '<td align="center"><b>Student Status</b></td></tr>'."\n";
$Str .= '<tr>'."\n";
$Str .= '<td align="center"><input type="submit" name="Refresh" ';
$Str .= 'value="Refresh" /></td>'."\n";
@@ -534,7 +534,7 @@
my %reports = ('classlist' => 'Class list',
'problem_statistics' => 'Problem Statistics',
'student_assessment' => 'Student Assessment',
- 'percentage' => 'Percentage Graphs',
+ 'percentage' => 'Correct-problems Plot',
# 'activitylog' => 'Activity Log',
'reportSelected' => 'Class list');
@@ -614,7 +614,7 @@
} elsif($GoToPage eq 'Class list') {
&BuildClasslist($cacheDB, $students, \@studentInformation,
\@headings, $r);
- } elsif($GoToPage eq 'Percentage Graphs') {
+ } elsif($GoToPage eq 'Correct-problems Plot') {
&Apache::lonpercentage::BuildPercentageGraph($cacheDB, $students,
$courseID, $c, $r);
}