version 1.122, 2005/04/07 07:34:52
|
version 1.123, 2005/04/08 13:44:43
|
Line 710 sub html_initialize {
|
Line 710 sub html_initialize {
|
$Str .= "<pre>"; |
$Str .= "<pre>"; |
$r->print($Str); |
$r->print($Str); |
$r->rflush(); |
$r->rflush(); |
|
# |
|
# Let the user know what we are doing |
|
my $studentcount = scalar(@Apache::lonstatistics::Students); |
|
if ($env{'form.SelectedStudent'}) { |
|
$studentcount = '1'; |
|
} |
|
# |
|
# Initialize progress window |
|
%prog_state=&Apache::lonhtmlcommon::Create_PrgWin |
|
($r,'HTML Chart Status', |
|
'HTML Chart Progress', $studentcount, |
|
'inline',undef,'Statistics','stats_status'); |
|
# |
|
&Apache::lonhtmlcommon::Update_PrgWin($r,\%prog_state, |
|
'Processing first student'); |
return; |
return; |
} |
} |
|
|
Line 822 sub html_outputstudent {
|
Line 837 sub html_outputstudent {
|
$r->print($Str); |
$r->print($Str); |
# |
# |
$r->rflush(); |
$r->rflush(); |
|
&Apache::lonhtmlcommon::Increment_PrgWin($r,\%prog_state,'last student'); |
return; |
return; |
} |
} |
|
|
Line 839 sub html_finish {
|
Line 855 sub html_finish {
|
} |
} |
} |
} |
$r->rflush(); |
$r->rflush(); |
|
&Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state); |
undef($navmap); |
undef($navmap); |
return; |
return; |
} |
} |