loncom/interface/lonspreadsheet.pm - diff

Return to lonspreadsheet.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.146, 2002/11/21 19:05:18	version 1.147, 2002/11/21 19:26:34
Line 2316 sub updatestudentassesssheet {	Line 2316 sub updatestudentassesssheet {
$sheet->{'maxrow'} = 0;	$sheet->{'maxrow'} = 0;
my %existing=();	my %existing=();
# Now obsolete rows	# Now obsolete rows
while (my ($cell, $formula) = each (%f)) {	foreach my $cell (keys(%f)) {
	my $formula = $f{$cell};
next if ($cell !~ /^A(\d+)/);	next if ($cell !~ /^A(\d+)/);
$sheet->{'maxrow'} = $1 if ($1 > $sheet->{'maxrow'});	$sheet->{'maxrow'} = $1 if ($1 > $sheet->{'maxrow'});
my ($usy,$ufn)=split(/__&&&\__/,$formula);	my ($usy,$ufn)=split(/__&&&\__/,$formula);