[Catalyst-commits] r9852 - CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD

[karpet at dev.catalyst.perl.org]

Author: karpet
Date: 2009-04-26 04:59:15 +0100 (Sun, 26 Apr 2009)
New Revision: 9852

Modified:
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Controller.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/ModelAdapter.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Object.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/REST.pm
   CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Results.pm
Log:
make the MRO::Compat explicit for < 5.9.5

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Controller.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Controller.pm	2009-04-26 03:39:21 UTC (rev 9851)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Controller.pm	2009-04-26 03:59:15 UTC (rev 9852)
@@ -8,6 +8,7 @@
 use Carp;
 use Catalyst::Utils;
 use CatalystX::CRUD::Results;
+use MRO::Compat;
 use mro 'c3';
 use Data::Dump qw( dump );
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model.pm	2009-04-26 03:39:21 UTC (rev 9851)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Model.pm	2009-04-26 03:59:15 UTC (rev 9852)
@@ -1,6 +1,7 @@
 package CatalystX::CRUD::Model;
 use strict;
 use warnings;
+use MRO::Compat;
 use mro 'c3';
 use base qw(
     Catalyst::Component::ACCEPT_CONTEXT

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/ModelAdapter.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/ModelAdapter.pm	2009-04-26 03:39:21 UTC (rev 9851)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/ModelAdapter.pm	2009-04-26 03:59:15 UTC (rev 9852)
@@ -5,6 +5,7 @@
     CatalystX::CRUD
     Class::Accessor::Fast
 );
+use MRO::Compat;
 use mro 'c3';
 use Carp;
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Object.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Object.pm	2009-04-26 03:39:21 UTC (rev 9851)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Object.pm	2009-04-26 03:59:15 UTC (rev 9852)
@@ -3,6 +3,7 @@
 use warnings;
 use base qw( Class::Accessor::Fast Class::Data::Inheritable CatalystX::CRUD );
 use Carp;
+use MRO::Compat;
 use mro 'c3';
 Class::C3::initialize();
 

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/REST.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/REST.pm	2009-04-26 03:39:21 UTC (rev 9851)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/REST.pm	2009-04-26 03:59:15 UTC (rev 9852)
@@ -3,6 +3,7 @@
 use warnings;
 use base qw( CatalystX::CRUD::Controller );
 use Carp;
+use MRO::Compat;
 use mro 'c3';
 use Data::Dump qw( dump );
 
@@ -71,7 +72,8 @@
  __PACKAGE__->setup();
  
  # add these 2 lines
- use mro 'c3';
+ use MRO::Compat;
+use mro 'c3';
  Class::C3::initialize();
 
 This is required for Class::C3 to resolve the inheritance chain correctly,

Modified: CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Results.pm
===================================================================
--- CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Results.pm	2009-04-26 03:39:21 UTC (rev 9851)
+++ CatalystX-CRUD/CatalystX-CRUD/trunk/lib/CatalystX/CRUD/Results.pm	2009-04-26 03:59:15 UTC (rev 9852)
@@ -3,6 +3,7 @@
 use warnings;
 use base qw( Class::Accessor::Fast );
 use Carp;
+use MRO::Compat;
 use mro 'c3';
 
 __PACKAGE__->mk_ro_accessors(qw( count pager query results ));