[Catalyst-commits] r12568 - Catalyst-Runtime/5.80/branches/psgi/lib/Catalyst

[rafl at dev.catalyst.perl.org]

Author: rafl
Date: 2010-01-09 17:49:17 +0000 (Sat, 09 Jan 2010)
New Revision: 12568

Modified:
   Catalyst-Runtime/5.80/branches/psgi/lib/Catalyst/Engine.pm
Log:
Let read_chunk read from psgi.input.

Modified: Catalyst-Runtime/5.80/branches/psgi/lib/Catalyst/Engine.pm
===================================================================
--- Catalyst-Runtime/5.80/branches/psgi/lib/Catalyst/Engine.pm	2010-01-09 17:49:11 UTC (rev 12567)
+++ Catalyst-Runtime/5.80/branches/psgi/lib/Catalyst/Engine.pm	2010-01-09 17:49:17 UTC (rev 12568)
@@ -727,7 +727,10 @@
 
 =cut
 
-sub read_chunk { }
+sub read_chunk {
+    my ($self) = @_;
+    return $self->env->{'psgi.input'}->read(@_);
+}
 
 =head2 $self->read_length