From: Tomas Doran Date: Wed, 19 Aug 2009 19:04:59 +0000 (+0000) Subject: Fail commit was fail. Back out the part I didn't want X-Git-Tag: 5.80008~8 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=2cc36f4415a78401dfceb07020fee718c439b993 Fail commit was fail. Back out the part I didn't want --- diff --git a/t/lib/TestAppStats.pm b/t/lib/TestAppStats.pm index 99d0e1e..bfc1340 100644 --- a/t/lib/TestAppStats.pm +++ b/t/lib/TestAppStats.pm @@ -16,9 +16,16 @@ __PACKAGE__->log(TestAppStats::Log->new); __PACKAGE__->setup; +# Return log messages from previous request +sub default : Private { + my ( $self, $c ) = @_; + $c->stats->profile("test"); + $c->res->body(join("\n", @log_messages)); + @log_messages = (); +} package TestAppStats::Log; use base qw/Catalyst::Log/; -sub info { push(@TestAppStats::log_messages, @_); } -sub debug { push(@TestAppStats::log_messages, @_); } +sub info { push(@log_messages, @_); } +sub debug { push(@log_messages, @_); } diff --git a/t/lib/TestAppStats/Controller/Root.pm b/t/lib/TestAppStats/Controller/Root.pm deleted file mode 100644 index c2c9ec5..0000000 --- a/t/lib/TestAppStats/Controller/Root.pm +++ /dev/null @@ -1,17 +0,0 @@ -package TestAppStats::Controller::Root; -use strict; -use warnings; -use base qw/Catalyst::Controller/; - -__PACKAGE__->config->{namespace} = ''; - -# Return log messages from previous request -sub default : Private { - my ( $self, $c ) = @_; - $c->stats->profile("test"); - $c->res->body(join("\n", @TestAppStats::log_messages)); - @TestAppStats::log_messages = (); -} - -1; -