From 66c92732079bc1bac1a70aaf6595043769d0e9e0 Mon Sep 17 00:00:00 2001 From: ligc Date: Tue, 29 Sep 2009 09:49:54 +0000 Subject: [PATCH] fix for bug 2866597 git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@4257 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT/xCAT/NodeRange.pm | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/perl-xCAT/xCAT/NodeRange.pm b/perl-xCAT/xCAT/NodeRange.pm index 11d03fe46..334d6f724 100644 --- a/perl-xCAT/xCAT/NodeRange.pm +++ b/perl-xCAT/xCAT/NodeRange.pm @@ -232,9 +232,13 @@ sub expandatom { #TODO: implement table selection as an atom (nodetype.os==rhels foreach (@allnodeset) { push @nodes,$_->{node}; } - my $nbyc = nodesbycriteria(\@nodes,[$atom])->{$atom}; - if (defined $nbyc) { - return @$nbyc; + my $nbyc_ref = nodesbycriteria(\@nodes,[$atom]); + if ($nbyc_ref) + { + my $nbyc = $nbyc_ref->{$atom}; + if (defined $nbyc) { + return @$nbyc; + } } return (); }