--- loncom/interface/courseprefs.pm	2016/03/23 02:19:09	1.77
+++ loncom/interface/courseprefs.pm	2016/05/13 19:03:36	1.78
@@ -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.78 2016/05/13 19:03:36 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -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]',