Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

bugfix

  • Loading branch information...
commit 938797766289a0284d2f818a2feee4a761ff61a9 1 parent 8f2ab6d
@kazuho authored
Showing with 7 additions and 3 deletions.
  1. +7 −3 lib/Plack/Server/Standalone/Prefork/Server/Starter.pm
View
10 lib/Plack/Server/Standalone/Prefork/Server/Starter.pm
@@ -3,6 +3,7 @@ package Plack::Server::Standalone::Prefork::Server::Starter;
use strict;
use warnings;
+use Server::Starter ();
use base qw(Plack::Server::Standalone::Prefork);
sub new {
@@ -15,13 +16,16 @@ sub new {
} else {
$args{port} = $hostport;
}
- $args{listen_sock} = IO::Socket::INET->new(
+
+ my $self = $klass->SUPER::new(%args);
+
+ $self->{listen_sock} = IO::Socket::INET->new(
Proto => 'tcp',
) or die "failed to create socket:$!";
- $args{listen_sock}->fdopen($fd, 'w')
+ $self->{listen_sock}->fdopen($fd, 'w')
or die "failed to bind to listening socket:$!";
- $klass->SUPER::new(%args);
+ $self;
}
1;
Please sign in to comment.
Something went wrong with that request. Please try again.