--- loncom/interface/lonchatfetch.pm 2006/06/27 00:12:23 1.27 +++ loncom/interface/lonchatfetch.pm 2006/06/28 23:56:09 1.28 @@ -1,7 +1,7 @@ # The LearningOnline Network # Chat Fetching # -# $Id: lonchatfetch.pm,v 1.27 2006/06/27 00:12:23 albertel Exp $ +# $Id: lonchatfetch.pm,v 1.28 2006/06/28 23:56:09 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -48,8 +48,9 @@ sub handler { my $cdom=$env{'course.'.$env{'request.course.id'}.'.domain'}; if (defined($env{'form.group'})) { $group = $env{'form.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'}))) { return HTTP_NOT_ACCEPTABLE; } my %curr_groups = &Apache::longroup::coursegroups($cdom,$cnum,$group);