From: Sven Schöling Date: Wed, 23 Nov 2016 09:16:17 +0000 (+0100) Subject: SL::Dev:: einige Warnungen X-Git-Tag: release-3.5.4~1864 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=d0f42fe787bdac04c019d361b636c9c9d22f3119;p=kivitendo-erp.git SL::Dev:: einige Warnungen --- diff --git a/SL/Dev/Part.pm b/SL/Dev/Part.pm index 27261e91f..f192db385 100644 --- a/SL/Dev/Part.pm +++ b/SL/Dev/Part.pm @@ -49,8 +49,8 @@ sub create_assembly { for my $i ( 2 .. $number_of_parts ) { my $part = $parts[0]->clone_and_reset; - $part->partnumber( $part->partnumber . " " . $i ); - $part->description( $part->description . " " . $i ); + $part->partnumber( ($part->partnumber // '') . " " . $i ); + $part->description( ($part->description // '') . " " . $i ); $part->save; push(@parts, $part); } @@ -84,8 +84,8 @@ sub create_assortment { for my $i ( 2 .. $number_of_parts ) { my $part = $parts[0]->clone_and_reset; - $part->partnumber( $part->partnumber . " " . $i ); - $part->description( $part->description . " " . $i ); + $part->partnumber( ($part->partnumber // '') . " " . $i ); + $part->description( ($part->description // '') . " " . $i ); $part->save; push(@parts, $part); }