From: gfx Date: Sun, 20 Dec 2009 05:10:20 +0000 (+0900) Subject: Add 'use warnings FATAL => "recursion"' to Accessor.pm X-Git-Tag: 0.4501~2 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e950b35555e8f7a09358c506b0f3cc57a03dc940;p=gitmo%2FMouse.git Add 'use warnings FATAL => "recursion"' to Accessor.pm --- diff --git a/lib/Mouse/Meta/Method/Accessor.pm b/lib/Mouse/Meta/Method/Accessor.pm index 40e2122..1388373 100755 --- a/lib/Mouse/Meta/Method/Accessor.pm +++ b/lib/Mouse/Meta/Method/Accessor.pm @@ -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) = @_;