From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Fri, 30 Aug 2019 13:01:10 +0000 (+0200)
Subject: SL::DB::Unit: Warnungen wegen nicht initialisierten Werten vermeiden
X-Git-Tag: release-3.5.6.1~500
X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/commitdiff_plain/bf8139f8a70fbac9f270020a99e692c439d4348b?ds=inline

SL::DB::Unit: Warnungen wegen nicht initialisierten Werten vermeiden

Durch Tests getriggert, konkret: durch t/wh/transfer.t
---

diff --git a/SL/DB/Unit.pm b/SL/DB/Unit.pm
index f5f1bc14c..508aa7477 100644
--- a/SL/DB/Unit.pm
+++ b/SL/DB/Unit.pm
@@ -57,7 +57,7 @@ sub convert_to {
   my $my_base_factor    = $self->base_factor       || 1;
   my $other_base_factor = $other_unit->base_factor || 1;
 
-  return $qty * $my_base_factor / $other_base_factor;
+  return ($qty // 0) * $my_base_factor / $other_base_factor;
 }
 
 sub is_time_based {