X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/4486e3bc8eb00c37cf8029e663eb94b4b9c5346a..03ff37cb621e68f7d224d2520099ee86f612f833:/SL/IC.pm diff --git a/SL/IC.pm b/SL/IC.pm index f39c169b2..8d46c2d90 100644 --- a/SL/IC.pm +++ b/SL/IC.pm @@ -321,7 +321,7 @@ sub save { $form->{orphaned} = 1; } - my $partsgroup_id = 0; + my $partsgroup_id = undef; if ($form->{partsgroup}) { (my $partsgroup, $partsgroup_id) = split(/--/, $form->{partsgroup});