From: Brian Cassidy <bricas@cpan.org>
Date: Mon, 5 Jan 2009 19:10:32 +0000 (+0000)
Subject: test updates
X-Git-Tag: v0.22~1
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c098c4a20a49b7ebfd8cd6cec7b86d159ce1112b;hp=60f98160a05af53007c0a5d454ad4564af6d0702;p=catagits%2FCatalyst-Plugin-ConfigLoader.git

test updates
---

diff --git a/Changes b/Changes
index cb25fec..85d72c8 100644
--- a/Changes
+++ b/Changes
@@ -1,6 +1,6 @@
 Revision history for Perl extension Catalyst::Plugin::ConfigLoader.
 
-0.22  XXX
+0.22  Mon Jan 05 2009
     - add a cookbook entry re: UTF-8 and Config::General (Octavian Rasnita)
     - switch from NEXT to MRO::Compat
 
diff --git a/lib/Catalyst/Plugin/ConfigLoader.pm b/lib/Catalyst/Plugin/ConfigLoader.pm
index 692eb87..947fd30 100644
--- a/lib/Catalyst/Plugin/ConfigLoader.pm
+++ b/lib/Catalyst/Plugin/ConfigLoader.pm
@@ -331,7 +331,7 @@ Work to this module has been generously sponsored by:
 
 =head1 COPYRIGHT AND LICENSE
 
-Copyright 2008 by Brian Cassidy
+Copyright 2006-2009 by Brian Cassidy
 
 This library is free software; you can redistribute it and/or modify
 it under the same terms as Perl itself. 
diff --git a/t/lib/TestApp.pm b/t/lib/TestApp.pm
index 7f6873c..b9a7063 100644
--- a/t/lib/TestApp.pm
+++ b/t/lib/TestApp.pm
@@ -3,8 +3,6 @@ package TestApp;
 use strict;
 use warnings;
 
-use MRO::Compat;
-
 use Catalyst qw/ConfigLoader/;
 
 our $VERSION = '0.01';
@@ -14,12 +12,7 @@ __PACKAGE__->setup;
 sub finalize_config {
     my $c = shift;
     $c->config( foo => 'bar' );
-    $c->next::method();
-}
-
-sub appconfig : Local {
-    my ( $self, $c, $var ) = @_;
-    $c->res->body( $c->config->{ $var } );
+    $c->next::method( @_ );
 }
 
 1;
diff --git a/t/lib/TestApp/Controller/Config.pm b/t/lib/TestApp/Controller/Config.pm
index 31c480a..989828a 100644
--- a/t/lib/TestApp/Controller/Config.pm
+++ b/t/lib/TestApp/Controller/Config.pm
@@ -10,4 +10,9 @@ sub index : Private {
     $c->res->output( $self->{ foo } );
 }
 
+sub appconfig : Global {
+    my ( $self, $c, $var ) = @_;
+    $c->res->body( $c->config->{ $var } );
+}
+
 1;