loncom/interface/lonstatistics.pm - diff

Return to lonstatistics.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.89, 2003/10/29 15:22:30	version 1.91, 2003/11/16 21:20:47
Line 1158 sub handler {	Line 1158 sub handler {
&Apache::loncoursedata::delete_caches($ENV{'requres.course.id'});	&Apache::loncoursedata::delete_caches($ENV{'requres.course.id'});
}	}
#	#
# Set up the statistics and chart environment
&PrepareClasslist();
&PrepareCourseData($r);
#
# Begin form output	# Begin form output
$r->print('<form name="Statistics" ');	$r->print('<form name="Statistics" ');
$r->print('method="post" action="/adm/statistics">');	$r->print('method="post" action="/adm/statistics">');
$r->rflush();	$r->rflush();
#	#
my $GoToPage = $ENV{'form.reportSelected'};	my $GoToPage = $ENV{'form.reportSelected'};
	#
	# Set up the statistics and chart environment
	&PrepareCourseData($r);
	#
$r->print('<input type="hidden" name="reportSelected" value="'.	$r->print('<input type="hidden" name="reportSelected" value="'.
$GoToPage.'">');	$GoToPage.'">');
if($GoToPage eq 'activitylog') {	if($GoToPage eq 'activitylog') {