X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass.pm;h=75eb74f978f3edfea1ffce22d44ffbc11173dd2f;hb=bc0c980086ba429cf33b1d471d1035601727231f;hp=c8d1d2e8b2b9d4faccae6eec37eafd35a0868336;hpb=a0638a7bb719844a0d5c264265a3a13b18d3318f;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class.pm b/lib/DBIx/Class.pm index c8d1d2e..75eb74f 100644 --- a/lib/DBIx/Class.pm +++ b/lib/DBIx/Class.pm @@ -17,7 +17,8 @@ $VERSION = '0.05999_04'; sub MODIFY_CODE_ATTRIBUTES { my ($class,$code,@attrs) = @_; - $class->mk_classdata('__attr_cache' => {}) unless $class->can('__attr_cache'); + $class->mk_classdata('__attr_cache' => {}) + unless $class->can('__attr_cache'); $class->__attr_cache->{$code} = [@attrs]; return (); }