more binmode attempts

[infobot.git] / src / IRC / Irc.pl

diff --git a/src/IRC/Irc.pl b/src/IRC/Irc.pl
index 431aee51cd6a6b2c142090f17cb4709b7051a6e4..21a31fe93bd097bdbe24e942bf5c36f39209941d 100644 (file)
--- a/src/IRC/Irc.pl
+++ b/src/IRC/Irc.pl
@@ -130,6 +130,7 @@ sub irc {
                #binmode $conns{$mynick}->{_socket}, ":encoding(UTF-8)";
                # TODO: need to input bytes, but output utf8
                binmode $conns{$mynick}->{_socket}, ":bytes";
+               binmode $conns{$mynick}->socket, ":bytes";
 
                $conns{$mynick}->maxlinelen($maxlinelen);