@@ -, +, @@ --- t/Number/Price.t | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) --- a/t/Number/Price.t +++ a/t/Number/Price.t @@ -1,6 +1,6 @@ use Modern::Perl; -use Test::More tests => 28; +use Test::More tests => 29; use Test::MockModule; use t::lib::Mocks; @@ -27,6 +27,9 @@ is( Koha::Number::Price->new->format( $format ), '0.00', 'US: format 0' ); is( Koha::Number::Price->new(3)->format( $format ), '3.00', 'US: format 3' ); is( Koha::Number::Price->new(1234567890)->format( $format ), '1,234,567,890.00', 'US: format 1234567890' ); +# Test a very big number +is( Koha::Number::Price->new(99999999999999)->format( $format ), + '99,999,999,999,999.00', 'US: format 99999999999999' ); # FIXME This should be display symbol, but it was the case before the creation of this module is( Koha::Number::Price->new->format( { %$format, with_symbol => 1 } ), --