Commit | Line | Data |
---|---|---|
cb88f828 | 1 | package TestAppStats::Controller::Root; |
2 | use strict; | |
3 | use warnings; | |
4 | use base 'Catalyst::Controller'; | |
5 | ||
6 | __PACKAGE__->config->{namespace} = ''; | |
7 | ||
8 | # Return log messages from previous request | |
9 | sub default : Private { | |
10 | my ( $self, $c ) = @_; | |
11 | $c->stats->profile("test"); | |
12 | $c->res->body(join("\n", @TestAppStats::log_messages)); | |
13 | @TestAppStats::log_messages = (); | |
14 | } | |
15 | ||
16 | 1; |