X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fauthor%2Foptional_http-server.t;h=692929c9a58dc6535ee087ade0f25db0e7faae2b;hb=53c6ec790d76534dbc253ae483c109dc086004aa;hp=1927442b14ccb3925e60c0093be104c35cfba586;hpb=8d627f0261173dbe30b8e86d1ea5735d7a2dc349;p=catagits%2FCatalyst-Runtime.git

diff --git a/t/author/optional_http-server.t b/t/author/optional_http-server.t
index 1927442..692929c 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", '-p', $port );
 my $pid = open3( undef, my $server, undef, @cmd)
     or die "Unable to spawn standalone HTTP server: $!";