--- loncom/interface/longroup.pm 2009/01/27 15:59:30 1.18 +++ loncom/interface/longroup.pm 2009/01/30 16:13:04 1.19 @@ -28,6 +28,7 @@ package Apache::longroup; use strict; use Apache::lonnet; +use Apache::lonlocal; ############################################### =pod @@ -437,12 +438,12 @@ sub group_changes { sub get_fixed_privs { my $fixedprivs = { - email => {sgm => 1}, - discussion => {vgb => 1}, - chat => {pgc => 1}, - files => {rgf => 1}, - roster => {vgm => 1}, - homepage => {vgh => 1}, + communication => {sgm => 1}, + discussion => {vgb => 1}, + chat => {pgc => 1}, + files => {rgf => 1}, + roster => {vgm => 1}, + homepage => {vgh => 1}, }; return $fixedprivs; } @@ -452,7 +453,7 @@ sub get_fixed_privs { sub get_tool_privs { my ($gpterm) = @_; my $toolprivs = { - email => { + communication => { sgm => 'Send '.$gpterm.' message', sgb => 'Broadcast message', },