From d63ebb85224f7b25e0b8ce4d876a0b820e1a3e2e Mon Sep 17 00:00:00 2001
From: sakolish <sakolish@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 17 Nov 2008 20:40:30 +0000
Subject: [PATCH] Fixed problem with rpower for CEC commands

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

diff --git a/perl-xCAT/xCAT/PPCcli.pm b/perl-xCAT/xCAT/PPCcli.pm
index 06811ec31..fdce1138c 100644
--- a/perl-xCAT/xCAT/PPCcli.pm
+++ b/perl-xCAT/xCAT/PPCcli.pm
@@ -621,9 +621,9 @@ sub lpar_netboot {
         $cmd.= " -i";
     } else {
         #################################
-	# Determine if LPAR and mgmt node
-	# are AIX or not.
-	################################
+ # Determine if LPAR and mgmt node
+ # are AIX or not.
+ ################################
         my $table = "nodetype";
         my @TableRowArray = xCAT::DBobjUtils->getDBtable($table);
         if (defined(@TableRowArray))
@@ -988,7 +988,7 @@ sub power_cmd {
 
     my $op   = shift;  
     my $d    = shift;
-    my $type = @$d[4];
+    my $type = (@$d[4] eq "fsp") ? "sys" : @$d[4];
 
     ##############################
     # Build command 
@@ -1077,3 +1077,4 @@ sub network_reset {
 
 
 
+