X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FGetopt%2FParser%2FDefault.pm;fp=lib%2FMooseX%2FGetopt%2FParser%2FDefault.pm;h=f8342fc87b7f9b8493d73311d985ef2aae80abff;hb=c5c99e6b124174e5f9e56312058f6b302dd5369c;hp=8c460c480e588fcae1fb7e153d52fb6722825bc1;hpb=70171cea83000f79fe002bf17e531ee50131c9ad;p=gitmo%2FMooseX-Getopt.git diff --git a/lib/MooseX/Getopt/Parser/Default.pm b/lib/MooseX/Getopt/Parser/Default.pm index 8c460c4..f8342fc 100644 --- a/lib/MooseX/Getopt/Parser/Default.pm +++ b/lib/MooseX/Getopt/Parser/Default.pm @@ -10,13 +10,14 @@ use maybe 'MooseX::Getopt::Parser::Descriptive'; sub new { my $class = shift; return maybe::HAVE_MOOSEX_GETOPT_PARSER_DESCRIPTIVE - ? MooseX::Getopt::Parser::Descriptive->new(@_) - : MooseX::Getopt::Parser::Long->new(@_); + ? MooseX::Getopt::Parser::Descriptive->new(@_) + : MooseX::Getopt::Parser::Long->new(@_); }; 1; + __END__ =pod