Permalink
Browse files

Revert a bit more of 71fc9c to get sockets to work as they did in 201…

…2.08.

This also causes S32-io/IO-Socket-INET.t to start passing again.
  • Loading branch information...
1 parent acf8f17 commit 5c5b15bf0ee3cbc6f8726ad88373c1ecedb16602 @pmichaud pmichaud committed Sep 28, 2012
Showing with 3 additions and 1 deletion.
  1. +2 −0 src/core/IO/Socket.pm
  2. +1 −1 t/spectest.data
View
2 src/core/IO/Socket.pm
@@ -7,6 +7,8 @@ my role IO::Socket {
if $!buffer.chars < $chars {
my str $r = $!PIO.recv;
+ $r = pir::trans_encoding__Ssi($r,
+ pir::find_encoding__Is('utf8'));
$!buffer ~= nqp::p6box_s($r);
}
View
2 t/spectest.data
@@ -581,7 +581,7 @@ S32-io/chdir.t
S32-io/dir.t
S32-io/file-tests.t
S32-io/io-path.t
-# S32-io/IO-Socket-INET.t # needs .recv update e.g. Parrot 4.8.0
+S32-io/IO-Socket-INET.t
S32-io/note.t
S32-list/categorize.t
S32-list/classify.t

0 comments on commit 5c5b15b

Please sign in to comment.