1
0
Fork 0
mirror of https://github.com/DBD-SQLite/DBD-SQLite synced 2025-06-07 14:19:10 -04:00

skip virtual_table tests if $FindBin::Bin points to a nonexistent path for some reason

This commit is contained in:
Kenichi Ishigaki 2014-12-18 17:20:50 +09:00
parent 895c83ce76
commit 491d5e641b
2 changed files with 4 additions and 0 deletions

View file

@ -11,6 +11,8 @@ use Test::More;
use Test::NoWarnings;
use FindBin;
plan skip_all => "\$FindBin::Bin points to a nonexistent path for some reason: $FindBin::Bin" if !-d $FindBin::Bin;
plan tests => 13;
my $dbh = connect_ok( RaiseError => 1, PrintError => 0, AutoCommit => 1 );

View file

@ -10,6 +10,8 @@ use Test::More;
use Test::NoWarnings;
use FindBin;
plan skip_all => "\$FindBin::Bin points to a nonexistent path for some reason: $FindBin::Bin" if !-d $FindBin::Bin;
my $dbfile = "tmp.sqlite";
my @tests = (