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

Remove -A in hostnames of BPA

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5556 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
wanghuaz 2010-03-23 07:29:09 +00:00
parent bc8b54bbd8
commit e6c57804cc
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
perl-xCAT/xCAT/PPCdb.pm
View File

@ -247,6 +247,7 @@ sub update_ppc {
if ( $vpdent->{mtm} eq $model && $vpdent->{serial} eq $serial && $vpdent->{side} eq $side )
{
$predefined_node = $vpdent->{node};
print "TEST:prefdefined_node=$predefined_node\n";
if ( $predefined_node =~ /-B$/ ) {
$name = $name . "-B";
}
@ -288,9 +289,7 @@ sub update_ppc {
if ( $vpdent->{mtm} eq $model && $vpdent->{serial} eq $serial && $vpdent->{side} eq $side )
{
$predefined_node = $vpdent->{node};
if ( $predefined_node =~ /-A$/ ) {
$name = $name . "-A";
} elsif ( $predefined_node =~ /-B$/ ) {
if ( $predefined_node =~ /-B$/ ) {
$name = $name . "-B";
}
if (update_node_attribs($hwtype, $type, $name, $id, $model, $serial, $side,