From 27e5df980e8abcb513fc3d5d0b270c802beb5c41 Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@derf.homelinux.org>
Date: Sat, 5 Jun 2010 20:43:40 +0200
Subject: Fix(?) UTF-8 issues with bin/efa. Nobody knows why it works.

---
 bin/efa | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

(limited to 'bin')

diff --git a/bin/efa b/bin/efa
index 6920403..a74c34d 100755
--- a/bin/efa
+++ b/bin/efa
@@ -4,10 +4,8 @@
 ##   0. You just DO WHAT THE FUCK YOU WANT TO.
 use strict;
 use warnings;
-use encoding 'utf8';
 use 5.010;
 
-use Encode;
 use Getopt::Long qw/:config no_ignore_case/;
 use HTML::TreeBuilder::XPath;
 use WWW::Mechanize;
@@ -308,9 +306,8 @@ else {
 		fields => \%post,
 	);
 
-	$content = $www->content;
+	$content = $www->response()->decoded_content();
 	$content =~ s/\xa0/ /gs;
-	$content = decode('iso-8859-1', $content);
 }
 
 if ($test_dump) {
-- 
cgit v1.2.3