X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FController%2FCsvImport%2FBase.pm;h=6a66e8ca1dd964a8f2692ebd4db7c3205f6d9f76;hb=2d193a2e8467c752922bb124c1f9495ee7413b9d;hp=a61b03f2919ab36d61bb4622998abb6f644869d9;hpb=9d6a2ef23cd5586ed4ea3d5a8d59362220251d68;p=kivitendo-erp.git diff --git a/SL/Controller/CsvImport/Base.pm b/SL/Controller/CsvImport/Base.pm index a61b03f29..6a66e8ca1 100644 --- a/SL/Controller/CsvImport/Base.pm +++ b/SL/Controller/CsvImport/Base.pm @@ -30,6 +30,10 @@ sub run { strict_profile => 1, map { ( $_ => $self->controller->profile->get($_) ) } qw(sep_char escape_char quote_char), )); + + my $old_numberformat = $::myconfig{numberformat}; + $::myconfig{numberformat} = $self->controller->profile->get('numberformat'); + $self->csv->parse; $self->controller->errors([ $self->csv->errors ]) if $self->csv->errors; @@ -50,6 +54,8 @@ sub run { $self->check_objects; $self->check_duplicates if $self->controller->profile->get('duplicates', 'no_check') ne 'no_check'; $self->fix_field_lengths; + + $::myconfig{numberformat} = $old_numberformat; } sub add_columns {