loncom/interface/loncoursegroups.pm - diff

Return to loncoursegroups.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.24, 2006/05/30 12:46:09	version 1.26, 2006/06/27 18:49:14
Line 421 sub group_administration {	Line 421 sub group_administration {
files => {	files => {
rgf => 'Retrieve',	rgf => 'Retrieve',
ugf => 'Upload',	ugf => 'Upload',
	mgf => 'Modify',
dgf => 'Delete',	dgf => 'Delete',
	agf => 'Control Access',
},	},
roster => {	roster => {
vgm => 'View',	vgm => 'View',
Line 2979 sub process_membership {	Line 2981 sub process_membership {
}	}
} else {	} else {
if (@{$defprivs} > 0) {	if (@{$defprivs} > 0) {
foreach my $priv (@{$defprivs}) {	if (grep/^\Q$priv\E$/,@{$defprivs}) {
foreach my $user (sort(keys(%{$usertools}))) {	foreach my $user (sort(keys(%{$usertools}))) {
if ($$usertools{$user}{$tool}) {	if ($$usertools{$user}{$tool}) {
$group_privs{$user} .= $priv.':';	$group_privs{$user} .= $priv.':';