add a NoGetopt metaclass

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

diff --git a/lib/MooseX/Getopt/Meta/NoGetopt.pm b/lib/MooseX/Getopt/Meta/NoGetopt.pm
new file mode 100644 (file)
index 0000000..c7c1d99
--- /dev/null
+++ b/lib/MooseX/Getopt/Meta/NoGetopt.pm
@@ -0,0 +1,17 @@
+
+package MooseX::Getopt::Meta::NoGetopt;
+use Moose;
+use Moose::Util::TypeConstraints;
+
+our $VERSION   = '0.01';
+our $AUTHORITY = 'cpan:STEVAN';
+
+extends 'Moose::Meta::Attribute'; # << Moose extending Moose :)
+
+no Moose;
+
+# register this as a metaclass alias ...
+package Moose::Meta::Attribute::Custom::NoGetopt;
+sub register_implementation { 'MooseX::Getopt::Meta::NoGetopt' }
+
+1;
\ No newline at end of file