add a NoGetopt metaclass

[gitmo/MooseX-Getopt.git] / lib / MooseX / Getopt.pm

diff --git a/lib/MooseX/Getopt.pm b/lib/MooseX/Getopt.pm
index 1417d08..1333e7f 100644 (file)
--- 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