--- loncom/interface/lonchatfetch.pm	2010/11/18 23:23:01	1.34.8.1
+++ loncom/interface/lonchatfetch.pm	2009/07/26 16:53:40	1.35
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Chat Fetching
 #
-# $Id: lonchatfetch.pm,v 1.34.8.1 2010/11/18 23:23:01 raeburn Exp $
+# $Id: lonchatfetch.pm,v 1.35 2009/07/26 16:53:40 kalberla Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -63,7 +63,7 @@ sub handler {
 		'<b>'.&unescape($group_info{description}).
 		'</b><br />';
         }
-    } elsif (! &Apache::lonnet::allowed('plc',$env{'request.course.id'}.
+    } elsif (! &Apache::lonnet::allowed('pch',$env{'request.course.id'}.
              ($env{'request.course.sec'}?'/'.$env{'request.course.sec'}:''))
         ) {
         return HTTP_NOT_ACCEPTABLE;
@@ -178,10 +178,16 @@ sub handler {
         $refresh_cmd .= "&amp;group=$group";
     }
     my $headarg;
-    my ($blocked,$blocktext) = &blockstatus();
+    my ($blocked,$blocktext) = blockstatus();
     if ($blocked) {
         $newstuff = $blocktext;
         $headarg =  {'only_body' => 1,};
+
+	$r->print(<<ENDSCRIPT);
+          <script type="text/javascript">
+            parent.location.href="/adm/blockingstatus/?activity=chat"
+          </script>
+ENDSCRIPT
     } else {
         $headarg = {'redirect'  => [5,$refresh_cmd,1],
                                     'only_body' => 1,};