X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FGetopt%2FParser%2FDescriptive.pm;h=70631e15938781ee3528f518f6e46f961bdd88e5;hb=c6c1f6285c8ad44ddb2375289ea449705bb467ad;hp=bdcc26e3693533d45ba6c0d022078dd7d0f6a095;hpb=550da40200cbc32e0f608ccd8ab6ec5ce4ccce75;p=gitmo%2FMooseX-Getopt.git

diff --git a/lib/MooseX/Getopt/Parser/Descriptive.pm b/lib/MooseX/Getopt/Parser/Descriptive.pm
index bdcc26e..70631e1 100644
--- 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);
 }