[Catalyst-commits] r7087 - in
trunk/Catalyst-Engine-HTTP-Sprocket/lib/Catalyst/Engine/HTTP:
. Sprocket
andyg at dev.catalyst.perl.org
andyg at dev.catalyst.perl.org
Thu Nov 1 00:55:25 GMT 2007
Author: andyg
Date: 2007-11-01 00:55:24 +0000 (Thu, 01 Nov 2007)
New Revision: 7087
Modified:
trunk/Catalyst-Engine-HTTP-Sprocket/lib/Catalyst/Engine/HTTP/Sprocket.pm
trunk/Catalyst-Engine-HTTP-Sprocket/lib/Catalyst/Engine/HTTP/Sprocket/Server.pm
trunk/Catalyst-Engine-HTTP-Sprocket/lib/Catalyst/Engine/HTTP/Sprocket/Worker.pm
Log:
Fix bug in restarter options
Modified: trunk/Catalyst-Engine-HTTP-Sprocket/lib/Catalyst/Engine/HTTP/Sprocket/Server.pm
===================================================================
--- trunk/Catalyst-Engine-HTTP-Sprocket/lib/Catalyst/Engine/HTTP/Sprocket/Server.pm 2007-10-31 22:30:49 UTC (rev 7086)
+++ trunk/Catalyst-Engine-HTTP-Sprocket/lib/Catalyst/Engine/HTTP/Sprocket/Server.pm 2007-11-01 00:55:24 UTC (rev 7087)
@@ -300,6 +300,7 @@
File::Spec->catdir( $FindBin::Bin, '..' )
),
regex => $config->{restart_regex},
+ delay => 0,
);
}
@@ -483,7 +484,7 @@
sub child_stdout {
my ( $kernel, $self, $input, $wheel_id ) = @_[ KERNEL, OBJECT, ARG0, ARG1 ];
- DEBUG && warn "Child $wheel_id stdout: " . dump($input) . "\n";
+ #DEBUG && warn "Child $wheel_id stdout: " . dump($input) . "\n";
my $con = $self->{child_busy}->{ $wheel_id };
Modified: trunk/Catalyst-Engine-HTTP-Sprocket/lib/Catalyst/Engine/HTTP/Sprocket/Worker.pm
===================================================================
--- trunk/Catalyst-Engine-HTTP-Sprocket/lib/Catalyst/Engine/HTTP/Sprocket/Worker.pm 2007-10-31 22:30:49 UTC (rev 7086)
+++ trunk/Catalyst-Engine-HTTP-Sprocket/lib/Catalyst/Engine/HTTP/Sprocket/Worker.pm 2007-11-01 00:55:24 UTC (rev 7087)
@@ -158,7 +158,7 @@
$config->{appclass}->handle_request();
}
else {
- # If the request is HTTP/1.1, response with 100 Continue
+ # If the request is HTTP/1.1, respond with 100 Continue
if ( $input =~ m/(HTTP\/\d+\.\d+)/ ) {
my $proto = $1;
if ( $proto eq 'HTTP/1.1' ) {
Modified: trunk/Catalyst-Engine-HTTP-Sprocket/lib/Catalyst/Engine/HTTP/Sprocket.pm
===================================================================
--- trunk/Catalyst-Engine-HTTP-Sprocket/lib/Catalyst/Engine/HTTP/Sprocket.pm 2007-10-31 22:30:49 UTC (rev 7086)
+++ trunk/Catalyst-Engine-HTTP-Sprocket/lib/Catalyst/Engine/HTTP/Sprocket.pm 2007-11-01 00:55:24 UTC (rev 7087)
@@ -10,7 +10,7 @@
use Catalyst::Engine::HTTP::Sprocket::Server;
-our $VERSION = '0.50';
+our $VERSION = '0.90';
sub DEBUG () { $ENV{CATALYST_POE_DEBUG} || 0 }
More information about the Catalyst-commits
mailing list