X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8ad3a60e282dc36dd0738751ff714e1d04abdd8f..deb4d2dbb676d7d6f69dfe7815d6e0cb09bd4a44:/SL/Helper/Csv/Dispatcher.pm diff --git a/SL/Helper/Csv/Dispatcher.pm b/SL/Helper/Csv/Dispatcher.pm index a08a63397..3a725b5a0 100644 --- a/SL/Helper/Csv/Dispatcher.pm +++ b/SL/Helper/Csv/Dispatcher.pm @@ -109,8 +109,9 @@ sub parse_profile { my @specs; my $csv_profile = $self->_csv->profile; + my $h_aref = ($self->_csv->is_multiplexed)? $self->_csv->header : [ $self->_csv->header ]; my $i = 0; - foreach my $header (@{ $self->_csv->header }) { + foreach my $header (@{ $h_aref }) { my $spec = $self->_parse_profile(profile => $csv_profile->[$i]->{profile}, class => $csv_profile->[$i]->{class}, header => $header);