X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/f50ddd66b0b90f206c762c95770da530cb0b7d69..02fa01b23003eb4429392092cd0282d44a11cea8:/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;