From dfcf5a0ac8f80a15a4d1e3e581de80064663c89e Mon Sep 17 00:00:00 2001
From: antirez <antirez@gmail.com>
Date: Wed, 7 Dec 2011 17:15:17 +0100
Subject: [PATCH] Redis test port allocation fixed.

---
 tests/test_helper.tcl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tests/test_helper.tcl b/tests/test_helper.tcl
index 4c30b3c6..2918fe7a 100644
--- a/tests/test_helper.tcl
+++ b/tests/test_helper.tcl
@@ -153,9 +153,9 @@ proc cleanup {} {
 proc find_available_port start {
     for {set j $start} {$j < $start+1024} {incr j} {
         if {[catch {
-            set fd [socket 127.0.0.1 $start]
+            set fd [socket 127.0.0.1 $j]
         }]} {
-            return $start
+            return $j
         } else {
             close $fd
         }
-- 
2.45.2