Fix a bug. Modify the process of creating Frame/CEC definition.
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@9151 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
454c36fed4
commit
7ab8fbcc09
@ -2068,7 +2068,6 @@ sub parse_responses {
|
||||
"slot",
|
||||
"ip-address" );
|
||||
|
||||
my $primary;
|
||||
my %fid1;
|
||||
my %fid2;
|
||||
my %cid;
|
||||
@ -2125,10 +2124,8 @@ sub parse_responses {
|
||||
my $val = $1;
|
||||
if (( $_ =~ /^slot$/ ) and ( $val == 0 )) {
|
||||
push @result, "B";
|
||||
$primary = 0;
|
||||
} elsif (( $_ =~ /^slot$/ ) and ( $val == 1 )) {
|
||||
push @result, "A";
|
||||
$primary = 1;
|
||||
} else {
|
||||
push @result, $val;
|
||||
}
|
||||
@ -2212,8 +2209,7 @@ sub parse_responses {
|
||||
###########################################
|
||||
$hostname = undef;
|
||||
$host = "Server-$result[1]-SN$result[2]";
|
||||
#unless ( exists( $outhash{$host} ))
|
||||
if ( $primary )
|
||||
unless ( exists( $outhash{$host} ))
|
||||
{
|
||||
if ( $type eq SERVICE_BPA )
|
||||
{
|
||||
|
Loading…
Reference in New Issue
Block a user