version 1.8, 2012/08/17 22:43:03
|
version 1.9, 2015/02/22 19:31:38
|
Line 238 system('/bin/chown',"www:www","$dompath/
|
Line 238 system('/bin/chown',"www:www","$dompath/
|
# Log with domainconfiguser in nohist_rolelog.db |
# Log with domainconfiguser in nohist_rolelog.db |
my $domconfiguser = $domain.'-domainconfig'; |
my $domconfiguser = $domain.'-domainconfig'; |
my $subdir = $domconfiguser; |
my $subdir = $domconfiguser; |
$subdir =~ s/(.)(.)(.).*/$1\/$2\/$3/; |
$subdir =~ s/^(.)(.)(.).*$/$1\/$2\/$3/; |
|
|
my $rolelogref = &LONCAPA::locking_hash_tie("$dompath/$subdir/$domconfiguser/nohist_rolelog.db",&GDBM_WRCREAT()); |
my $rolelogref = &LONCAPA::locking_hash_tie("$dompath/$subdir/$domconfiguser/nohist_rolelog.db",&GDBM_WRCREAT()); |
my $domlogkey = &LONCAPA::escape($now.'00000'.$$.'000000'); |
my $domlogkey = &LONCAPA::escape($now.'00000'.$$.'000000'); |