X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Flib%2FTestApp%2FView%2FDump%2FRequest.pm;h=97926eceebe5a84407f53d152a2c673ac26db2fa;hp=5655b3fb3336c98c47c515ae48b9f861091c9057;hb=faa02805570aed25eec5879f9a9383c5b16fb3cd;hpb=4c21ba3bd6fd11b9ba6e6af65bf25a497c3709b1

diff --git a/t/lib/TestApp/View/Dump/Request.pm b/t/lib/TestApp/View/Dump/Request.pm
index 5655b3f..97926ec 100644
--- a/t/lib/TestApp/View/Dump/Request.pm
+++ b/t/lib/TestApp/View/Dump/Request.pm
@@ -5,7 +5,9 @@ use base qw[TestApp::View::Dump];
 
 sub process {
     my ( $self, $c ) = @_;
-    return $self->SUPER::process( $c, $c->request );
+    my $r = $c->request;
+    local $r->{env};
+    return $self->SUPER::process( $c, $r );
 }
 
 1;