[LON-CAPA-cvs] cvs: loncom(version_2_3_X) /interface lonparmset.pm

[albertel]

albertel		Thu Jan 18 16:02:21 2007 EDT

  Modified files:              (Branch: version_2_3_X)
    /loncom/interface	lonparmset.pm 
  Log:
  - backport 1.358
  
  
Index: loncom/interface/lonparmset.pm
diff -u loncom/interface/lonparmset.pm:1.350.2.4 loncom/interface/lonparmset.pm:1.350.2.5
--- loncom/interface/lonparmset.pm:1.350.2.4	Sat Jan  6 09:52:30 2007
+++ loncom/interface/lonparmset.pm	Thu Jan 18 16:02:20 2007
@@ -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 @@
     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 @@
             $r->print('You may undelete previously deleted fields.<br />Check those you wish to undelete and click Undelete.<br />');
             $r->print('<form method="post" action="">');
             foreach my $key(keys(%$fields)) {
-                $r->print('<input type="checkbox" name="undelete" value="'.$key.'" />'.$$fields{$key}.'<br /');
+                $r->print('<input type="checkbox" name="undeletefield" value="'.$key.'" />'.$$fields{$key}.'<br /');
             }
             $r->print('<input type="submit" name="undelete" value="Undelete" />');
             $r->print('</form>');