--- AnyEvent/t/handle/04_listen.t 2008/05/24 02:50:45 1.13 +++ AnyEvent/t/handle/04_listen.t 2008/05/24 23:15:14 1.14 @@ -23,7 +23,7 @@ $hdl = AnyEvent::Handle->new (fh => $fh, on_eof => sub { $cv->broadcast }); - $hdl->push_read_chunk (6, sub { + $hdl->push_read (chunk => 6, sub { my ($hdl, $data) = @_; if ($data eq "TEST\015\012") { @@ -48,7 +48,7 @@ $clhdl = AnyEvent::Handle->new (fh => $fh, on_eof => sub { $cv->broadcast }); $clhdl->push_write ("TEST\015\012"); - $clhdl->push_read_line (sub { + $clhdl->push_read (line => sub { my ($clhdl, $line) = @_; if ($line eq 'BLABLABLA') {