--- loncom/interface/lonchatfetch.pm 2006/11/29 19:45:55 1.32 +++ loncom/interface/lonchatfetch.pm 2010/11/18 23:23:01 1.34.8.1 @@ -1,7 +1,7 @@ # The LearningOnline Network # Chat Fetching # -# $Id: lonchatfetch.pm,v 1.32 2006/11/29 19:45:55 raeburn Exp $ +# $Id: lonchatfetch.pm,v 1.34.8.1 2010/11/18 23:23:01 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -63,7 +63,7 @@ sub handler { ''.&unescape($group_info{description}). '
'; } - } elsif (! &Apache::lonnet::allowed('pch',$env{'request.course.id'}. + } elsif (! &Apache::lonnet::allowed('plc',$env{'request.course.id'}. ($env{'request.course.sec'}?'/'.$env{'request.course.sec'}:'')) ) { return HTTP_NOT_ACCEPTABLE; @@ -186,7 +186,7 @@ sub handler { $headarg = {'redirect' => [5,$refresh_cmd,1], 'only_body' => 1,}; } - my $start_page = &Apache::loncommon::start_page('Chat',undef,$headarg); + my $start_page = &Apache::loncommon::start_page('Chat Room',undef,$headarg); my $end_page = &Apache::loncommon::end_page(); $r->print(<
',$endblocktime); + $output .= &mt('Chat Room will be unavailable to you until [_1] because communication is blocked in one or more of your courses:',$endblocktime).'

'; foreach my $course (keys(%setters)) { my %courseinfo=&Apache::lonnet::coursedescription($course); for (my $i=0; $i<@{$setters{$course}{staff}}; $i++) {