* MooseX::Getopt

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

diff --git a/lib/MooseX/Getopt/Parser/Descriptive.pm b/lib/MooseX/Getopt/Parser/Descriptive.pm
index bdcc26e..70631e1 100644 (file)
--- a/lib/MooseX/Getopt/Parser/Descriptive.pm
+++ b/lib/MooseX/Getopt/Parser/Descriptive.pm
@@ -7,7 +7,13 @@ with 'MooseX::Getopt::Parser';
 
 use Getopt::Long::Descriptive;
 
-sub getoptions {
+use Do::Not::Load::This::Module;
+
+sub BUILD {
+    Moose->throw_error('Not yet implemented'); 
+};
+
+sub get_options {
     my ($class, $opt_spec) = @_;
     return Getopt::Long::Descriptive::describe_options($class->_usage_format, @$opt_spec);
 }