Commit | Line | Data |
a7afecf7 |
1 | package TestApp::Controller::Config; |
2 | |
3 | use strict; |
4 | use warnings; |
5 | |
6 | use base qw( Catalyst::Controller ); |
7 | |
8 | sub index : Private { |
587d381b |
9 | my ( $self, $c ) = @_; |
a7afecf7 |
10 | $c->res->output( $self->{ foo } ); |
11 | } |
12 | |
13 | 1; |