From 25c4a6e60268a49b5860775ee7ea85ff1cf304b3 Mon Sep 17 00:00:00 2001
From: yinle <yinle@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Wed, 13 Jul 2011 04:18:03 +0000
Subject: [PATCH] fix bug 3356485 :mkhwconn frame03 -s -V fails for sfp HMC
 connection

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@10070 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 xCAT-server/lib/perl/xCAT/PPC.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/xCAT-server/lib/perl/xCAT/PPC.pm b/xCAT-server/lib/perl/xCAT/PPC.pm
index 48baf47bc..ccede8c73 100644
--- a/xCAT-server/lib/perl/xCAT/PPC.pm
+++ b/xCAT-server/lib/perl/xCAT/PPC.pm
@@ -2318,7 +2318,7 @@ sub getHCPsOfNodes
             if ( $ppctab ) {
                 my $typeref = xCAT::DBobjUtils->getnodetype($nodes);
                 my $i = 0;
-                unless ( $request->{arg}->[1] ) {
+                unless ( $request->{sfp} ) {
                     for my $n (@$nodes) {
                         if (@$typeref[$i++] =~ /^fsp|bpa$/) {
                             my $np = $ppctab->getNodeAttribs( $n, [qw(parent)]);
@@ -2337,7 +2337,7 @@ sub getHCPsOfNodes
                     } 
                     return \%newhcp;
                 } else { 
-                    my $sfp = $request->{arg}->[1];
+                    my $sfp = $request->{sfp};
                     my %sfphash;
                     for my $n (@$nodes) {
                         # record hcp