fix for defect 3546058

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@13672 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2012-08-30 17:14:21 +00:00
parent 1fdcfdb959
commit c7cf72f3a2

View File

@ -250,13 +250,15 @@ sub gettab
{
my $tab = xCAT::Table->new($tabn);
(my $ent) = $tab->getAttribs(\%keyhash, keys %{$tabhash{$tabn}});
foreach my $coln (keys %{$tabhash{$tabn}})
{
if ($ent) {
foreach my $coln (keys %{$tabhash{$tabn}})
{
if ($terse > 0) {
$callback->({data => ["" . $ent->{$coln}]});
} else {
$callback->({data => ["$tabn.$coln: " . $ent->{$coln}]});
}
}
}
$tab->close;
}