View | Details | Raw Unified | Return to bug 16868
Collapse All | Expand All

(-)a/t/lib/Database.pm (-1 / +19 lines)
Line 0 Link Here
0
- 
1
package t::lib::Database;
2
3
use C4::Context;
4
use Koha::Database;
5
6
sub dbh {
7
    my $dbh = C4::Context->dbh;
8
    my $schema = Koha::Database->new->schema;
9
    $schema->storage->txn_begin;
10
    $dbh->{RaiseError} = 1;
11
    return $dbh;
12
}
13
14
END {
15
    my $schema = Koha::Database->new->schema;
16
    $schema->storage->txn_rollback;
17
};
18
19
1;

Return to bug 16868