X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-Getopt.git;a=blobdiff_plain;f=lib%2FMooseX%2FGetopt.pm;h=2356ef8531d0a5ac4cb4bdf0e5d7f56163409fdb;hp=74b8be02320a10f322243986847eb989567e9874;hb=69061f7a842ae72f8ff7ea37d5cfd4ce028400d7;hpb=f4308031a6f638c55439e3071af124f79eacd2ca diff --git a/lib/MooseX/Getopt.pm b/lib/MooseX/Getopt.pm index 74b8be0..2356ef8 100644 --- a/lib/MooseX/Getopt.pm +++ b/lib/MooseX/Getopt.pm @@ -55,7 +55,7 @@ sub new_with_options { $class->new( ARGV => $processed{argv_copy}, extra_argv => $processed{argv}, - @params, # explicit params to ->new + %$constructor_params, # explicit params to ->new %$params, # params from CLI ); }