Updating branch to current revision

[catagits/Catalyst-Runtime.git] / trunk / t / lib / TestAppStats.pm

diff --git a/trunk/t/lib/TestAppStats.pm b/trunk/t/lib/TestAppStats.pm
new file mode 100644 (file)
index 0000000..84cc85c
--- /dev/null
+++ b/trunk/t/lib/TestAppStats.pm
@@ -0,0 +1,26 @@
+use strict;
+use warnings;
+
+package TestAppStats;
+
+use Catalyst qw/
+    -Stats=1
+/;
+
+our $VERSION = '0.01';
+our @log_messages;
+
+__PACKAGE__->config( name => 'TestAppStats', root => '/some/dir' );
+
+__PACKAGE__->log(TestAppStats::Log->new);
+
+__PACKAGE__->setup;
+
+package TestAppStats::Log;
+use base qw/Catalyst::Log/;
+
+sub info { push(@TestAppStats::log_messages, @_); }
+sub debug { push(@TestAppStats::log_messages, @_); }
+
+1;
+