From 459d8c06ce137dc85f7b523f0152828f01a8a135 Mon Sep 17 00:00:00 2001
From: Vincent Riquer <vincent+gitorious@riquer.fr>
Date: Wed, 27 Nov 2013 17:26:15 +0100
Subject: [PATCH] Fix (again!) handling of non-UTF8 characters

---
 lib/tools/ascii | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/tools/ascii b/lib/tools/ascii
index a950e22..5f474af 100644
--- a/lib/tools/ascii
+++ b/lib/tools/ascii
@@ -6,10 +6,10 @@ ascii() {
 			use utf8;
 			use Encode;
 			use Text::Unidecode;
-			use open qw(:std :utf8);
+			binmode STDIN, ":encoding(UTF-8)";
 			$| = 1;
 			while (<>) {
-				print(unidecode(encode("utf-8", $_)));
+				print(unidecode($_));
 			}'
 	}
 }