Otherwise, we get deep recursion as we keep calling
recursively on giant responses
my $buf = $body->getline;
if (defined $buf) {
$write->($buf);
- if ($self->{write_buf}) {
+ if ($self->{write_buf_size}) {
$body->watch_read(0);
$self->write($restart_read);
}
local $/ = \8192;
while (defined(my $buf = $body->getline)) {
$write->($buf);
- if ($self->{write_buf}) {
+ if ($self->{write_buf_size}) {
$self->write($pull);
return;
}