From c3e5302619dabbdc4cd10d6eaa72d08c30d4b64d Mon Sep 17 00:00:00 2001 From: jbjohnso Date: Thu, 30 Sep 2010 14:30:58 +0000 Subject: [PATCH] -Fix getNodeAttribs git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@7736 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT/xCAT/Table.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/perl-xCAT/xCAT/Table.pm b/perl-xCAT/xCAT/Table.pm index 924beae5f..a03c33143 100644 --- a/perl-xCAT/xCAT/Table.pm +++ b/perl-xCAT/xCAT/Table.pm @@ -2224,6 +2224,9 @@ sub getNodeAttribs #if ($extra) { return undef; } # return (undef,"Ambiguous query"); } defined($data[0]) || return undef; #(undef,"No matching entry found in configuration"); + unless (scalar keys %{$data[0]}) { + return undef; + } my $attrib; foreach $datum (@data) { foreach $attrib (@attribs)