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

(-)a/t/Number/Price.t (-2 / +4 lines)
Lines 1-6 Link Here
1
use Modern::Perl;
1
use Modern::Perl;
2
2
3
use Test::More tests => 32;
3
use Test::More tests => 33;
4
4
5
use Test::MockModule;
5
use Test::MockModule;
6
use t::lib::Mocks;
6
use t::lib::Mocks;
Lines 19-24 my $orig_locale = setlocale(LC_NUMERIC); Link Here
19
my $format = {
19
my $format = {
20
    p_cs_precedes => 1, # Force to place the symbol at the beginning
20
    p_cs_precedes => 1, # Force to place the symbol at the beginning
21
};
21
};
22
23
is( Koha::Number::Price->new->format( $format ),    '0.00', 'There is no currency defined yet, do not explode!' );
24
22
t::lib::Mocks::mock_preference( 'CurrencyFormat', 'US' );
25
t::lib::Mocks::mock_preference( 'CurrencyFormat', 'US' );
23
$currency = Koha::Acquisition::Currency->new({
26
$currency = Koha::Acquisition::Currency->new({
24
    currency => 'USD',
27
    currency => 'USD',
25
- 

Return to bug 20625