From 98caf993bf4515fef5f43f0965e34c7027a2fd4e Mon Sep 17 00:00:00 2001
From: zet809 <ertaozh@cn.ibm.com>
Date: Wed, 1 Jun 2016 11:40:10 +0800
Subject: [PATCH] Fix MacMap.pm syntax issue

The issue is not using '%' when getting keys for a hash variable.
---
 perl-xCAT/xCAT/MacMap.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-xCAT/xCAT/MacMap.pm b/perl-xCAT/xCAT/MacMap.pm
index 21bb9508c..74c6b8afc 100644
--- a/perl-xCAT/xCAT/MacMap.pm
+++ b/perl-xCAT/xCAT/MacMap.pm
@@ -303,7 +303,7 @@ sub dump_mac_info {
             xCAT::MsgUtils->message("S","xCAT Table error:".$entry->{node}."Has missing or invalid switch.switch and/or switch.port fields");
         }
     }
-    foreach my $switch (keys $self->{switchparmhash}) {
+    foreach my $switch (keys %{$self->{switchparmhash}}) {
         if ($dump_all_switches or defined($switches_to_dump{$switch})) {
             if ($self->{show_verbose_info}) {
                 xCAT::MsgUtils->message("I",{data=>["<INFO>$switch: Start to get information"]}, $self->{callback});