loncom/interface/spreadsheet/assesscalc.pm - diff

Return to assesscalc.pm CVS log

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

version 1.11, 2003/05/29 13:39:38	version 1.13, 2003/06/12 21:17:11
Line 140 sub initialize {	Line 140 sub initialize {
########################################################	########################################################
sub initialize_package {	sub initialize_package {
my ($sname,$sdomain) = @_;	my ($sname,$sdomain) = @_;
$current_course = $ENV{'request.course.id'};
$current_name = $sname;	$current_name = $sname;
$current_domain = $sdomain;	$current_domain = $sdomain;
undef(%courseopt);	if ($current_course ne $ENV{'request.course.id'}) {
	$current_course = $ENV{'request.course.id'};
	undef(%courseopt);
	}
&load_cached_export_rows();	&load_cached_export_rows();
&load_parameter_caches();	&load_parameter_caches();
}	}
Line 509 sub excel_rows {	Line 511 sub excel_rows {

sub compute {	sub compute {
my $self = shift;	my $self = shift;
$self->logthis('computing');	# $self->logthis('computing');
$self->initialize_safe_space();	$self->initialize_safe_space();
#########################################	#########################################
#########################################	#########################################
Line 612 sub compute {	Line 614 sub compute {
#	#
# Save the export data	# Save the export data
$self->save_export_data();	$self->save_export_data();
	$self->save() if ($self->need_to_save());
return;	return;
}	}