X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FGetopt%2FBasic.pm;h=6b4d40ec655af55279072ace77352f4a7465d751;hb=c885acae4797dc3ce50e91445ceb96c971e87671;hp=87b54dbac3a1cd864fd461e1039e570797423afd;hpb=3aaa34a1cf97648e9704fc9c73abc4ebd8f90b39;p=gitmo%2FMooseX-Getopt.git diff --git a/lib/MooseX/Getopt/Basic.pm b/lib/MooseX/Getopt/Basic.pm index 87b54db..6b4d40e 100644 --- a/lib/MooseX/Getopt/Basic.pm +++ b/lib/MooseX/Getopt/Basic.pm @@ -146,7 +146,8 @@ sub _getopt_spec_exception { sub _getopt_full_usage { my ($self, $usage) = @_; - $usage->die; + print $usage->text; + exit 0; } sub _usage_format {