diff --git a/Modules.pm b/Modules.pm index 1243eb4..eb22725 100644 --- a/Modules.pm +++ b/Modules.pm @@ -192,7 +192,7 @@ sub _new_module_internal { "module" => $self, ); foreach my $key (%{$self}) { - $args{$key} = $self -> {$key} if(!defined($args{$key})); + $args{$key} = $self -> {$key} if(!defined($args{$key}) && defined($self -> {$key})); } my $modobj = $name -> new(%args)