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

remove msgs from getNodeDomains

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@14226 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
nott
2012-11-02 13:48:48 +00:00
parent 49b78de893
commit 915492b44a
1 changed files with 0 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
perl-xCAT/xCAT/NetworkUtils.pm
View File

@@ -70,29 +70,16 @@ sub getNodeDomains()
{
my $class = shift;
my $nodes = shift;
my $callback = shift;
my @nodelist = @$nodes;
my %nodedomains;
# Get the network info for each node
my %nethash = xCAT::DBobjUtils->getNetwkInfo(\@nodelist, $callback);
if (!(%nethash) && $::VERBOSE)
{
my $rsp;
push @{$rsp->{data}}, "Could not get xCAT network definitions for one or more nodes.\n";
xCAT::MsgUtils->message("W", $rsp, $callback);
}
# get the site domain value
my @domains = xCAT::TableUtils->get_site_attribute("domain");
my $sitedomain = $domains[0];
if (!$sitedomain && $::VERBOSE)
{
my $rsp;
push @{$rsp->{data}}, "Cannot get a domain value from the cluster site definition.\n";
xCAT::MsgUtils->message("W", $rsp, $callback);
}
# for each node - set hash value to network domain or default
# to site domain