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

(-)a/t/db_dependent/Accounts.t (-4 / +6 lines)
Lines 28-33 BEGIN { Link Here
28
    use_ok('Koha::Borrower');
28
    use_ok('Koha::Borrower');
29
    use_ok('Data::Dumper');
29
    use_ok('Data::Dumper');
30
}
30
}
31
use Koha::Database;
31
32
32
can_ok(	'C4::Accounts',
33
can_ok(	'C4::Accounts',
33
	qw(	recordpayment
34
	qw(	recordpayment
Lines 47-54 can_ok( 'C4::Accounts', Link Here
47
);
48
);
48
49
49
my $dbh = C4::Context->dbh;
50
my $dbh = C4::Context->dbh;
51
my $database = Koha::Database->new();
52
my $schema = $database->schema();
53
$schema->storage->txn_begin();
50
$dbh->{RaiseError}=1;
54
$dbh->{RaiseError}=1;
51
$dbh->{AutoCommit}=0;
52
$dbh->do(q|DELETE FROM accountlines|);
55
$dbh->do(q|DELETE FROM accountlines|);
53
$dbh->do(q|DELETE FROM borrowers|);
56
$dbh->do(q|DELETE FROM borrowers|);
54
$dbh->do(q|DELETE FROM issues|);
57
$dbh->do(q|DELETE FROM issues|);
Lines 172-178 is($note,'$200.00 payment note', '$200.00 payment note is registered'); Link Here
172
175
173
176
174
177
175
$dbh->rollback;
178
$schema->storage->txn_rollback();
176
179
177
180
178
# Sub -------------------------------------------
181
# Sub -------------------------------------------
Lines 180-183 $dbh->rollback; Link Here
180
# C4::Context->userenv
183
# C4::Context->userenv
181
sub Mock_userenv {
184
sub Mock_userenv {
182
    return $userenv;
185
    return $userenv;
183
}
186
}
184
- 

Return to bug 14334