Revert perl utf8 stuff for now.

git-svn-id: http://svn.irssi.org/repos/irssi/trunk@4412 dbcabf3a-b0e7-0310-adc4-f8d773084564

NEWS

@@ -9,8 +9,6 @@ v0.8.11 200x-xx-xx  The Irssi team <staff@irssi.org>
 	+ Don't wait for all /NAMES replies before syncing if we can't combine
 	  queries anyways (Patch by jilles)
 	+ Renamed irc.efnet.net to irc.efnet.org
-	+ Add support for utf8 to Irssi::settings_get_str and
-	  Irssi::TextUI::Line::get_text
 	+ /SCROLLBACK CLEAR accepts the same arguments as /CLEAR
 	+ Check if binary exists and can be executed before /UPGRADE
 	+ Change default value of override_coredump_limit to OFF

src/perl/common/Settings.xs

@@ -1,6 +1,5 @@
 #include "module.h"
 #include "misc.h"
-#include "recode.h"
 
 static GHashTable *perl_settings;
 
@@ -77,8 +76,6 @@ PREINIT:
 CODE:
 	str = settings_get_str(key);
 	RETVAL = new_pv(str);
-	if (is_utf8())
-		SvUTF8_on(RETVAL);
 OUTPUT:
 	RETVAL
 

src/perl/textui/TextBuffer.xs

@@ -1,5 +1,4 @@
 #include "module.h"
-#include "recode.h"
 
 MODULE = Irssi::TextUI::TextBuffer  PACKAGE = Irssi
 PROTOTYPES: ENABLE
@@ -81,8 +80,6 @@ PPCODE:
 	str = g_string_new(NULL);
 	textbuffer_line2text(line, coloring, str);
 	result = new_pv(str->str);
-	if (is_utf8())
-		SvUTF8_on(result);
 	XPUSHs(sv_2mortal(result));
 	g_string_free(str, TRUE);