version 1.25, 2002/11/18 20:44:15
|
version 1.26, 2003/01/04 15:04:12
|
Line 251 foreach my $m (@metalist) {
|
Line 251 foreach my $m (@metalist) {
|
# -------------------------------------------------- Copy over the new db-files |
# -------------------------------------------------- Copy over the new db-files |
system('mv '.$prodir.'/nohist_new_resevaldata.db '. |
system('mv '.$prodir.'/nohist_new_resevaldata.db '. |
$prodir.'/nohist_resevaldata.db'); |
$prodir.'/nohist_resevaldata.db'); |
|
system('chown www:www '.$prodir.'/nohist_resevaldata.db'); |
} |
} |
# --------------------------------------------------- Close database connection |
# --------------------------------------------------- Close database connection |
$dbh->disconnect; |
$dbh->disconnect; |