Commit 95c87d3b authored by Xavier Guimard's avatar Xavier Guimard

Improve test skips

parent 29b29339
......@@ -2,7 +2,10 @@ use Test::More;
use strict;
use IO::String;
require 't/test-lib.pm';
BEGIN {
require 't/test-lib.pm';
eval "use GSSAPI";
}
my $res;
my $maintests = 21;
......@@ -10,9 +13,9 @@ my $maintests = 21;
eval { unlink 't/userdb.db' };
SKIP: {
eval { require DBI; require DBD::SQLite; };
eval { require DBI; require DBD::SQLite; require GSSAPI; };
if ($@) {
skip 'DBD::SQLite not found', $maintests;
skip 'Missing dependencies', $maintests;
}
my $dbh = DBI->connect("dbi:SQLite:dbname=t/userdb.db");
$dbh->do('CREATE TABLE users (user text,password text,name text)');
......
......@@ -2,7 +2,10 @@ use Test::More;
use strict;
use IO::String;
require 't/test-lib.pm';
BEGIN {
require 't/test-lib.pm';
eval "use GSSAPI";
}
my $res;
my $maintests = 2;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment