--- 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++) {