SL::Dev::Part - Typo

diff --git a/SL/Dev/Part.pm b/SL/Dev/Part.pm
index e1d08e8..7b67ada 100644 (file)
--- a/SL/Dev/Part.pm
+++ b/SL/Dev/Part.pm
@@ -40,7 +40,7 @@ sub create_assembly {
   my (%params) = @_;
 
   my @parts;
-  my $partnumber = delete $params{part1number} || 'ap1';
+  my $partnumber = delete $params{partnumber} || 'ap1';
   my $part1 = SL::Dev::Part::create_part(partnumber   => $partnumber,
                                          description  => 'Testpart',
                                         )->save;