fix getNodesAttribs multiple entry problem

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@13631 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2012-08-28 19:37:01 +00:00
parent 5c1a1383f9
commit 48367b9fb6

View File

@ -2359,10 +2359,10 @@ sub getNodesAttribs
}
my $rechash = $tab->getNodesAttribs(\@nodes,\@attrs);
foreach my $node (@nodes){
my %datseg=();
$datseg{name} = [$node];
my $recs = $rechash->{$node};
foreach my $rec (@$recs) {
my %datseg=();
$datseg{name} = [$node];
foreach my $key (keys %$rec) {
$datseg{$key} = [$rec->{$key}];
}