mirror of
https://github.com/DBD-SQLite/DBD-SQLite
synced 2025-06-07 14:19:10 -04:00
skip count was wrong, and SKIP label should be needed; (http://www.cpantesters.org/cpan/report/b764d8a6-ac8f-11e0-a4ca-75a0d72a4e93)
This commit is contained in:
parent
e40b755564
commit
ba6a22c375
1 changed files with 5 additions and 2 deletions
|
@ -75,8 +75,11 @@ foreach my $call_func (@CALL_FUNCS) {
|
|||
my $pid = fork;
|
||||
if (!defined($pid)) {
|
||||
# fork failed
|
||||
skip("No fork here", 1);
|
||||
skip("No fork here", 1);
|
||||
SKIP: {
|
||||
skip("No fork here", 3);
|
||||
}
|
||||
$dbh->disconnect;
|
||||
unlink $dbfile;
|
||||
} elsif (!$pid) {
|
||||
# child
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue