X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/1b9eff96c5c102b231ad9af07d03a7522ebba74c..6be015fafb81c9553f44b8e06ec3812ba6befe9e:/SL/IC.pm

diff --git a/SL/IC.pm b/SL/IC.pm
index ffc734bd8..426fc9fc3 100644
--- a/SL/IC.pm
+++ b/SL/IC.pm
@@ -41,6 +41,8 @@ use YAML;
 use SL::CVar;
 use SL::DBUtils;
 
+use strict;
+
 sub get_part {
   $main::lxdebug->enter_sub();
 
@@ -1058,6 +1060,8 @@ sub all_parts {
   }
 
   $main::lxdebug->leave_sub();
+
+  return wantarray ? @{ $form->{parts} } : $form->{parts};
 }
 
 sub _create_filter_for_priceupdate {