X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-Getopt.git;a=blobdiff_plain;f=lib%2FMooseX%2FGetopt.pm;h=1333e7f6285e81eeb717f041477d8a85c6d0fb8a;hp=1417d08e2ba214c142ad2011ae01f8a58b7330a5;hb=a01f08fb1f7451412f578e905179324dfd2ec590;hpb=26be7f7ed5cd799ab80bf512505ca3474626236e diff --git a/lib/MooseX/Getopt.pm b/lib/MooseX/Getopt.pm index 1417d08..1333e7f 100644 --- a/lib/MooseX/Getopt.pm +++ b/lib/MooseX/Getopt.pm @@ -80,6 +80,7 @@ sub _attrs_to_options { } else { next if $name =~ /^_/; + next if $attr->isa('MooseX::Getopt::Meta::NoGetopt'); } my $opt_string = $aliases