S:D:Manager:ReconciliationLink: nicht initialisierter Wert: Warnungen vermeiden

Durch Tests getriggert, konkret: durch t/bank/bank_transactions.t

diff --git a/SL/DB/Manager/ReconciliationLink.pm b/SL/DB/Manager/ReconciliationLink.pm
index 8f63a1cd1dd8850af518e0aebfc567e1969d9c27..76dc126c01d3de72bfc382e01f07631fa48d4409 100644 (file)
--- a/SL/DB/Manager/ReconciliationLink.pm
+++ b/SL/DB/Manager/ReconciliationLink.pm
@@ -21,7 +21,7 @@ sub get_new_rec_group {
 
   my ($max) = selectfirst_array_query($::form, $class->object_class->init_db->dbh, $query);
 
-  return $max + 1;
+  return ($max // 0) + 1;
 }
 
 1;