loncom/interface/longroup.pm - diff

Return to longroup.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.19, 2009/01/30 16:13:04	version 1.21, 2009/02/13 17:20:29
Line 1	Line 1
# The LearningOnline Network with CAPA	# The LearningOnline Network with CAPA
# accessor routines used to provide information about course groups	# accessor routines used to provide information about course groups
#	#
	# $Id$
	#
# Copyright Michigan State University Board of Trustees	# Copyright Michigan State University Board of Trustees
#	#
# This file is part of the LearningOnline Network with CAPA (LON-CAPA).	# This file is part of the LearningOnline Network with CAPA (LON-CAPA).
Line 438 sub group_changes {	Line 440 sub group_changes {

sub get_fixed_privs {	sub get_fixed_privs {
my $fixedprivs = {	my $fixedprivs = {
communication => {sgm => 1},	email => {sgm => 1},
discussion => {vgb => 1},	discussion => {vgb => 1},
chat => {pgc => 1},	chat => {pgc => 1},
files => {rgf => 1},	files => {rgf => 1},
Line 453 sub get_fixed_privs {	Line 455 sub get_fixed_privs {
sub get_tool_privs {	sub get_tool_privs {
my ($gpterm) = @_;	my ($gpterm) = @_;
my $toolprivs = {	my $toolprivs = {
communication => {	email => {
sgm => 'Send '.$gpterm.' message',	sgm => 'Send '.$gpterm.' message',
sgb => 'Broadcast message',	sgb => 'Broadcast message',
},	},