[Catalyst-commits] r11777 - Catalyst-Runtime/5.80/branches/better_scripts/t/author

[dhoss at dev.catalyst.perl.org]

Author: dhoss
Date: 2009-11-06 17:12:25 +0000 (Fri, 06 Nov 2009)
New Revision: 11777

Modified:
   Catalyst-Runtime/5.80/branches/better_scripts/t/author/optional_http-server.t
Log:
fixed dev server options so that test now passes

Modified: Catalyst-Runtime/5.80/branches/better_scripts/t/author/optional_http-server.t
===================================================================
--- Catalyst-Runtime/5.80/branches/better_scripts/t/author/optional_http-server.t	2009-11-06 17:09:51 UTC (rev 11776)
+++ Catalyst-Runtime/5.80/branches/better_scripts/t/author/optional_http-server.t	2009-11-06 17:12:25 UTC (rev 11777)
@@ -32,7 +32,7 @@
 # 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", '-port', $port );
+  "$FindBin::Bin/../../t/tmp/TestApp/script/testapp_server.pl", '-l', $port );
 my $pid = open3( undef, my $server, undef, @cmd)
     or die "Unable to spawn standalone HTTP server: $!";