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

[rafl at dev.catalyst.perl.org]

Author: rafl
Date: 2010-01-09 18:01:25 +0000 (Sat, 09 Jan 2010)
New Revision: 12570

Modified:
   Catalyst-Runtime/5.80/branches/psgi/lib/Catalyst/Engine.pm
Log:
Don't pass $ctx down to read().

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:24 UTC (rev 12569)
+++ Catalyst-Runtime/5.80/branches/psgi/lib/Catalyst/Engine.pm	2010-01-09 18:01:25 UTC (rev 12570)
@@ -728,7 +728,7 @@
 =cut
 
 sub read_chunk {
-    my ($self) = @_;
+    my ($self, $ctx) = (shift, shift);
     return $self->env->{'psgi.input'}->read(@_);
 }