From dcd6ce29ba0d7318c16b08c237ec0247b59a571d Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Mon, 28 Feb 2011 15:08:56 +0100
Subject: [PATCH] Text::CSV_XS wird vorausgesetzt, nicht Text::CSV

---
 SL/Helper/Csv.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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,
-- 
2.20.1