[Catalyst-commits] r9078 - in trunk/Catalyst-Plugin-I18N: . lib/Catalyst/Plugin

[bricas at dev.catalyst.perl.org]

Author: bricas
Date: 2009-01-12 15:43:58 +0000 (Mon, 12 Jan 2009)
New Revision: 9078

Modified:
   trunk/Catalyst-Plugin-I18N/Changes
   trunk/Catalyst-Plugin-I18N/Makefile.PL
   trunk/Catalyst-Plugin-I18N/lib/Catalyst/Plugin/I18N.pm
Log:
switch NEXT out for MRO::Compat

Modified: trunk/Catalyst-Plugin-I18N/Changes
===================================================================
--- trunk/Catalyst-Plugin-I18N/Changes	2009-01-12 15:14:38 UTC (rev 9077)
+++ trunk/Catalyst-Plugin-I18N/Changes	2009-01-12 15:43:58 UTC (rev 9078)
@@ -1,5 +1,8 @@
 Revision history for Perl extension Catalyst::Plugin::I18N.
 
+0.09  XXX
+        - switch NEXT out for MRO::Compat
+
 0.08  Wed Aug 06 2008
         - update dependency on I18N::LangTags
 

Modified: trunk/Catalyst-Plugin-I18N/Makefile.PL
===================================================================
--- trunk/Catalyst-Plugin-I18N/Makefile.PL	2009-01-12 15:14:38 UTC (rev 9077)
+++ trunk/Catalyst-Plugin-I18N/Makefile.PL	2009-01-12 15:43:58 UTC (rev 9078)
@@ -13,6 +13,7 @@
 requires 'Locale::Maketext::Simple';
 requires 'I18N::LangTags' => '0.35';
 requires 'Locale::Maketext::Lexicon';
+requires 'MRO::Compat';
 
 test_requires 'Test::More';
 

Modified: trunk/Catalyst-Plugin-I18N/lib/Catalyst/Plugin/I18N.pm
===================================================================
--- trunk/Catalyst-Plugin-I18N/lib/Catalyst/Plugin/I18N.pm	2009-01-12 15:14:38 UTC (rev 9077)
+++ trunk/Catalyst-Plugin-I18N/lib/Catalyst/Plugin/I18N.pm	2009-01-12 15:43:58 UTC (rev 9078)
@@ -3,13 +3,13 @@
 use strict;
 use warnings;
 
-use NEXT;
+use MRO::Compat;
 use I18N::LangTags ();
 use I18N::LangTags::Detect;
 
 require Locale::Maketext::Simple;
 
-our $VERSION = '0.08';
+our $VERSION = '0.09';
 our %options = ( Export => '_loc', Decode => 1 );
 
 =head1 NAME
@@ -71,7 +71,7 @@
 
 sub setup {
     my $self = shift;
-    $self->NEXT::setup(@_);
+    $self->next::method(@_);
     my $calldir = $self;
     $calldir =~ s{::}{/}g;
     my $file = "$calldir.pm";