X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FAccessorGroups.pm;h=a8e3b971deb8f3710e353ba19a1f16d217584d53;hb=ba8c183b7c3d71a5b8fcd936916e80a7b87f7961;hp=3d0685bc905259afec320a7d00adf18bb866e2b7;hpb=ad0ed975f7023237ac91802e5da9ab4f30c7661d;p=p5sagit%2FClass-Accessor-Grouped.git diff --git a/t/lib/AccessorGroups.pm b/t/lib/AccessorGroups.pm index 3d0685b..a8e3b97 100644 --- a/t/lib/AccessorGroups.pm +++ b/t/lib/AccessorGroups.pm @@ -57,13 +57,13 @@ EOE } sub new { - return bless {}, shift; + return bless {}, shift; }; foreach (qw/multiple listref/) { - no strict 'refs'; - *{"get_$_"} = __PACKAGE__->can('get_simple'); - *{"set_$_"} = __PACKAGE__->can('set_simple'); + no strict 'refs'; + *{"get_$_"} = __PACKAGE__->can('get_simple'); + *{"set_$_"} = __PACKAGE__->can('set_simple'); }; 1;