prevent %runcert hash growth when clearing items
This commit is contained in:
@@ -632,9 +632,9 @@ sub stopserver {
|
||||
foreach my $server (@killservers) {
|
||||
if($run{$server}) {
|
||||
$pidlist .= "$run{$server} ";
|
||||
$runcert{$server} = 0;
|
||||
$run{$server} = 0;
|
||||
}
|
||||
$runcert{$server} = 0 if($runcert{$server});
|
||||
}
|
||||
killpid($verbose, $pidlist);
|
||||
#
|
||||
@@ -2542,9 +2542,9 @@ sub singletest {
|
||||
foreach my $server (@killservers) {
|
||||
if($run{$server}) {
|
||||
$pidlist .= "$run{$server} ";
|
||||
$runcert{$server} = 0;
|
||||
$run{$server} = 0;
|
||||
}
|
||||
$runcert{$server} = 0 if($runcert{$server});
|
||||
}
|
||||
killpid($verbose, $pidlist);
|
||||
#
|
||||
@@ -2920,9 +2920,9 @@ sub stopservers {
|
||||
}
|
||||
}
|
||||
$pidlist .= "$run{$server} ";
|
||||
$runcert{$server} = 0;
|
||||
$run{$server} = 0;
|
||||
}
|
||||
$runcert{$server} = 0 if($runcert{$server});
|
||||
}
|
||||
killpid($verbose, $pidlist);
|
||||
#
|
||||
|
||||
Reference in New Issue
Block a user