arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Stripped additional profile attributes for modify() function - Line 673

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@222 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
sakolish 2008-01-07 20:34:53 +00:00
parent abaf8877a3
commit 711e6f03ab
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
perl-xCAT-2.0/xCAT/PPCvm.pm
View File

@ -666,6 +666,16 @@ sub modify {
# Change configuration
###############################
my $cfg = strip_profile( $cfgdata, $hwtype );
###############################
# Additional changes
###############################
$cfg =~ s/,*lpar_env=[^,]+|$//;
if ( $hwtype eq "hmc" ) {
$cfg =~ s/,*all_resources=[^,]+|$//;
$cfg =~ s/,*lpar_id=[^,]+|$//;
}
my $result = xCAT::PPCcli::chsyscfg( $exp, $d, $cfg );
my $Rc = shift(@$result);