t/lib/TestApp/View/Dump/Request.pm

   1 package TestApp::View::Dump::Request;
   2
   3 use strict;
   4 use base qw[TestApp::View::Dump];
   5
   6 sub process {
   7     my ( $self, $c ) = @_;
   8     my $r = $c->request;
   9     local $r->{env};
  10     return $self->SUPER::process( $c, $r );
  11 }
  12
  13 1;