DBIx-Class-Storage-TxnEndHook

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

         "requires" : {
            "DBIx::Class" : "0",
            "Try::Tiny" : "0",
            "perl" : "5.008005"
         }
      },
      "test" : {
         "requires" : {
            "DBD::SQLite" : "0",
            "DBI" : "0",
            "Test::Fatal" : "0",
            "Test::More" : "0.98"
         }
      }
   },
   "provides" : {
      "DBIx::Class::Schema::TxnEndHook" : {
         "file" : "lib/DBIx/Class/Schema/TxnEndHook.pm"
      },
      "DBIx::Class::Storage::TxnEndHook" : {
         "file" : "lib/DBIx/Class/Storage/TxnEndHook.pm",

META.yml  view on Meta::CPAN

---
abstract: 'transaction hook provider for DBIx::Class'
author:
  - 'soh335 <sugarbabe335@gmail.com>'
build_requires:
  DBD::SQLite: '0'
  DBI: '0'
  Test::Fatal: '0'
  Test::More: '0.98'
configure_requires:
  Module::Build::Tiny: '0.035'
dynamic_config: 0
generated_by: 'Minilla/v3.1.22, CPAN::Meta::Converter version 2.150010'
license: perl
meta-spec:
  url: http://module-build.sourceforge.net/META-spec-v1.4.html
  version: '1.4'
name: DBIx-Class-Storage-TxnEndHook

cpanfile  view on Meta::CPAN

requires 'perl', '5.008001';
requires 'DBIx::Class';
requires 'Try::Tiny';

on 'test' => sub {
    requires 'Test::More', '0.98';
    requires 'Test::Fatal';
    requires 'DBI';
    requires 'DBD::SQLite';
};

t/01_basic.t  view on Meta::CPAN

use strict;
use warnings;
use Test::More;
use lib qw(t/lib);
use MyApp::Schema;
use Test::Fatal;

sub gen_schema {
    my $schema = MyApp::Schema->connect("dbi:SQLite::memory:", "", "", {
        sqlite_use_immediate_transaction => 1,
    });
}

subtest 'add_txn_end_hook should call in transaction' => sub {
    my $schema = gen_schema();