--- 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'}.'
';
|