test updates
Brian Cassidy [Mon, 5 Jan 2009 19:10:32 +0000 (19:10 +0000)]
Changes
lib/Catalyst/Plugin/ConfigLoader.pm
t/lib/TestApp.pm
t/lib/TestApp/Controller/Config.pm

diff --git a/Changes b/Changes
index cb25fec..85d72c8 100644 (file)
--- 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
 
index 692eb87..947fd30 100644 (file)
@@ -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. 
index 7f6873c..b9a7063 100644 (file)
@@ -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;
index 31c480a..989828a 100644 (file)
@@ -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;