Fix incorrect port of test skippage in 5e65042b
Peter Rabbitson
7 years ago
38 | 38 | |
39 | 39 | for my $prefix (shuffle keys %$env2optdep) { SKIP: { |
40 | 40 | |
41 | my ($dsn, $user, $pass) = map { $ENV{"${prefix}_$_"} } qw/DSN USER PASS/; | |
42 | next unless $dsn; | |
43 | ||
41 | 44 | skip ("Testing with ${prefix}_DSN needs " . DBIx::Class::Optional::Dependencies->req_missing_for( $env2optdep->{$prefix} ), 1) |
42 | 45 | unless DBIx::Class::Optional::Dependencies->req_ok_for($env2optdep->{$prefix}); |
43 | ||
44 | my ($dsn, $user, $pass) = map { $ENV{"${prefix}_$_"} } qw/DSN USER PASS/; | |
45 | 46 | |
46 | 47 | note "Testing with ${prefix}_DSN"; |
47 | 48 |