From 010fe5acd5cf9f56e83507c40c8693f843e30a0e Mon Sep 17 00:00:00 2001
From: Yang Tse <yangsita@gmail.com>
Date: Sat, 19 Dec 2009 13:20:07 +0000
Subject: Slack time reduction

---
 tests/ftp.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'tests/ftp.pm')

diff --git a/tests/ftp.pm b/tests/ftp.pm
index e1d7552d2..6218bb482 100644
--- a/tests/ftp.pm
+++ b/tests/ftp.pm
@@ -120,8 +120,8 @@ sub killpid {
 
     # Allow all signalled processes five seconds to gracefully die.
     if(defined(@signalled)) {
-        my $eighths = 40;
-        while($eighths--) {
+        my $twentieths = 5 * 20;
+        while($twentieths--) {
             for(my $i = scalar(@signalled) - 1; $i >= 0; $i--) {
                 my $pid = $signalled[$i];
                 if(!kill(0, $pid)) {
@@ -132,7 +132,7 @@ sub killpid {
                 }
             }
             last if(not scalar(@signalled));
-            select(undef, undef, undef, 0.125);
+            select(undef, undef, undef, 0.05);
         }
     }
 
-- 
cgit v1.2.3