From 048a6eb734688cb4bc67ac24df8b96ec75cdce09 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Bernd=20Ble=C3=9Fmann?= <bernd@kivitendo-premium.de>
Date: Fri, 16 Aug 2013 16:58:11 +0200
Subject: [PATCH] =?utf8?q?Code-Vereinfachung:=20Unn=C3=B6tige=20Variable?=
 =?utf8?q?=20weglassen.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 SL/Helper/Csv/Dispatcher.pm | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/SL/Helper/Csv/Dispatcher.pm b/SL/Helper/Csv/Dispatcher.pm
index 230ac2b42..a744892c1 100644
--- a/SL/Helper/Csv/Dispatcher.pm
+++ b/SL/Helper/Csv/Dispatcher.pm
@@ -108,12 +108,10 @@ sub parse_profile {
 
   my $profile;
   my $class;
-  my $header;
   my @specs;
 
   my $i = 0;
-  foreach my $h (@{ $self->_csv->header }) {
-    $header = $h;
+  foreach my $header (@{ $self->_csv->header }) {
     if ($self->_csv->profile) {
       $profile = $self->_csv->profile->[$i]->{profile};
       $class   = $self->_csv->profile->[$i]->{class};
-- 
2.20.1