From f43f3508b26df406d14fbb32a94fed0bdfd4ea7a Mon Sep 17 00:00:00 2001
From: zhaoertao <zhaoertao@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Tue, 3 Jul 2012 06:31:58 +0000
Subject: [PATCH] fix PMR 29163,066,866 ECMWF :chvm broken after xcat 2.7.2
 upgrade

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

diff --git a/perl-xCAT/xCAT/FSPvm.pm b/perl-xCAT/xCAT/FSPvm.pm
index 0fe503420..c3a0c8a5a 100644
--- a/perl-xCAT/xCAT/FSPvm.pm
+++ b/perl-xCAT/xCAT/FSPvm.pm
@@ -717,9 +717,10 @@ sub modify_by_prof {
     while (my ($cec,$h) = each(%$hash) ) {
         while (my ($lpar,$d) = each(%$h) ) {
             $td = $d;
-            @$td[4] = "fsp";
+            #@$td[4] = "fsp";
             $cec_name = @$d[3]; 
         }
+        $td->[4] = "cec";
         #get the current I/O slot information
         xCAT::MsgUtils->verbose_message($request, "$request->{command} :get_io_slot_info for node:$cec_name."); 
         my $action = "get_io_slot_info";