--- loncom/interface/lonparmset.pm 2007/01/06 14:52:30 1.350.2.4 +++ loncom/interface/lonparmset.pm 2007/01/18 21:02:20 1.350.2.5 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.350.2.4 2007/01/06 14:52:30 albertel Exp $ +# $Id: lonparmset.pm,v 1.350.2.5 2007/01/18 21:02:20 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3310,7 +3310,7 @@ sub addmetafield { my $dom = $env{'course.'.$env{'request.course.id'}.'.domain'}; my $crs = $env{'course.'.$env{'request.course.id'}.'.num'}; if (exists($env{'form.undelete'})) { - my @meta_fields = &Apache::loncommon::get_env_multiple('form.undelete'); + my @meta_fields = &Apache::loncommon::get_env_multiple('form.undeletefield'); foreach my $meta_field(@meta_fields) { my $options = $env{'course.'.$env{'request.course.id'}.'.metadata.'.$meta_field.'.options'}; $options =~ s/deleted//; @@ -3339,7 +3339,7 @@ sub addmetafield { $r->print('You may undelete previously deleted fields.
Check those you wish to undelete and click Undelete.
'); $r->print('
'); foreach my $key(keys(%$fields)) { - $r->print(''.$$fields{$key}.'
print(''.$$fields{$key}.'
print(''); $r->print('
');