--- loncom/interface/statistics/lonproblemanalysis.pm 2009/04/21 13:28:23 1.137
+++ loncom/interface/statistics/lonproblemanalysis.pm 2012/05/12 03:10:17 1.142.2.1
@@ -1,6 +1,6 @@
# The LearningOnline Network with CAPA
#
-# $Id: lonproblemanalysis.pm,v 1.137 2009/04/21 13:28:23 bisitz Exp $
+# $Id: lonproblemanalysis.pm,v 1.142.2.1 2012/05/12 03:10:17 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -73,6 +73,8 @@ sub BuildProblemAnalysisPage {
#
&Apache::lonstatistics::PrepareClasslist();
#
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs('Detailed Problem Analysis'));
+
$r->print(&CreateInterface());
#
my @Students = @Apache::lonstatistics::Students;
@@ -142,7 +144,7 @@ sub BuildProblemAnalysisPage {
my $resource = $current_problem->{'resource'};
$r->print('
'.$resource->compTitle.'
');
$r->print(''.$resource->src.'
');
- $r->print(''.&Apache::lonstatistics::section_and_enrollment_description().'
');
+ $r->print(''.&Apache::lonstatistics::section_and_enrollment_description().'
');
if ($env{'form.show_prob'} eq 'true') {
$r->print('
'
.&Apache::lonstathelpers::render_resource($resource)
@@ -626,10 +628,7 @@ sub numerical_determine_answers {
my ($r,$resource,$partid,$respid,$students)=@_;
my $c = $r->connection();
#
- my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin
- ($r,'Student Answer Compilation Status',
- 'Student Answer Compilation Progress', scalar(@$students),
- 'inline',undef,'Statistics','stats_status');
+ my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,scalar(@$students));
#
# Read in the cache (if it exists) before we start timing things.
&Apache::lonstathelpers::ensure_proper_cache($resource->{'symb'});
@@ -663,7 +662,7 @@ sub numerical_determine_answers {
}
$answers{$correct->{$sname.':'.$sdom}{'answer'}}++;
&Apache::lonhtmlcommon::Increment_PrgWin($r,\%prog_state,
- &mt('last student'));
+ 'last student');
}
&Apache::lonstathelpers::write_analysis_cache();
&Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);
@@ -1875,7 +1874,6 @@ sub CreateInterface {
##
## Build the menu
my $Str = '';
- $Str .= &Apache::lonhtmlcommon::breadcrumbs('Detailed Problem Analysis');
$Str .= '';
$Str .= &Apache::loncommon::start_data_table();
$Str .= &Apache::loncommon::start_data_table_header_row();
@@ -1901,16 +1899,16 @@ sub CreateInterface {
#
##
##
- $Str .= '
';
+ $Str .= ' | ';
##
my $showprob_checkbox =
- '';
$Str.= ' ';
##
my $analyze_selector = ' |