From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Mon, 28 Feb 2011 14:08:56 +0000 (+0100)
Subject: Text::CSV_XS wird vorausgesetzt, nicht Text::CSV
X-Git-Tag: release-2.7.0beta1~396^2~66
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=dcd6ce29ba0d7318c16b08c237ec0247b59a571d;p=kivitendo-erp.git

Text::CSV_XS wird vorausgesetzt, nicht Text::CSV
---

diff --git a/SL/Helper/Csv.pm b/SL/Helper/Csv.pm
index 1b8a4b77f..d4a0c8883 100644
--- a/SL/Helper/Csv.pm
+++ b/SL/Helper/Csv.pm
@@ -6,7 +6,7 @@ use warnings;
 use Carp;
 use IO::File;
 use Params::Validate qw(:all);
-use Text::CSV;
+use Text::CSV_XS;
 use Rose::Object::MakeMethods::Generic scalar => [ qw(
   file encoding sep_char quote_char escape_char header profile class
   numberformat dateformat ignore_unknown_columns strict_profile _io _csv
@@ -39,7 +39,7 @@ sub new {
   $self->$_($params{$_}) for keys %params;
 
   $self->_io(IO::File->new);
-  $self->_csv(Text::CSV->new({
+  $self->_csv(Text::CSV_XS->new({
     binary => 1,
     sep_char    => $self->sep_char,
     quote_char  => $self->quote_char,