[nagiosplug] Make test/check_http.t reuse sockets

[Thomas Guyot-Sionnest]

 Module: nagiosplug
 Branch: pu_dermoth_http
 Commit: 2a9f264f2f00b0ea4e3b40bc29a8c994cef733e5
 Author: Thomas Guyot-Sionnest <dermoth at aei.ca>
   Date: Thu Sep  8 02:44:16 2011 -0400
    URL: http://nagiosplug.git.sf.net/git/gitweb.cgi?p=nagiosplug/nagiosplug;a=commit;h=2a9f264

Make test/check_http.t reuse sockets

---

 plugins/tests/check_http.t |    3 +++
 1 files changed, 3 insertions(+), 0 deletions(-)

diff --git a/plugins/tests/check_http.t b/plugins/tests/check_http.t
index 9ae6bbd..03d42fd 100755
--- a/plugins/tests/check_http.t
+++ b/plugins/tests/check_http.t
@@ -75,6 +75,7 @@ if ($pid) {
 				my $d = HTTP::Daemon::SSL->new(
 					LocalPort => $port_https_expired,
 					LocalAddr => "127.0.0.1",
+					ReuseAddr => 1,
 					SSL_cert_file => "$Bin/certs/expired-cert.pem",
 					SSL_key_file => "$Bin/certs/expired-key.pem",
 				) || die;
@@ -86,6 +87,7 @@ if ($pid) {
 			my $d = HTTP::Daemon::SSL->new(
 				LocalPort => $port_https,
 				LocalAddr => "127.0.0.1",
+				ReuseAddr => 1,
 				SSL_cert_file => "$Bin/certs/server-cert.pem",
 				SSL_key_file => "$Bin/certs/server-key.pem",
 			) || die;
@@ -102,6 +104,7 @@ if ($pid) {
 	my $d = HTTP::Daemon->new(
 		LocalPort => $port_http,
 		LocalAddr => "127.0.0.1",
+		ReuseAddr => 1,
 	) || die;
 	print "Please contact http at: <URL:", $d->url, ">\n";
 	run_server( $d );