diff options
author | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2007-09-05 17:22:26 +0000 |
---|---|---|
committer | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2007-09-05 17:22:26 +0000 |
commit | 8489e68916eabf0ce09242e4dac66b9f646d46c4 (patch) | |
tree | 03b6cf7b18c685184535468fdb86755675c2a297 /IkiWiki/Plugin | |
parent | b3f2cc414f0239a3b8dbe700cc7cbd2750814dd3 (diff) | |
download | ikiwiki-8489e68916eabf0ce09242e4dac66b9f646d46c4.tar ikiwiki-8489e68916eabf0ce09242e4dac66b9f646d46c4.tar.gz |
* table: Text::CSV doesn't return decoded unicode (XS module); decode its
return values.
Diffstat (limited to 'IkiWiki/Plugin')
-rw-r--r-- | IkiWiki/Plugin/table.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/IkiWiki/Plugin/table.pm b/IkiWiki/Plugin/table.pm index c7b664052..01ba5e504 100644 --- a/IkiWiki/Plugin/table.pm +++ b/IkiWiki/Plugin/table.pm @@ -3,6 +3,7 @@ package IkiWiki::Plugin::table; use warnings; use strict; +use Encode; use IkiWiki 2.00; sub import { #{{{ @@ -104,7 +105,7 @@ sub split_csv ($$) { #{{{ foreach my $line (@text_lines) { $l++; if ($csv->parse($line)) { - push(@data, [ $csv->fields() ]); + push(@data, [ map { decode_utf8 $_ } $csv->fields() ]); } else { debug(sprintf(gettext('parse fail at line %d: %s'), |