From: Tomas Doran <bobtfish@bobtfish.net>
Date: Sat, 7 Nov 2009 16:50:59 +0000 (+0000)
Subject: Back out change from -port to -l - svn merge -r 11778:11777
X-Git-Tag: 5.80014~15^2~2^2~7
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=7f5c5a7b95caa17cc7edb84c1b3e721ffeaa5b97

Back out change from -port to -l - svn merge -r 11778:11777
---

diff --git a/t/author/optional_http-server.t b/t/author/optional_http-server.t
index 1927442..d4a2183 100644
--- a/t/author/optional_http-server.t
+++ b/t/author/optional_http-server.t
@@ -32,7 +32,7 @@ rmtree '../t/tmp/TestApp/t' or die;
 # spawn the standalone HTTP server
 my $port = 30000 + int rand(1 + 10000);
 my @cmd = ($^X, "-I$FindBin::Bin/../../lib",
-  "$FindBin::Bin/../../t/tmp/TestApp/script/testapp_server.pl", '-l', $port );
+  "$FindBin::Bin/../../t/tmp/TestApp/script/testapp_server.pl", '-port', $port );
 my $pid = open3( undef, my $server, undef, @cmd)
     or die "Unable to spawn standalone HTTP server: $!";