loncom/interface/loncoursegroups.pm - diff

Return to loncoursegroups.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.25, 2006/06/23 00:22:58	version 1.26, 2006/06/27 18:49:14
Line 2981 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.':';