diff options
| -rw-r--r-- | MDK/Common/System.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/MDK/Common/System.pm b/MDK/Common/System.pm index c0dfbb2..ff94cd3 100644 --- a/MDK/Common/System.pm +++ b/MDK/Common/System.pm @@ -350,7 +350,7 @@ sub addVarsInSh { sub addVarsInShMode { my ($file, $mod, $l, @fields) = @_; - my %l = map { $_ => $l->{$_} } @fields; + my %l = @fields ? map { $_ => $l->{$_} } @fields : %$l; my %l2 = getVarsFromSh($file); # below is add2hash_(\%l, \%l2); |