From 6ab064d983971735835001abc2b8568871d6c00c Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 27 May 2005 05:34:47 +0000
Subject: fix addVarsInSh() with no fields

---
 MDK/Common/System.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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);
-- 
cgit v1.2.1