--- loncom/interface/courseprefs.pm	2016/03/23 02:19:09	1.77
+++ loncom/interface/courseprefs.pm	2016/05/13 22:57:45	1.79
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set configuration settings for a course
 #
-# $Id: courseprefs.pm,v 1.77 2016/03/23 02:19:09 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 @@ sub display_loncaparev_constraints {
                     }
                 }
             }
-            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);
@@ -2734,7 +2734,7 @@ sub display_loncaparev_constraints {
     if (keys(%comm_blocks) > 0) {
         foreach my $block (keys(%comm_blocks)) {
             if ($block =~ /^firstaccess____(.+)$/) {
-                my $rev = $Apache::lonnet::needsrelease{'course:commblock:timer:'};
+                my $rev = $Apache::lonnet::needsrelease{'course:commblock:timer'};
                 if (ref($comm_blocks{$block}) eq 'HASH') {
                     push(@{$fromblocks{'timer'}{$rev}},&unescape($comm_blocks{$block}{'event'}).
                          ' '.&mt('set by [_1]',
@@ -2749,14 +2749,14 @@ sub display_loncaparev_constraints {
                 if (ref($comm_blocks{$block}{'blocks'}) eq 'HASH') {
                     if (ref($comm_blocks{$block}{'blocks'}{'docs'}) eq 'HASH') {
                         if (keys(%{$comm_blocks{$block}{'blocks'}{'docs'}}) > 0) {
-                            my $rev = $Apache::lonnet::needsrelease{'course:commblock:docs:'};
+                            my $rev = $Apache::lonnet::needsrelease{'course:commblock:docs'};
                             push(@{$fromblocks{'docs'}{$rev}},&unescape($comm_blocks{$block}{'event'}).
                                  ' '.
                                  &mt('set by [_1]',
                                      &Apache::loncommon::plainname(split(/:/,$comm_blocks{$block}{'setter'}))));
                         }
                     } elsif ($comm_blocks{$block}{'blocks'}{'printout'} eq 'on') {
-                        my $rev = $Apache::lonnet::needsrelease{'course:commblock:printout:'};
+                        my $rev = $Apache::lonnet::needsrelease{'course:commblock:printout'};
                         push(@{$fromblocks{'printout'}{$rev}},&unescape($comm_blocks{$block}{'event'}).
                              ' '.
                              &mt('set by [_1]',