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 lib qw(t/backcompat/0.04006/lib);
   6 use dbixcsl_common_tests;
   7 use dbixcsl_test_dir qw/$tdir/;
   8
   9 use Test::More;
  10
  11 eval { require DBD::SQLite };
  12 my $class = $@ ? 'SQLite2' : 'SQLite';
  13
  14 dbixcsl_common_tests->new(
  15         vendor          => 'SQLite',
  16         auto_inc_pk     => 'INTEGER NOT NULL PRIMARY KEY',
  17         dsn             => "dbi:$class:dbname=$tdir/sqlite_test",
  18         user            => '',
  19         password        => '',
  20 )->run_tests;
  21
  22 END {
  23     unlink "$tdir/sqlite_test" if $ENV{SCHEMA_LOADER_TESTS_BACKCOMPAT};
  24 }