Revision e78a50fc
Von Sven Schöling vor mehr als 8 Jahren hinzugefügt
| SL/Controller/CsvImport/Base.pm | ||
|---|---|---|
| 54 | 54 |
|
| 55 | 55 |
return if ( !$self->csv->header || $self->csv->errors ); |
| 56 | 56 |
|
| 57 |
my $headers = { headers => [ map {; $_->{key} } @{ $self->csv->specs->[0] } ] };
|
|
| 57 |
my $headers = { headers => [ grep { $self->csv->dispatcher->is_known($_, 0) } @{ $self->csv->header } ] };
|
|
| 58 | 58 |
$headers->{methods} = [ map { $_->{path} } @{ $self->csv->specs->[0] } ];
|
| 59 | 59 |
$headers->{used} = { map { ($_ => 1) } @{ $headers->{headers} } };
|
| 60 | 60 |
$self->controller->headers($headers); |
Auch abrufbar als: Unified diff
CsvImport::Base: benutzte header korrekt setzen