From 8df2c29208d35cc9af860eab2bed24f6032f2e20 Mon Sep 17 00:00:00 2001
From: sakolish <sakolish@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Fri, 20 Jun 2008 13:15:23 +0000
Subject: [PATCH] Modified "mksyscfg" function to allow -p flag in "chvm"

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

diff --git a/perl-xCAT/xCAT/PPCcli.pm b/perl-xCAT/xCAT/PPCcli.pm
index 33bcbf449..e8ef73021 100644
--- a/perl-xCAT/xCAT/PPCcli.pm
+++ b/perl-xCAT/xCAT/PPCcli.pm
@@ -34,7 +34,7 @@ my %lssyscfg = (
   lpar   =>"lssyscfg -r lpar -m %s -F %s",
   bpa    =>"lssyscfg -r frame -e %s -F %s",
   bpas   =>"lssyscfg -r frame -F %s",
-  prof   =>"lssyscfg -r prof -m %s --filter lpar_ids=%s",
+  prof   =>"lssyscfg -r prof -m %s --filter %s",
   cage   =>"lssyscfg -r cage -e %s -F %s"
 );
 
@@ -291,6 +291,7 @@ sub chsyscfg {
 sub mksyscfg {
 
     my $exp     = shift;
+    my $res     = shift;
     my $d       = shift;
     my $cfgdata = shift;
 
@@ -303,7 +304,7 @@ sub mksyscfg {
     #####################################
     # Format command based on CEC name
     #####################################
-    my $cmd = "mksyscfg -r lpar -m @$d[2] -i \"$cfgdata\""; 
+    my $cmd = "mksyscfg -r $res -m @$d[2] -i \"$cfgdata\""; 
 
     #####################################
     # Send command