Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
fixed small backlog bug in Mojo::Server::Daemon
  • Loading branch information
kraih committed May 5, 2012
1 parent 6c7ad98 commit 51a4d22
Show file tree
Hide file tree
Showing 3 changed files with 16 additions and 16 deletions.
3 changes: 3 additions & 0 deletions Changes
@@ -1,5 +1,8 @@
This file documents the revision history for Perl extension Mojolicious.

2.94 2012-05-06
- Fixed small backlog bug in Mojo::Server::Daemon.

2.93 2012-05-05
- Added remove method to Mojolicious::Routes::Route.
- Improved 32bit Perl support of Mojo::Transaction::WebSocket.
Expand Down
27 changes: 12 additions & 15 deletions lib/Mojo/Server/Daemon.pm
Expand Up @@ -160,21 +160,18 @@ sub _listen {
my ($self, $listen) = @_;

# Options
my $url = Mojo::URL->new($listen);
my $options = {port => $url->port};
my $tls;
$tls = $options->{tls} = 1 if $url->scheme eq 'https';
my $address = $url->host;
$options->{address} = $address if $address ne '*';
my $query = $url->query;
my $cert = $query->param('cert');
$options->{tls_cert} = $cert if $cert;
my $key = $query->param('key');
$options->{tls_key} = $key if $key;
my $ca = $query->param('ca');
$options->{tls_ca} = $ca if $ca;
my $backlog = $self->backlog;
$options->{backlog} = $backlog if $backlog;
my $url = Mojo::URL->new($listen);
my $query = $url->query;
my $options = {
address => $url->host,
backlog => $self->backlog,
port => $url->port,
tls_ca => scalar $query->param('ca'),
tls_cert => scalar $query->param('cert'),
tls_key => scalar $query->param('key')
};
delete $options->{address} if $options->{address} eq '*';
my $tls = $options->{tls} = $url->scheme eq 'https' ? 1 : undef;

# Listen
weaken $self;
Expand Down
2 changes: 1 addition & 1 deletion lib/Mojolicious.pm
Expand Up @@ -34,7 +34,7 @@ has static => sub { Mojolicious::Static->new };
has types => sub { Mojolicious::Types->new };

our $CODENAME = 'Leaf Fluttering In Wind';
our $VERSION = '2.93';
our $VERSION = '2.94';

# "These old doomsday devices are dangerously unstable.
# I'll rest easier not knowing where they are."
Expand Down

0 comments on commit 51a4d22

Please sign in to comment.