loncom/interface/statistics/lonpercentage.pm - diff

Return to lonpercentage.pm CVS log

Up to [LON-CAPA] / loncom / interface / statistics

version 1.7, 2003/01/13 17:31:41	version 1.9, 2003/02/25 20:47:47
Line 1	Line 1
# The LearningOnline Network with CAPA	# The LearningOnline Network with CAPA
# (Publication Handler
#	#
# $Id$	# $Id$
#	#
Line 110 sub CreateInterface {	Line 109 sub CreateInterface {
$Ptr .= '<td align="left">'."\n";	$Ptr .= '<td align="left">'."\n";
my @sections = split(':',$cache->{'sectionList'});	my @sections = split(':',$cache->{'sectionList'});
my @sectionsSelected = split(':',$cache->{'sectionsSelected'});	my @sectionsSelected = split(':',$cache->{'sectionsSelected'});
$Ptr .= &Apache::lonhtmlcommon::MultipleSectionSelect(\@sections,	$Ptr .= &Apache::lonstatistics::SectionSelect('Section','multiple',5);
\@sectionsSelected,
'Statistics');
$Ptr .= '</td></tr>'."\n";	$Ptr .= '</td></tr>'."\n";
$Ptr .= '</table>';	$Ptr .= '</table>';

Line 270 sub GraphData {	Line 267 sub GraphData {
my $Freq;	my $Freq;
if ($totalProblems >= 100 ) {	if ($totalProblems >= 100 ) {
$xlabel = 'Percentage_of_Problems_Correct';	$xlabel = 'Percentage_of_Problems_Correct';
$Freq=100;	$Freq=101;
} else {	} else {
$xlabel = 'Number_of_Problems_Correct';	$xlabel = 'Number_of_Problems_Correct';
$Freq = $cId;	$Freq = $cId;