Permalink
Browse files

Restore accidentally removed read in IO::Socket.

  • Loading branch information...
1 parent 3619d77 commit 72ec6398140564f2655b7d981b7584f9874f1c10 @jnthn jnthn committed Oct 27, 2012
Showing with 1 addition and 0 deletions.
  1. +1 −0 src/core/IO/Socket.pm
@@ -27,6 +27,7 @@ my role IO::Socket {
fail('Socket not available') unless $!PIO;
my $buf := nqp::create(Buf);
my Mu $parrot_buf := pir::new__PS('ByteBuffer');
+ pir::set__vPS($parrot_buf, $!PIO.read(nqp::unbox_i($bufsize)));
nqp::bindattr_s($buf, Buf, '$!buffer',
$parrot_buf.get_string('binary'));
$buf;

0 comments on commit 72ec639

Please sign in to comment.