From 667c542e08d67e14880300e4048c55c603aa3905 Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Sat, 16 Oct 2010 14:47:42 +0200 Subject: [PATCH] use utf-8 as default encoding for .cvs files --- lib/MojoFacets/Import/CSV.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/MojoFacets/Import/CSV.pm b/lib/MojoFacets/Import/CSV.pm index 9a3b45c..479308b 100644 --- a/lib/MojoFacets/Import/CSV.pm +++ b/lib/MojoFacets/Import/CSV.pm @@ -21,9 +21,9 @@ sub data { my $encoding = 'utf-8'; if ( $path =~ m/\.(\w+).csv/i ) { $encoding = $1; - warn "decoding ", length($data), " bytes using $encoding\n"; - $data = decode($encoding, $data); } + warn "decoding ", length($data), " bytes using $encoding\n"; + $data = decode($encoding, $data); my @lines = split(/\r?\n/, $data); $data = { items => [] }; -- 2.20.1