--- loncom/interface/lonblockingstatus.pm	2016/01/27 00:24:09	1.13
+++ loncom/interface/lonblockingstatus.pm	2020/09/03 14:06:06	1.14.2.1
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # displays the blocking status table
 #
-# $Id: lonblockingstatus.pm,v 1.13 2016/01/27 00:24:09 raeburn Exp $
+# $Id: lonblockingstatus.pm,v 1.14.2.1 2020/09/03 14:06:06 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','msgdisplay','blogs','groups','port','printout','docs','passwd');
+    map { $activities{$_} = 1; } ('boards','chat','com','blogs','groups','port','printout','docs','passwd');
 
     # determine what kind of blocking we want details for
     &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['activity','url']);
@@ -52,9 +52,12 @@ sub handler {
 
     my $title = 'Communication Blocking Status Information';
 
-    if (($activity eq 'docs') || ($activity eq 'printout')) {
+    if (($activity eq 'docs') || ($activity eq 'printout') ||
+        ($activity eq 'passwd')) {
         $title = 'Blocking Status Information';
-        $origurl = $env{'form.url'};
+        if ($activity eq 'docs') {
+            $origurl = $env{'form.url'};
+        }
     }
     $r->print(&Apache::loncommon::start_page($title,undef,
                                             {'only_body' => 1}));
@@ -113,7 +116,7 @@ sub blockpage {
     my %descs = (
                    boards     => 'Discussion posts in this course',
                    chat       => 'Chat Room',
-                   msgdisplay => 'This message',
+                   com        => 'This message',
                    blogs      => 'Blogs',
                    groups     => 'Groups in this course',
                    printout   => 'Printout generation',