--- loncom/interface/spreadsheet/assesscalc.pm 2004/12/08 00:15:18 1.35 +++ loncom/interface/spreadsheet/assesscalc.pm 2005/02/05 06:56:24 1.36 @@ -1,5 +1,5 @@ # -# $Id: assesscalc.pm,v 1.35 2004/12/08 00:15:18 albertel Exp $ +# $Id: assesscalc.pm,v 1.36 2005/02/05 06:56:24 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -337,15 +337,16 @@ sub parmval { # # check course return $courseopt{$courselevelr} if (defined($courseopt{$courselevelr})); - return $courseopt{$courselevelm} if (defined($courseopt{$courselevelm})); - return $courseopt{$courselevel} if (defined($courseopt{$courselevel})); # check map parms my $thisparm = $parmhash{$symbparm}; return $thisparm if (defined($thisparm)); # check default $thisparm = &Apache::lonnet::metadata($fn,$rwhat.'.default'); return $thisparm if (defined($thisparm)); - # + # check more course + return $courseopt{$courselevelm} if (defined($courseopt{$courselevelm})); + return $courseopt{$courselevel} if (defined($courseopt{$courselevel})); + # Cascade Up my $space=$what; $space=~s/\.[^._]+$//;