loncom/interface/spreadsheet/assesscalc.pm - diff

Return to assesscalc.pm CVS log

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

version 1.35, 2004/12/08 00:15:18	version 1.36, 2005/02/05 06:56:24
Line 337 sub parmval {	Line 337 sub parmval {
#	#
# check course	# check course
return $courseopt{$courselevelr} if (defined($courseopt{$courselevelr}));	return $courseopt{$courselevelr} if (defined($courseopt{$courselevelr}));
return $courseopt{$courselevelm} if (defined($courseopt{$courselevelm}));
return $courseopt{$courselevel} if (defined($courseopt{$courselevel}));
# check map parms	# check map parms
my $thisparm = $parmhash{$symbparm};	my $thisparm = $parmhash{$symbparm};
return $thisparm if (defined($thisparm));	return $thisparm if (defined($thisparm));
# check default	# check default
$thisparm = &Apache::lonnet::metadata($fn,$rwhat.'.default');	$thisparm = &Apache::lonnet::metadata($fn,$rwhat.'.default');
return $thisparm if (defined($thisparm));	return $thisparm if (defined($thisparm));
#	# check more course
	return $courseopt{$courselevelm} if (defined($courseopt{$courselevelm}));
	return $courseopt{$courselevel} if (defined($courseopt{$courselevel}));

# Cascade Up	# Cascade Up
my $space=$what;	my $space=$what;
$space=~s/\.[^._]+$//;	$space=~s/\.[^._]+$//;