diff options
author | Heiko Schlittermann (HS12-RIPE) <hs@schlittermann.de> | 2016-11-03 09:37:02 +0100 |
---|---|---|
committer | Heiko Schlittermann (HS12-RIPE) <hs@schlittermann.de> | 2016-11-03 09:37:02 +0100 |
commit | b369d47038a075706f6dfe57ab2e1ebeea0e5bdf (patch) | |
tree | c2b4912cf1934397b814e4d8fd6ea6f8dd569c10 /test/runtest | |
parent | b16852e23e1c477797bd7ce578a0f96bf341341c (diff) |
Testsuite: move dynamic_socket to Exim::Runtest
Diffstat (limited to 'test/runtest')
-rwxr-xr-x | test/runtest | 12 |
1 files changed, 1 insertions, 11 deletions
diff --git a/test/runtest b/test/runtest index 78cd051d3..38047b1eb 100755 --- a/test/runtest +++ b/test/runtest @@ -21,7 +21,6 @@ use warnings; use Errno; use FileHandle; -use IO::Socket::INET; use Socket; use Time::Local; use Cwd; @@ -3719,16 +3718,7 @@ foreach $test (@test_list) if (/^no_stdout_check/) { $stdout_skip = 1; next; } if (/^rmfiltertest/) { $rmfiltertest = 1; next; } if (/^sortlog/) { $sortlog = 1; next; } - if (/\bPORT_DYNAMIC\b/) { - for (my $port = 1024; $port < 65000; $port++) { - $dynamic_socket = IO::Socket::INET->new( - LocalHost => '127.0.0.1', - LocalPort => $port, - Listen => 10, - ReuseAddr => 1, - ) and last; - } - } + if (/\bPORT_DYNAMIC\b/) { $dynamic_socket = Exim::Runtest::dynamic_socket(); next; } } # Reset to beginning of file for per test interpreting/processing seek(SCRIPT, 0, 0); |