version 1.5, 2012/10/12 12:29:00
|
version 1.6, 2015/03/10 20:19:14
|
Line 232 my $domlogvalue = {
|
Line 232 my $domlogvalue = {
|
$rolelogref->{$domlogkey}=&freeze_escape($domlogvalue); |
$rolelogref->{$domlogkey}=&freeze_escape($domlogvalue); |
&LONCAPA::locking_hash_untie($rolelogref); |
&LONCAPA::locking_hash_untie($rolelogref); |
|
|
system('/bin/chown',"www:www","$dompath/$subdir/nohist_rolelog.db"); # Must be writeable by httpd process. |
system('/bin/chown',"www:www","$dompath/$subdir/$domconfiguser/nohist_rolelog.db"); # Must be writeable by httpd process. |
system('/bin/chown',"www:www","$dompath/$subdir/nohist_rolelog.db.lock"); |
system('/bin/chown',"www:www","$dompath/$subdir/$domconfiguser/nohist_rolelog.db.lock"); |
|
|
# Output success message. |
# Output success message. |
print(&mt('User: [_1], domain coordinator role expired in domain: [_2].',$user,$role_domain)."\n"); |
print(&mt('User: [_1], domain coordinator role expired in domain: [_2].',$user,$role_domain)."\n"); |