![[BACK]](/icons/back.gif){kind=icon}
Return to lonparmset.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to lonparmset.pm CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.61, 2002/08/16 20:47:26 | version 1.61.2.1, 2002/08/29 03:57:45 |
|---|---|
| Line 591 sub assessparms { | Line 591 sub assessparms { |
| $ids[$#ids+1]=$id; | $ids[$#ids+1]=$id; |
| $typep{$id}=$1; | $typep{$id}=$1; |
| $keyp{$id}=''; | $keyp{$id}=''; |
| foreach (split(/\,/,&Apache::lonnet::metadata($srcf,'keys'))) { | foreach (split(/\,/,&Apache::lonnet::metadata($srcf,'allpossiblekeys'))) { |
| if ($_=~/^parameter\_(.*)/) { | if ($_=~/^parameter\_(.*)/) { |
| my $key=$_; | my $key=$_; |
| my $allkey=$1; | my $allkey=$1; |