From daec8d7a3166d36db2b24a3e283211c192109c9a Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Wed, 12 Nov 2008 10:03:04 +0000
Subject: [PATCH] Lokale Variablen auch als lokal deklarieren.

---
 SL/WH.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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}};
-- 
2.20.1