--- loncom/interface/lonparmset.pm 2007/11/17 02:50:49 1.387 +++ loncom/interface/lonparmset.pm 2007/12/01 03:45:17 1.388 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.387 2007/11/17 02:50:49 albertel Exp $ +# $Id: lonparmset.pm,v 1.388 2007/12/01 03:45:17 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2599,8 +2599,8 @@ sub parse_listdata_key { $realm=~s/\.type//; } # split into resource+part and parameter name - my ($res, $parm) = ($realm=~/^(.*)\.(.*)$/); - my ($res, $part) = ($res =~/^(.*)\.(.*)$/); + my ($res, $parm) = ($realm=~/^(.*)\.(.*)$/); + ($res, my $part) = ($res =~/^(.*)\.(.*)$/); return ($student,$res,$part,$parm); }