Return to longroup.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.17, 2008/12/19 20:10:11 | version 1.18, 2009/01/27 15:59:30 |
---|---|
Line 453 sub get_tool_privs { | Line 453 sub get_tool_privs { |
my ($gpterm) = @_; | my ($gpterm) = @_; |
my $toolprivs = { | my $toolprivs = { |
email => { | email => { |
sgm => 'Send '.$gpterm.' mail', | sgm => 'Send '.$gpterm.' message', |
sgb => 'Broadcast mail', | sgb => 'Broadcast message', |
}, | }, |
discussion => { | discussion => { |
cgb => 'Create boards', | cgb => 'Create boards', |