X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FController%2FCsvImport%2FBaseMulti.pm;h=5168ae28c8c0edbd8ca736e1910c20ec947d760b;hb=661febc70d58eb13923455512e8d76f1ef29ae60;hp=d4bb7455a65d98cd33f8969b64821b8b0c705e15;hpb=ff70e4c9642bfb95a39e73bb1242d7071a1db568;p=kivitendo-erp.git diff --git a/SL/Controller/CsvImport/BaseMulti.pm b/SL/Controller/CsvImport/BaseMulti.pm index d4bb7455a..5168ae28c 100644 --- a/SL/Controller/CsvImport/BaseMulti.pm +++ b/SL/Controller/CsvImport/BaseMulti.pm @@ -22,7 +22,7 @@ sub run { my $profile = $self->profile; - $self->csv(SL::Helper::Csv->new(file => $self->file->file_name, + $self->csv(SL::Helper::Csv->new(file => ('SCALAR' eq ref $self->file)? $self->file: $self->file->file_name, encoding => $self->controller->profile->get('charset'), profile => $profile, ignore_unknown_columns => 1, @@ -94,6 +94,17 @@ sub run { $::myconfig{numberformat} = $old_numberformat; } +sub init_manager_class { + my ($self) = @_; + + my @manager_classes; + foreach my $class (@{ $self->class }) { + $class =~ m/^SL::DB::(.+)/; + push @manager_classes, "SL::DB::Manager::" . $1; + } + $self->manager_class(\@manager_classes); +} + sub add_columns { my ($self, $row_ident, @columns) = @_;