start with 5 threads

mojolicious · Nov 4, 2014 · 8b542f0 · 8b542f0
1 parent 6db3812
commit 8b542f0
Showing 1 changed file with 2 additions and 3 deletions.
diff --git a/lib/Mojo/IOLoop/Client.pm b/lib/Mojo/IOLoop/Client.pm
@@ -11,7 +11,7 @@ use Socket qw(IPPROTO_TCP SO_ERROR TCP_NODELAY);
 use constant NDN => $ENV{MOJO_NO_NDN}
   ? 0
   : eval 'use Net::DNS::Native 0.10 (); 1';
-my $NDN = NDN ? Net::DNS::Native->new : undef;
+my $NDN = NDN ? Net::DNS::Native->new(pool => 5, extra_thread => 1) : undef;
 
 # TLS support requires IO::Socket::SSL
 use constant TLS => $ENV{MOJO_NO_TLS}
@@ -42,12 +42,12 @@ sub connect {
     sub { $self->emit(error => 'Connect timeout') });
 
   # Blocking name resolution
+  $_ && s/[[\]]//g for @$args{qw(address socks_address)};
   my $address = $args->{socks_address} || ($args->{address} ||= 'localhost');
   return $reactor->next_tick(sub { $self && $self->_connect($args) })
     unless NDN && $address ne 'localhost' && !$args->{handle};
 
   # Non-blocking name resolution
-  $address =~ s/[\[\]]//g;
   my $handle = $self->{dns}
     = $NDN->getaddrinfo($address, _port($args), {protocol => IPPROTO_TCP});
   $reactor->io(
@@ -85,7 +85,6 @@ sub _connect {
     %options = (PeerAddrInfo => $args->{addr_info}) if $args->{addr_info};
     $options{Blocking} = 0;
     $options{LocalAddr} = $args->{local_address} if $args->{local_address};
-    $options{PeerAddr} =~ s/[\[\]]//g if $options{PeerAddr};
     return $self->emit(error => "Can't connect: $@")
       unless $self->{handle} = $handle = IO::Socket::IP->new(%options);
   }