X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/d72d025b61af1cc32d947a29b2ee0e421c9c52d5..daec8d7a3166d36db2b24a3e283211c192109c9a:/SL/WH.pm

diff --git a/SL/WH.pm b/SL/WH.pm
index 713ca4371..70f1037c2 100644
--- a/SL/WH.pm
+++ b/SL/WH.pm
@@ -98,7 +98,7 @@ sub transfer {
 
     push @values, "$transfer->{comment}";
 
-    $qty = $transfer->{qty};
+    my $qty = $transfer->{qty};
 
     if ($transfer->{unit}) {
       my $partunit = $partunits{$transfer->{parts_id}};