--- AnyEvent/t/handle/01_readline.t 2008/06/06 10:23:50 1.8 +++ AnyEvent/t/handle/01_readline.t 2008/06/06 10:49:20 1.9 @@ -63,13 +63,13 @@ $wr_ae->push_write (netstring => "0:xx,,"); $wr_ae->push_write (netstring => ""); - $wr_ae->push_write (packstring => "w", "hallole" x 99); + $wr_ae->push_write (packstring => "w", "hallole" x 99999); # try to exhaust socket buffer here $wr_ae->push_write ("A\nBC\nDEF\nG\n" . ("X" x 113) . "\n"); undef $wr_ae; $rd_ae->push_read (netstring => sub { is ($_[1], "0:xx,,"); }); $rd_ae->push_read (netstring => sub { is ($_[1], ""); }); - $rd_ae->push_read (packstring => "w", sub { is ($_[1], "hallole" x 99); }); + $rd_ae->push_read (packstring => "w", sub { is ($_[1], "hallole" x 99999); }); $cv->wait;