From d0f42fe787bdac04c019d361b636c9c9d22f3119 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Sven=20Sch=C3=B6ling?= Date: Wed, 23 Nov 2016 10:16:17 +0100 Subject: [PATCH] SL::Dev:: einige Warnungen --- SL/Dev/Part.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) 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); } -- 2.20.1