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

(-)a/t/db_dependent/Koha/Acquisition/Currencies.t (-1 / +9 lines)
Lines 19-28 Link Here
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
use Test::More tests => 6;
21
use Test::More tests => 6;
22
use Koha::Database;
22
use Koha::Acquisition::Currency;
23
use Koha::Acquisition::Currency;
23
use Koha::Acquisition::Currencies;
24
use Koha::Acquisition::Currencies;
24
use t::lib::TestBuilder;
25
use t::lib::TestBuilder;
25
26
27
my $schema = Koha::Database->schema;
28
$schema->storage->txn_begin;
29
my $dbh = C4::Context->dbh;
30
31
# Start transaction
32
$dbh->{RaiseError} = 1;
33
26
my $builder = t::lib::TestBuilder->new;
34
my $builder = t::lib::TestBuilder->new;
27
my $nb_of_currencies = Koha::Acquisition::Currencies->search->count;
35
my $nb_of_currencies = Koha::Acquisition::Currencies->search->count;
28
my $new_currency_1 = Koha::Acquisition::Currency->new({
36
my $new_currency_1 = Koha::Acquisition::Currency->new({
Lines 56-58 is ( $nb_of_active_currencies, 1, 'Only 1 currency should be marked as active' ) Link Here
56
64
57
$retrieved_currency_1->delete;
65
$retrieved_currency_1->delete;
58
is( Koha::Acquisition::Currencies->search->count, $nb_of_currencies + 1, 'Delete should have deleted the currency' );
66
is( Koha::Acquisition::Currencies->search->count, $nb_of_currencies + 1, 'Delete should have deleted the currency' );
59
- 
67

Return to bug 15084