[LON-CAPA-cvs] cvs: loncom /interface courseprefs.pm

[raeburn]

raeburn		Fri May 13 22:57:45 2016 EDT

  Modified files:              
    /loncom/interface	courseprefs.pm 
  Log:
  - Make consistent with lonrelrequtils.pm rev. 1.5 in which the hash:
    %checkparmsmatch was renamed as %checkparmvalsmatch.
  
  
Index: loncom/interface/courseprefs.pm
diff -u loncom/interface/courseprefs.pm:1.78 loncom/interface/courseprefs.pm:1.79
--- loncom/interface/courseprefs.pm:1.78	Fri May 13 19:03:36 2016
+++ loncom/interface/courseprefs.pm	Fri May 13 22:57:45 2016
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set configuration settings for a course
 #
-# $Id: courseprefs.pm,v 1.78 2016/05/13 19:03:36 raeburn Exp $
+# $Id: courseprefs.pm,v 1.79 2016/05/13 22:57:45 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2567,10 +2567,10 @@
                     }
                 }
             }
-            foreach my $item (keys(%Apache::lonrelrequtils::checkparmsmatch)) {
-                if (ref($Apache::lonrelrequtils::checkparmsmatch{$item}) eq 'ARRAY') {
+            foreach my $item (keys(%Apache::lonrelrequtils::checkparmvalsmatch)) {
+                if (ref($Apache::lonrelrequtils::checkparmvalsmatch{$item}) eq 'ARRAY') {
                     my $value = $resourcedata->{$key};
-                    foreach my $valuematch (@{$Apache::lonrelrequtils::checkparmsmatch{$item}}) {
+                    foreach my $valuematch (@{$Apache::lonrelrequtils::checkparmvalsmatch{$item}}) {
                         if ($value =~ /$valuematch/) {
                             my $stdtype = &Apache::lonparmset::standard_parameter_types($item);
                             $found{$item}{'valname'} = &get_param_description($stdtype,$value,1);