loncom/interface/lonparmset.pm - diff

Return to lonparmset.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.138, 2003/11/21 18:18:04	version 1.139, 2003/11/21 19:54:42
Line 131 sub parmval {	Line 131 sub parmval {

# -------------------------------------------------------- first, check default	# -------------------------------------------------------- first, check default

if ($def) { $outpar[11]=$def; $result=11; }	if (defined($def)) { $outpar[11]=$def; $result=11; }

# ----------------------------------------------------- second, check map parms	# ----------------------------------------------------- second, check map parms

my $thisparm=$parmhash{$symbparm};	my $thisparm=$parmhash{$symbparm};
if ($thisparm) { $outpar[10]=$thisparm; $result=10; }	if (defined($thisparm)) { $outpar[10]=$thisparm; $result=10; }

# --------------------------------------------------------- third, check course	# --------------------------------------------------------- third, check course