DBIx-Migration

 view release on metacpan or  search on metacpan

Build.PL  view on Meta::CPAN

    'CPAN::Meta::YAML'      => 0.020,
    'Module::Build'         => 0.42,
    'JSON::PP'              => 4.16
  },
  test_requires => {
    'DBD::SQLite'       => 1.60,        # Has DBD::SQLite::GetInfo module
    'DBD::Mock'         => 0,
    'Test::API'         => 0,
    'Test::DatabaseRow' => 0,
    'Test::Deep'        => 0,
    'Test::Fatal'       => 0,
    'Test::More'        => 1.001005,    # Subtests accept args
    'Test::Output'      => 0,
    'Test::PostgreSQL'  => 0
  },
  recommends => {
    'Test::Needs'         => 0,
    'Test::Pod'           => 1.26,
    'Test::Pod::Coverage' => 1.04,
    'Text::Table::Tiny'   => 1.02
  },

META.json  view on Meta::CPAN

            "perl" : "v5.8.9"
         }
      },
      "test" : {
         "requires" : {
            "DBD::Mock" : "0",
            "DBD::SQLite" : "1.6",
            "Test::API" : "0",
            "Test::DatabaseRow" : "0",
            "Test::Deep" : "0",
            "Test::Fatal" : "0",
            "Test::More" : "1.001005",
            "Test::Output" : "0",
            "Test::PostgreSQL" : "0"
         }
      }
   },
   "provides" : {
      "DBIx::Migration" : {
         "file" : "lib/DBIx/Migration.pm",
         "version" : "0.32"

META.yml  view on Meta::CPAN

---
abstract: 'Seamless database schema up- and downgrades'
author:
  - 'Sebastian Riedel, <kraihx@gmail.com>'
build_requires:
  DBD::Mock: '0'
  DBD::SQLite: '1.6'
  Test::API: '0'
  Test::DatabaseRow: '0'
  Test::Deep: '0'
  Test::Fatal: '0'
  Test::More: '1.001005'
  Test::Output: '0'
  Test::PostgreSQL: '0'
configure_requires:
  CPAN::Meta::Converter: '2.15001'
  CPAN::Meta::YAML: '0.02'
  JSON::PP: '4.16'
  Module::Build: '0.42'
dynamic_config: 1
generated_by: 'Module::Build version 0.4234, CPAN::Meta::Converter version 2.150012'

t/01-basic.t  view on Meta::CPAN

use strict;
use warnings;

use Test::More import => [ qw( BAIL_OUT is is_deeply like note use_ok ) ], tests => 12;
use Test::API import => [ qw( class_api_ok ) ];
use Test::Fatal qw( exception );

use DBI::Const::GetInfoType qw( %GetInfoType );
use Path::Tiny              qw( cwd );

my ( $class, $subclass );

BEGIN {
  $class = 'DBIx::Migration';
  use_ok( $class ) or BAIL_OUT "Cannot load class '$class'!";
  $subclass = 'DBIx::Migration::Pg';

t/04-sqlite.t  view on Meta::CPAN

use strict;
use warnings;

use Test::More import => [ qw( is like note ok plan subtest ) ];
use Test::Deep  qw( cmp_bag );
use Test::Fatal qw( dies_ok exception );

use Path::Tiny qw( cwd tempdir );

eval { require DBD::SQLite };
plan $@ eq '' ? ( tests => 23 ) : ( skip_all => 'DBD::SQLite required' );

require DBIx::Migration;

subtest 'wrong dsn' => sub {
  plan tests => 2;

t/05-postgres.t  view on Meta::CPAN

use strict;
use warnings;

use Path::Tiny qw( cwd );

use lib cwd->child( qw( t lib ) )->stringify;

use Test::More import => [ qw( is note ok plan subtest ) ];
use Test::Fatal qw( dies_ok );
use Test::PgTAP import => [ qw( tables_are ) ];

eval { require Test::PostgreSQL };
plan skip_all => 'Test::PostgreSQL required' unless $@ eq '';

my $pgsql = eval { Test::PostgreSQL->new } or do {
  no warnings 'once';
  plan skip_all => $Test::PostgreSQL::errstr ? $Test::PostgreSQL::errstr : $@;
};
note 'dsn: ', my $dsn = $pgsql->dsn . ';options=--client_min_messages=WARNING';

t/08-sqlite-dbh.t  view on Meta::CPAN

use strict;
use warnings;

use Test::More import => [ qw( is is_deeply like note ok plan subtest ) ];
use Test::Fatal qw( dies_ok exception );

use DBI        ();
use Path::Tiny qw( cwd tempdir );

eval { require DBD::SQLite };
plan $@ eq '' ? ( tests => 16 ) : ( skip_all => 'DBD::SQLite required' );

require DBIx::Migration;

my $tempdir = tempdir( CLEANUP => 1 );

t/10-latest.t  view on Meta::CPAN

use strict;
use warnings;

use Test::More import => [ qw( is ) ], tests => 2;
use Test::Fatal qw( dies_ok );

use Path::Tiny qw( cwd );

require DBIx::Migration;

is +DBIx::Migration->latest( cwd->child( qw( t sql advanced ) )->stringify ), 3,
  'latest() class method call with string "dir"';

dies_ok { DBIx::Migration->latest( cwd->child( qw( t sql invalid ) ) ) }
'latest() throws an exception because "dir" does not contain any valid migrations';