From d8b35737da8f2a72d606ac7122dce7837f357e12 Mon Sep 17 00:00:00 2001
From: lissav <lissav@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Wed, 31 Mar 2010 12:45:48 +0000
Subject: [PATCH] fix nodeonmynet to handle networks table with entries that
 have no mgtifname

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5627 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/xCAT/Utils.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/perl-xCAT/xCAT/Utils.pm b/perl-xCAT/xCAT/Utils.pm
index e0f47c756..b833d608d 100644
--- a/perl-xCAT/xCAT/Utils.pm
+++ b/perl-xCAT/xCAT/Utils.pm
@@ -2412,7 +2412,8 @@ sub nodeonmynet
         my $nettab=xCAT::Table->new("networks");
         my @vnets = $nettab->getAllAttribs('net','mgtifname','mask');
         foreach (@vnets) {
-            if ($_->{mgtifname} eq '!remote!') { #global scoped network
+            if ((defined $_->{mgtifname}) && ($_->{mgtifname} eq '!remote!'))
+            { #global scoped network
                 my $curm = unpack("N", inet_aton($_->{mask}));
                 my $bits=32;
                 until ($curm & 1)  {