From a8dc249d3b7342876f8d015dca8c8c6c27aad16f Mon Sep 17 00:00:00 2001 From: cjhardee Date: Mon, 15 Feb 2010 15:36:07 +0000 Subject: [PATCH] Added a check for an uninitialized OS to fix the following message: Use of uninitialized value in string eq at /opt/xcat/lib/perl/xCAT/Utils.pm line 3331. git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5219 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT/xCAT/Utils.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-xCAT/xCAT/Utils.pm b/perl-xCAT/xCAT/Utils.pm index 142487174..4434c565e 100644 --- a/perl-xCAT/xCAT/Utils.pm +++ b/perl-xCAT/xCAT/Utils.pm @@ -3328,7 +3328,7 @@ sub get_ServiceNode } else { - if ($oshash->{$node}->[0]->{os} eq "AIX") { + if ( ($oshash->{$node}->[0]->{os}) && ($oshash->{$node}->[0]->{os} eq "AIX")) { push @{$snhash{$nimprime}}, $node; } else { push @{$snhash{$master}}, $node;