loncom/interface/lonparmset.pm - diff

Return to lonparmset.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.265, 2005/11/11 23:07:27	version 1.266, 2005/11/14 14:01:52
Line 316 sub storeparm_by_symb {	Line 316 sub storeparm_by_symb {
# store parameter	# store parameter
&storeparm_by_symb_inner	&storeparm_by_symb_inner
($symb,$spnam,$snum,$nval,$ntype,$uname,$udom,$csec);	($symb,$spnam,$snum,$nval,$ntype,$uname,$udom,$csec);
	# don't do anything if parameter was reset
	unless ($nval) { return; }
my ($prefix,$parm)=($spnam=~/^(.*[\_\.])([^\_\.]+)$/);	my ($prefix,$parm)=($spnam=~/^(.*[\_\.])([^\_\.]+)$/);
# remember that this was set	# remember that this was set
$recstack{$parm}=1;	$recstack{$parm}=1;