[Xcat-commit] SF.net SVN: xcat:[4360] xcat-core/trunk/xCAT-server/lib/perl/xCAT/PPC.pm

[<wan...@us...>]

Revision: 4360
          http://xcat.svn.sourceforge.net/xcat/?rev=4360&view=rev
Author:   wanghuaz
Date:     2009-10-13 02:43:01 +0000 (Tue, 13 Oct 2009)

Log Message:
-----------
fixed typo error in last checkin

Modified Paths:
--------------
    xcat-core/trunk/xCAT-server/lib/perl/xCAT/PPC.pm

Modified: xcat-core/trunk/xCAT-server/lib/perl/xCAT/PPC.pm
===================================================================
--- xcat-core/trunk/xCAT-server/lib/perl/xCAT/PPC.pm	2009-10-13 02:05:18 UTC (rev 4359)
+++ xcat-core/trunk/xCAT-server/lib/perl/xCAT/PPC.pm	2009-10-13 02:43:01 UTC (rev 4360)
@@ -120,7 +120,6 @@
         $start = Time::HiRes::gettimeofday();
     }
 
-    $request->{maxssh} = int($request->{maxssh}/2);
     #######################################
     # Group nodes based on command
     #######################################
@@ -213,6 +212,7 @@
     if ( ($request->{command} =~ /^(getmacs)$/ && exists( $request->{opt}->{D} )) || ($request->{command} =~ /^(rnetboot)$/) ) {
         my %pid_owner = ();
 
+        $request->{maxssh} = int($request->{maxssh}/2);
         # Use the CHID signal to control the 
         #connection number of certain hcp    
         $SIG{CHLD} = sub { my $pid = 0; while (($pid = waitpid(-1, WNOHANG)) > 0) 
@@ -273,7 +273,7 @@
                 }
             }
 
-            Time::HiRes::sleep(0.2);
+            Time::HiRes::sleep(0.1);
             my ($pipe, $pid) = fork_cmd( $nodes->{$least_hcp}{'nodegroup'}->[$nodes->{$least_hcp}{'index'}]->[0], 
                     $nodes->{$least_hcp}{'nodegroup'}->[$nodes->{$least_hcp}{'index'}]->[1], $request );
 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.