From ff7ded28e8f7cb3da33d6d210ba00152168009bc Mon Sep 17 00:00:00 2001
From: Axel Beckert <abe@deuxchevaux.org>
Date: Thu, 14 Mar 2013 00:10:18 +0100
Subject: [PATCH] Only the key for %ENV, but not for %CONFIG, needs to be
 modified

---
 bin/xen-create-image | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/bin/xen-create-image b/bin/xen-create-image
index 6417a5b..b1ac0fa 100755
--- a/bin/xen-create-image
+++ b/bin/xen-create-image
@@ -3529,10 +3529,11 @@ sub exportEnvironment
 
     foreach my $key ( keys %CONFIG )
     {
-        $key =~ s/-/_/g;
         if ( defined( $CONFIG{ $key } ) )
         {
-            $ENV{ $key } = $CONFIG{ $key };
+            my $envkey = $key;
+            $envkey =~ s/-/_/g;
+            $ENV{ $envkey } = $CONFIG{ $key };
         }
     }
 }