Commit 070471a7c152f6d2f5189bbd1e0e82b66d5e2ae2

Content not picked up for file or callback content handlers.

Forgot to update a few indexes in 74c3257e24465ed158c8144be8a5b74ecb20d3fc
  
103103 elsif (!ref($arg) && length($arg)) {
104104 open(my $fh, ">", $arg) || die "Can't write to '$arg': $!";
105105 push(@{$response->{handlers}{response_data}}, sub {
106 print $fh $_[2] || die "Can't write to '$arg': $!";
106 print $fh $_[3] || die "Can't write to '$arg': $!";
107107 1;
108108 });
109109 push(@{$response->{handlers}{response_done}}, sub {
113113 }
114114 elsif (ref($arg) eq 'CODE') {
115115 push(@{$response->{handlers}{response_data}}, sub {
116 &$arg($_[2], $_[0], $self);
116 &$arg($_[3], $_[0], $self);
117117 1;
118118 });
119119 }
  
616616 push(@{$response->{handlers}{response_data}}, sub {
617617 print "P\n";
618618 return unless $parser;
619 $parser->parse($_[2]) or undef($parser);
619 $parser->parse($_[3]) or undef($parser);
620620 });
621621
622622 } : undef,