1 package MooseX::UndefTolerant::Class;
4 if ( $Moose::VERSION >= 1.9900 ) {
5 around('_inline_init_attr_from_constructor', sub {
10 my @source = $self->$orig(@_);
12 my $init_arg = $attr->init_arg;
15 "if ( exists \$params->{$init_arg} && defined \$params->{$init_arg} ) {",
18 "delete \$params->{$init_arg};",