From: Yang Tse <yangsita@gmail.com>
Date: Tue, 19 Jan 2010 02:01:01 +0000 (+0000)
Subject: prevent %runcert hash growth when clearing items
X-Git-Tag: curl-7_20_0~127
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=3afe2b65b645f137437e776a6e0290a1e4e661cf;p=curl

prevent %runcert hash growth when clearing items
---

diff --git a/tests/runtests.pl b/tests/runtests.pl
index 2b74f6b47..d08e17714 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -632,9 +632,9 @@ sub stopserver {
     foreach my $server (@killservers) {
         if($run{$server}) {
             $pidlist .= "$run{$server} ";
-            $runcert{$server} = 0;
             $run{$server} = 0;
         }
+        $runcert{$server} = 0 if($runcert{$server});
     }
     killpid($verbose, $pidlist);
     #
@@ -2542,9 +2542,9 @@ sub singletest {
         foreach my $server (@killservers) {
             if($run{$server}) {
                 $pidlist .= "$run{$server} ";
-                $runcert{$server} = 0;
                 $run{$server} = 0;
             }
+            $runcert{$server} = 0 if($runcert{$server});
         }
         killpid($verbose, $pidlist);
         #
@@ -2920,9 +2920,9 @@ sub stopservers {
                 }
             }
             $pidlist .= "$run{$server} ";
-            $runcert{$server} = 0;
             $run{$server} = 0;
         }
+        $runcert{$server} = 0 if($runcert{$server});
     }
     killpid($verbose, $pidlist);
     #