X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/0b9a3ff04bb468d94dd33e87ee499138630f639e..7fde0dcd49c0f63f336453866f1af7e89b4e7776:/SL/PrefixedNumber.pm diff --git a/SL/PrefixedNumber.pm b/SL/PrefixedNumber.pm index 849421f97..b3f609892 100644 --- a/SL/PrefixedNumber.pm +++ b/SL/PrefixedNumber.pm @@ -64,7 +64,7 @@ sub set_to { sub set_to_max { my ($self, @numbers) = @_; - return $self->set_to(max map { SL::PrefixedNumber->new(number => $_)->_state->{ref_number} } @numbers); + return $self->set_to(max map { SL::PrefixedNumber->new(number => $_ // 0)->_state->{ref_number} } @numbers); } 1;