--- loncom/interface/lonblockingstatus.pm	2020/09/08 03:57:48	1.14.2.2
+++ loncom/interface/lonblockingstatus.pm	2020/09/08 04:04:31	1.14.2.2.2.1
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # displays the blocking status table
 #
-# $Id: lonblockingstatus.pm,v 1.14.2.2 2020/09/08 03:57:48 raeburn Exp $
+# $Id: lonblockingstatus.pm,v 1.14.2.2.2.1 2020/09/08 04:04:31 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -44,7 +44,7 @@ sub handler {
     return OK if $r->header_only;
 
     my (%activities,$activity,$origurl);
-    map { $activities{$_} = 1; } ('boards','chat','com','blogs','groups','port','printout','docs','passwd');
+    map { $activities{$_} = 1; } ('boards','chat','com','blogs','groups','port','printout','docs','grades','passwd');
 
     # determine what kind of blocking we want details for
     &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['activity','url']);
@@ -53,7 +53,7 @@ sub handler {
     my $title = 'Communication Blocking Status Information';
 
     if (($activity eq 'docs') || ($activity eq 'printout') ||
-        ($activity eq 'passwd')) {
+        ($activity eq 'grades') || ($activity eq 'passwd')) {
         $title = 'Blocking Status Information';
         if ($activity eq 'docs') {
             $origurl = $env{'form.url'};
@@ -122,13 +122,15 @@ sub blockpage {
                    printout   => 'Printout generation', 
                    docs       => 'Course Content',
                    passwd     => 'Changing of passwords',
+                   grades     => 'Course Gradebook',
                 );
 
     if ($activity eq 'groups' || $activity eq 'boards') {
         if (&Apache::loncommon::course_type() eq 'Community') {
             $descs{'boards'} = 'Discussion posts in this community';
             $descs{'groups'} = 'Groups in this community';
-            $descs{'docs'} = 'Community Content';  
+            $descs{'docs'} = 'Community Content';
+            $descs{'grades'} = 'Community Gradebook';
         }
     }
 
@@ -152,7 +154,7 @@ sub blockpage {
                          . ' view will be unavailable between [_1] and [_2] because'
                          . ' access to selected '.$description.' is being blocked.'
                          ,$showstart, $showend);
-        } elsif (($activity eq 'printout') || ($activity eq 'passwd')) {
+        } elsif (($activity eq 'printout') || ($activity eq 'passwd') || ($activity eq 'grades')) {
             $output = mt( $description
                           . ' will be unavailable between [_1] and [_2] because'
                           . ' this functionality is being blocked.'