version 1.13, 2007/12/31 16:52:26
|
version 1.14, 2008/01/03 21:16:11
|
Line 400 my $domkey=&LONCAPA::escape('dc:'.$usern
|
Line 400 my $domkey=&LONCAPA::escape('dc:'.$usern
|
$domrolesref->{$domkey}= &LONCAPA::escape('0:'.$now); |
$domrolesref->{$domkey}= &LONCAPA::escape('0:'.$now); |
&LONCAPA::locking_hash_untie($domrolesref); |
&LONCAPA::locking_hash_untie($domrolesref); |
|
|
|
system('/bin/chown',"www:www","$dompath/nohist_domainroles.db"); # Must be writeable by httpd process. |
|
system('/bin/chown',"www:www","$dompath/nohist_domainroles.db.lock"); |
|
|
#Update allusers MySQL table |
#Update allusers MySQL table |
|
|
print "Adding new user to allusers table\n"; |
print "Adding new user to allusers table\n"; |