X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/c80cdcf8ebe576a5bd6e3c488628b63ac736bc0c..048a6eb734688cb4bc67ac24df8b96ec75cdce09:/SL/Helper/Csv/Dispatcher.pm

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