From 528b9fd1bb63b335b50d6b63f102e5469aed3872 Mon Sep 17 00:00:00 2001
From: yinle <yinle@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Fri, 15 Apr 2011 04:57:49 +0000
Subject: [PATCH] minor fix

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

diff --git a/xCAT-server/lib/perl/xCAT/PPC.pm b/xCAT-server/lib/perl/xCAT/PPC.pm
index 492094f51..d92024512 100644
--- a/xCAT-server/lib/perl/xCAT/PPC.pm
+++ b/xCAT-server/lib/perl/xCAT/PPC.pm
@@ -1742,7 +1742,7 @@ sub process_request {
     #print Dumper(\@failed_nodes); 
     my $hcps = getHCPsOfNodes(\@failed_nodes, $callback);
     if ($request->{command} eq "mkhwconn" ) {
-        if ( grep ("-s", @$request{arg}) ) {
+        if ( grep (/^-s$/, @$request{arg}) ) {
             my $ppctab = xCAT::Table->new('ppc');
             my %newhcp;
             if ( $ppctab ) {