%options = map { $_ => $options{$_} } grep { defined $options{$_} } keys %options;
$getopt->options( \%options );
- die join '', $getopt->warning if $getopt->die_on_warning && $getopt->has_warning;
+ die join '', $getopt->warning if $getopt->has_warning;
### MooseX::Getopt::Parser::Long::build_options %options : %options
return \%options;