version 1.26, 2010/09/26 01:57:21
|
version 1.27, 2010/11/13 04:45:17
|
Line 292 sub group_changes {
|
Line 292 sub group_changes {
|
if (@changegroups > 0) { |
if (@changegroups > 0) { |
my %currpriv; |
my %currpriv; |
my $extra = &Apache::lonnet::freeze_escape({'skipcheck' => 1}); |
my $extra = &Apache::lonnet::freeze_escape({'skipcheck' => 1}); |
my %roleshash = &Apache::lonnet::dump('roles',$udom,$uname,$cid,'.',undef,$extra); |
my %roleshash = &Apache::lonnet::dump('roles',$udom,$uname,$cid,undef,$extra); |
if (my $tmp = &Apache::lonnet::error(%roleshash)) { |
if (my $tmp = &Apache::lonnet::error(%roleshash)) { |
&Apache::lonnet::logthis('Error retrieving roles: '.$tmp. |
&Apache::lonnet::logthis('Error retrieving roles: '.$tmp. |
' for '.$uname.':'.$udom); |
' for '.$uname.':'.$udom); |