--- loncom/interface/lonchat.pm	2006/04/10 19:59:53	1.13
+++ loncom/interface/lonchat.pm	2008/01/19 21:40:41	1.16
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Chat
 #
-# $Id: lonchat.pm,v 1.13 2006/04/10 19:59:53 albertel Exp $
+# $Id: lonchat.pm,v 1.16 2008/01/19 21:40:41 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -32,6 +32,7 @@ use strict;
 use Apache::Constants qw(:common :http);
 use Apache::loncommon;
 use Apache::lonnet;
+use Apache::lonlocal;
 
 sub handler {
     my $r = shift;
@@ -44,8 +45,9 @@ sub handler {
     if (defined($env{'form.group'})) {
         $group = $env{'form.group'};
         $group_elem = '<input type="hidden" name="group" value="'.$group.'" />'; 
-        if (! &Apache::lonnet::allowed('pgc',$env{'request.course.id'}.'/'.
-                                                                    $group) ) {
+        if ((! &Apache::lonnet::allowed('pgc',$env{'request.course.id'}.'/'.
+                                                                    $group))
+            && (! &Apache::lonnet::allowed('vcg',$env{'request.course.id'}.($env{'request.course.sec'}?'/'.$env{'request.course.sec'}:'')))) {
             return HTTP_NOT_ACCEPTABLE;
         }
     } else {
@@ -67,13 +69,17 @@ sub handler {
 				       {'only_body'   => 1,
 					'add_entries' => \%loaditems,});
     my $end_page = &Apache::loncommon::end_page();
+    my %lt = &Apache::lonlocal::texthash(
+                                        anon => 'Post Anonymous',
+                                        post => 'Post',
+                                      );         
     $r->print(<<ENDDOCUMENT);
 $start_page
 <form method="post" name="chatentry">
 $latexHelp
 <input type="text" size="60" name="newchat">
-<input value="Post Anonymous" name="anonymous" type="submit">
-<input value="Post" name="newentry" type="submit">
+<input value="$lt{'anon'}" name="anonymous" type="submit">
+<input value="$lt{'post'}" name="newentry" type="submit">
 $group_elem
 </form>
 $end_page