projects
/
catagits/Catalyst-Plugin-ConfigLoader.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
8f1d944f0ca0b9c141372e519216026b02abf06f
[catagits/Catalyst-Plugin-ConfigLoader.git]
/
t
/
lib
/
TestApp4
/
Controller
/
Config.pm
1
package TestApp4::Controller::Config;
2
3
use strict;
4
use warnings;
5
6
use base qw( Catalyst::Controller );
7
8
sub index : Private {
9
my ( $self, $c ) = @_;
10
$c->res->output( $self->{ foo } );
11
}
12
13
sub appconfig : Global {
14
my ( $self, $c, $var ) = @_;
15
$c->res->body( $c->config->{ $var } );
16
}
17
18
1;