--- loncom/interface/statistics/lonproblemstatistics.pm 2003/04/01 17:00:24 1.49 +++ loncom/interface/statistics/lonproblemstatistics.pm 2003/06/10 19:19:57 1.52 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonproblemstatistics.pm,v 1.49 2003/04/01 17:00:24 matthew Exp $ +# $Id: lonproblemstatistics.pm,v 1.52 2003/06/10 19:19:57 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -62,7 +62,7 @@ my @Fields = ( align => 'right', color => '#FFFFE6' }, { name => 'container', - title => 'Container', + title => 'Sequence or Folder', align => 'left', color => '#FFFFE6', sortable => 'yes' }, @@ -177,6 +177,7 @@ sub CreateInterface { $Str .= ''."\n"; $Str .= ''; $Str .= ''; + $Str .= ''; $Str .= ''; $Str .= ''; $Str .= ''."\n"; @@ -184,6 +185,8 @@ sub CreateInterface { $Str .= ''."\n"; $Str .= '
SectionsEnrollment StatusSequences and FoldersOutput
'."\n"; $Str .= &Apache::lonstatistics::SectionSelect('Section','multiple',5); $Str .= ''; + $Str .= &Apache::lonhtmlcommon::StatusOptions(undef,undef,5); + $Str .= ''; # my $only_seq_with_assessments = sub { my $s=shift; @@ -199,6 +202,7 @@ sub CreateInterface { $Str .= &CreateAndParseOutputSelector(); $Str .= '
'."\n"; + $Str .= ''; return $Str; } @@ -359,14 +363,6 @@ sub BuildProblemStatisticsPage { '" />'); $r->print(''); if (! exists($ENV{'form.statsfirstcall'})) { - $r->print(< - -Please make your selections in the boxes above and hit -the button marked "Update Display". - -

-ENDMSG return; } # @@ -783,7 +779,6 @@ sub plot_statistics { } } return if (! defined($sortfield) || $sortfield eq ''); - &Apache::lonnet::logthis('data field = '.$datafield); # my $Max = 0; my $problem_num = 0;