diff --git a/perl-xCAT/xCAT/SLP.pm b/perl-xCAT/xCAT/SLP.pm
index a54724d68..ef407620c 100644
--- a/perl-xCAT/xCAT/SLP.pm
+++ b/perl-xCAT/xCAT/SLP.pm
@@ -116,7 +116,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;
             }