X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FPerl%2FCritic%2FPolicy%2FDynamic%2FMoose%2FProhibitPublicBuilders.pm;h=bab0707998c19a6796ebfe4b4537743c5067979e;hb=9e6b568bc7d8ac13f04267694de6f9eb1f935503;hp=841746d0f08f486b16137aee11deee18ceebdc16;hpb=cc784ef46043f1a1839d0c1ff3d865a7d422c4b8;p=gitmo%2FPerl-Critic-Dynamic-Moose.git diff --git a/lib/Perl/Critic/Policy/Dynamic/Moose/ProhibitPublicBuilders.pm b/lib/Perl/Critic/Policy/Dynamic/Moose/ProhibitPublicBuilders.pm index 841746d..bab0707 100644 --- a/lib/Perl/Critic/Policy/Dynamic/Moose/ProhibitPublicBuilders.pm +++ b/lib/Perl/Critic/Policy/Dynamic/Moose/ProhibitPublicBuilders.pm @@ -2,8 +2,8 @@ package Perl::Critic::Policy::Dynamic::Moose::ProhibitPublicBuilders; use Moose; extends 'Perl::Critic::Policy::Dynamic::Moose'; -Readonly::Scalar my $DESC = q{Builder method name without a leading underscore}; -Readonly::Scalar my $EXPL = q{Prefix builder method names with an underscore}; +Readonly::Scalar my $DESC => q{Builder method name without a leading underscore}; +Readonly::Scalar my $EXPL => q{Prefix builder method names with an underscore}; sub violates_metaclass { my $self = shift;