From 28c28bb9d2f1d8077faee283d8777ca96c1fedec Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Wed, 16 May 2012 17:24:03 +0000
Subject: [PATCH] Fix problem where SLP.pm would create too large an SLP packet
 if there are a number of IPv6 entities on the network

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.7@12743 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/xCAT/SLP.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-xCAT/xCAT/SLP.pm b/perl-xCAT/xCAT/SLP.pm
index 98cba6bac..bd86fd0b6 100644
--- a/perl-xCAT/xCAT/SLP.pm
+++ b/perl-xCAT/xCAT/SLP.pm
@@ -111,7 +111,7 @@ sub dodiscover {
 		    			}
 		    			$result->{peername} = $peername;
                         if ($gprlist) {
-                            $gprlist = $gprlist.','.$peername if($rspcount < 100);
+                            $gprlist .= ','.$peername if(length($gprlist) < 1250);
                         } else {
                             $gprlist = $peername;
                         }