Add 'use warnings FATAL => "recursion"' to Accessor.pm
gfx [Sun, 20 Dec 2009 05:10:20 +0000 (14:10 +0900)]
lib/Mouse/Meta/Method/Accessor.pm

index 40e2122..1388373 100755 (executable)
@@ -1,5 +1,7 @@
 package Mouse::Meta::Method::Accessor;
 use Mouse::Util qw(:meta); # enables strict and warnings
+use warnings FATAL => 'recursion';
+
 
 sub _inline_slot{
     my(undef, $self_var, $attr_name) = @_;