diff --git a/perl-xCAT/xCAT/SLP.pm b/perl-xCAT/xCAT/SLP.pm index af2240e76..07b1033e6 100644 --- a/perl-xCAT/xCAT/SLP.pm +++ b/perl-xCAT/xCAT/SLP.pm @@ -117,7 +117,7 @@ sub dodiscover { # receive untill there is none ######################################## while ($waitforsocket->can_read(0)) { - my $peer = $args{'socket'}->recv($slppacket,1400,0); + my $peer = $args{'socket'}->recv($slppacket,3000,0); push @peerarray, $peer; push @pkgarray, $slppacket; }