Revision 22dc17db
Von Bernd Bleßmann vor fast 4 Jahren hinzugefügt
SL/Controller/CsvImport/BaseMulti.pm | ||
---|---|---|
170 | 170 |
my ($self, $entry, %params) = @_; |
171 | 171 |
|
172 | 172 |
return if @{ $entry->{errors} }; |
173 |
return unless $entry->{object}->can('cvars_by_config'); |
|
173 | 174 |
|
174 | 175 |
my %type_to_column = ( text => 'text_value', |
175 | 176 |
textfield => 'text_value', |
... | ... | |
183 | 184 |
|
184 | 185 |
# autovivify all cvars (cvars_by_config will do that for us) |
185 | 186 |
my @cvars; |
186 |
@cvars = @{ $entry->{object}->cvars_by_config } if $entry->{object}->can('cvars_by_config');
|
|
187 |
@cvars = @{ $entry->{object}->cvars_by_config }; |
|
187 | 188 |
|
188 | 189 |
foreach my $config (@{ $self->cvar_configs_by->{row_ident}->{$entry->{raw_data}->{datatype}} }) { |
189 | 190 |
next unless exists $entry->{raw_data}->{ "cvar_" . $config->name }; |
Auch abrufbar als: Unified diff
CsvImport: Mulitplex: handle_cvars-Routine verlassen, wenn Objekt keine CVars kann