Commit | Line | Data |
dd4e6fd2 |
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 ) = @_; |
faa02805 |
8 | my $r = $c->request; |
952ff530 |
9 | #local $r->{env}; |
faa02805 |
10 | return $self->SUPER::process( $c, $r ); |
dd4e6fd2 |
11 | } |
12 | |
13 | 1; |