| Subject: | Check for undef connection in SOAP::Transport::HTTP::Daemon |
The HTTP::Daemon class has an option to set a timeout for a listening
connection. If this timeout is set and the daemon doesn't receive a
connection within that timeout, then the accept() method returns undef.
The SOAP::Transport::HTTP::Daemon class doesn't check for that undef.
The following simple patch corrects this.
--- HTTP.pm-orig 2006-03-15 09:34:43.000000000 -0600
+++ HTTP.pm 2006-03-15 09:36:40.000000000 -0600
@@ -491,6 +491,7 @@
sub handle {
my $self = shift->new;
while (my $c = $self->accept) {
+ next if !$c; # undef on timeout
while (my $r = $c->get_request) {
$self->request($r);
$self->SUPER::handle;
Chris