loncom/interface/statistics/lonstathelpers.pm - diff

Return to lonstathelpers.pm CVS log

Up to [LON-CAPA] / loncom / interface / statistics

version 1.65, 2011/03/12 02:58:49	version 1.67, 2011/07/04 09:25:02
Line 145 sub problem_selector {	Line 145 sub problem_selector {
if ($onclick) {	if ($onclick) {
$jsadd="onClick='$onclick'";	$jsadd="onClick='$onclick'";
}	}
$Str = &Apache::loncommon::start_scrollbox(($smallbox?'520px':'620px'),	$Str = &Apache::loncommon::start_scrollbox(($smallbox?'420px':'620px'),
($smallbox?'500px':'600px'),	($smallbox?'400px':'600px'),
($smallbox?'50px':'300px')).	($smallbox?'60px':'300px')).
&Apache::loncommon::start_data_table();	&Apache::loncommon::start_data_table();
my $rb_count =0;	my $rb_count =0;
my ($navmap,@sequences) =	my ($navmap,@sequences) =
Line 1004 prior to every analysis lookup.	Line 1004 prior to every analysis lookup.
sub ensure_proper_cache {	sub ensure_proper_cache {
my ($symb) = @_;	my ($symb) = @_;
my $cid = $env{'request.course.id'};	my $cid = $env{'request.course.id'};
my $new_filename = '/home/httpd/perl/tmp/'.	my $new_filename = LONCAPA::tempdir() .
'problemanalysis_'.$cid.'_analysis_cache.db';	'problemanalysis_'.$cid.'_analysis_cache.db';
if (! defined($cache_filename) \|\|	if (! defined($cache_filename) \|\|
$cache_filename ne $new_filename \|\|	$cache_filename ne $new_filename \|\|