2 package MooseX::Getopt::Strict;
7 around '_compute_getopt_attrs' => sub {
9 my ( $class, @args ) = @_;
11 $_->isa("MooseX::Getopt::Meta::Attribute")
12 } $class->$next(@args);
23 MooseX::Getopt::Strict - only make options for attrs with the Getopt metaclass
27 This is an stricter version of C<MooseX::Getopt> which only processes the
28 attributes if they explicitly set as C<Getopt> attributes. All other attributes
29 are ignored by the command line handler.
41 All complex software has bugs lurking in it, and this module is no
42 exception. If you find a bug please either email me, or add the bug
47 Stevan Little E<lt>stevan@iinteractive.comE<gt>
49 Yuval Kogman C<< <nuffin@cpan.org> >>
51 =head1 COPYRIGHT AND LICENSE
53 Copyright 2007-2008 by Infinity Interactive, Inc.
55 L<http://www.iinteractive.com>
57 This library is free software; you can redistribute it and/or modify
58 it under the same terms as Perl itself.