the fork method screwed up pathing so you couldn't set config file properties, and probably other things too. reverting to previous revision
This commit is contained in:
parent
a253c67018
commit
6f19a03dba
1 changed files with 6 additions and 12 deletions
|
|
@ -226,18 +226,12 @@ foreach my $filename (keys %config) {
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
if ($upgrade{$upgrade}{pl} ne "") {
|
if ($upgrade{$upgrade}{pl} ne "") {
|
||||||
my $pid = fork;
|
my $cmd = $perl." ".$upgrade{$upgrade}{pl}." --configFile=".$filename;
|
||||||
if (!$pid) {
|
$cmd .= " --quiet" if ($quiet);
|
||||||
@ARGV = ("--configFile=$filename", $quiet ? ('--quiet') : ());
|
if (system($cmd)) {
|
||||||
$0 = $upgrade{$upgrade}{pl};
|
print "\tProcessing upgrade executable failed!\n";
|
||||||
do $0;
|
fatalError();
|
||||||
exit;
|
}
|
||||||
}
|
|
||||||
waitpid $pid, 0;
|
|
||||||
if ($?) {
|
|
||||||
print "\tProcessing upgrade executable failed!\n";
|
|
||||||
fatalError();
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
$config{$filename}{version} = $upgrade{$upgrade}{to};
|
$config{$filename}{version} = $upgrade{$upgrade}{to};
|
||||||
$notRun = 0;
|
$notRun = 0;
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue