t/backcompat/0.04006/10sqlite_common.t

   1 use DBIx::Class::Schema::Loader::Optional::Dependencies
   2     -skip_all_without => 'test_backcompat';
   3
   4 use strict;
   5 use warnings;
   6 use lib qw(t/backcompat/0.04006/lib);
   7 use dbixcsl_common_tests;
   8 use dbixcsl_test_dir qw/$tdir/;
   9
  10 use Test::More;
  11
  12 eval { require DBD::SQLite };
  13 my $class = $@ ? 'SQLite2' : 'SQLite';
  14
  15 dbixcsl_common_tests->new(
  16         vendor          => 'SQLite',
  17         auto_inc_pk     => 'INTEGER NOT NULL PRIMARY KEY',
  18         dsn             => "dbi:$class:dbname=$tdir/sqlite_test",
  19         user            => '',
  20         password        => '',
  21 )->run_tests;
  22
  23 END {
  24     unlink "$tdir/sqlite_test" if $ENV{SCHEMA_LOADER_TESTS_BACKCOMPAT};
  25 }