X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FMeta%2FModule.pm;h=07c68537bb17a01bf5480046e51535e500008353;hb=152e575977686383156384335b6598542c0c1ac9;hp=25831a99a4ca294a2c285a5531e91eab86b6e105;hpb=e75f21db61e436b0a3646c6edba9a3d1aae7d696;p=gitmo%2FMouse.git diff --git a/lib/Mouse/Meta/Module.pm b/lib/Mouse/Meta/Module.pm index 25831a9..07c6853 100755 --- a/lib/Mouse/Meta/Module.pm +++ b/lib/Mouse/Meta/Module.pm @@ -10,9 +10,7 @@ use Mouse::Util qw/:meta get_code_package not_supported load_class/; my %METAS; -# because Mouse doesn't introspect existing classes, we're forced to -# only pay attention to other Mouse classes -sub _metaclass_cache { +sub _metaclass_cache { # DEPRECATED my($class, $name) = @_; return $METAS{$name}; } @@ -63,7 +61,7 @@ sub name { $_[0]->{package} } # add_attribute is an abstract method -sub get_attribute_map { +sub get_attribute_map { # DEPRECATED Carp::cluck('get_attribute_map() has been deprecated'); return $_[0]->{attributes}; }