From: Sven Schöling Date: Mon, 16 Jan 2012 17:36:30 +0000 (+0100) Subject: SL::DB::Invoice: Eine Warning unterdrücken. X-Git-Tag: release-2.7.0beta1~53 X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/commitdiff_plain/55049b816f1c78769b3bfe734f033340d5872900?hp=--cc SL::DB::Invoice: Eine Warning unterdrücken. --- 55049b816f1c78769b3bfe734f033340d5872900 diff --git a/SL/DB/Invoice.pm b/SL/DB/Invoice.pm index 91ee14c85..14c11fa7d 100644 --- a/SL/DB/Invoice.pm +++ b/SL/DB/Invoice.pm @@ -93,7 +93,7 @@ sub taxamount { my $self = shift; die 'not a setter method' if @_; - return $self->amount - $self->netamount; + return ($self->amount || 0) - ($self->netamount || 0); } __PACKAGE__->meta->make_attr_helpers(taxamount => 'numeric(15,5)');