From 43b962acc05a230ae8840631bac45e3943aadc1d Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Mon, 12 Nov 2012 12:04:41 -0600 Subject: still need to set this up if we return early --- lib/Web/Request.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lib/Web/Request.pm b/lib/Web/Request.pm index 6fb94a3..0f37610 100644 --- a/lib/Web/Request.pm +++ b/lib/Web/Request.pm @@ -188,8 +188,11 @@ has _parsed_body => ( my $ct = $self->content_type; my $cl = $self->content_length; if (!$ct && !$cl) { + if (!$self->env->{'psgix.input.buffered'}) { + $self->env->{'psgix.input.buffered'} = 1; + $self->env->{'psgi.input'} = Stream::Buffered->new(0)->rewind; + } return { - content => '', body => {}, uploads => {}, }; -- cgit v1.2.3-54-g00ecf