changed the way test dumping a request works

[catagits/Catalyst-Runtime.git] / t / lib / TestApp / View / Dump / Request.pm

diff --git a/t/lib/TestApp/View/Dump/Request.pm b/t/lib/TestApp/View/Dump/Request.pm
index 5655b3f..991eeca 100644 (file)
--- 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;