--- loncom/interface/statistics/lonstudentassessment.pm 2003/06/11 15:04:55 1.57 +++ loncom/interface/statistics/lonstudentassessment.pm 2003/06/11 16:19:39 1.58 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstudentassessment.pm,v 1.57 2003/06/11 15:04:55 matthew Exp $ +# $Id: lonstudentassessment.pm,v 1.58 2003/06/11 16:19:39 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -149,6 +149,7 @@ sub BuildStudentAssessmentPage { $r->print(''); $r->rflush(); + # if (! exists($ENV{'form.notfirstrun'}) && ! $single_student_mode) { return; } @@ -292,8 +293,12 @@ sub CreateInterface { $Str .= 'Student Data'; $Str .= 'Enrollment Status'; $Str .= 'Sequences and Folders'; - $Str .= 'Output Format'; - $Str .= 'Output Data'; + $Str .= 'Output Format'. + &Apache::loncommon::help_open_topic("Chart_Output_Formats"). + ''; + $Str .= 'Output Data'. + &Apache::loncommon::help_open_topic("Chart_Output_Data"). + ''; $Str .= ''."\n"; # $Str .= ''."\n"; @@ -379,7 +384,7 @@ my @OutputOptions = sub OutputDescriptions { my $Str = ''; - $Str .= "

Output Modes

\n"; + $Str .= "

Output Formats

\n"; $Str .= "
\n"; foreach my $outputmode (@OutputOptions) { $Str .="
".$outputmode->{'name'}."
\n"; @@ -489,6 +494,7 @@ my @OutputDataOptions = sub HTMLifyOutputDataDescriptions { my $Str = ''; + $Str .= "

Output Data

\n"; $Str .= "
\n"; foreach my $option (@OutputDataOptions) { $Str .= '
'.$option->{'name'}.'
';