Revision 457ad636
Von Sven Schöling vor etwa 13 Jahren hinzugefügt
| SL/Helper/Csv/Dispatcher.pm | ||
|---|---|---|
| 93 | 93 |
my $spec = { key => $col, steps => [] };
|
| 94 | 94 |
my $cur_class = $self->_csv->class; |
| 95 | 95 |
|
| 96 |
return unless $cur_class; |
|
| 97 |
|
|
| 96 | 98 |
for my $step_index ( split /\.(?!\d)/, $path ) {
|
| 97 | 99 |
my ($step, $index) = split /\./, $step_index; |
| 98 | 100 |
if ($cur_class->can($step)) {
|
Auch abrufbar als: Unified diff
Csv Import Helper: classenlose profile dürfen den Dispatcher nicht abschiessen.