From: Guillermo Roditi Date: Mon, 23 Jun 2008 20:59:49 +0000 (+0000) Subject: AttrContainer no longer ISA C::D::I but still uses it until I figure what to do about... X-Git-Tag: 5.8000_03~120 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=e7dc25cd71e0b09ba2a457b240d5d922e0279507 AttrContainer no longer ISA C::D::I but still uses it until I figure what to do about ClassAttribute things r16982@martha (orig r7505): groditi | 2008-03-15 01:12:50 -0400 --- diff --git a/lib/Catalyst/AttrContainer.pm b/lib/Catalyst/AttrContainer.pm index a33d822..ddfe0ab 100644 --- a/lib/Catalyst/AttrContainer.pm +++ b/lib/Catalyst/AttrContainer.pm @@ -1,11 +1,19 @@ package Catalyst::AttrContainer; -use strict; -use base qw/Class::Accessor::Fast Class::Data::Inheritable/; +use Moose; +#use strict; +#use base qw/Class::Accessor::Fast Class::Data::Inheritable/; use Catalyst::Exception; use NEXT; +#dont want to ISA a C::D::I +use Class::Data::Inheritable; +{ + my $mk_classdata = Class::Data::Inheritable->can('mk_classdata'); + __PACKAGE__->meta->add_method(mk_classdata => $mk_classdata); +} + __PACKAGE__->mk_classdata($_) for qw/_attr_cache _action_cache/; __PACKAGE__->_attr_cache( {} ); __PACKAGE__->_action_cache( [] ); @@ -29,7 +37,7 @@ Catalyst::AttrContainer =head1 DESCRIPTION -This class sets up the code attribute cache. It's a base class for +This class sets up the code attribute cache. It's a base class for L. =head1 METHODS