simplify IO::Socket::IP specific code

mojolicious · Feb 3, 2014 · 273b533 · 273b533
1 parent 7198e60
commit 273b533
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/lib/Mojo/IOLoop/Client.pm b/lib/Mojo/IOLoop/Client.pm
@@ -89,9 +89,9 @@ sub _try {
   # Retry or handle exceptions
   my $handle = $self->{handle};
   return $! == EINPROGRESS ? undef : $self->emit(error => $!)
-    if IPV6 && !$handle->connect;
+    if $handle->isa('IO::Socket::IP') && !$handle->connect;
   return $self->emit(error => $! = $handle->sockopt(SO_ERROR))
-    if !IPV6 && !$handle->connected;
+    if !$handle->connected;
 
   # Disable Nagle's algorithm
   setsockopt $handle, IPPROTO_TCP, TCP_NODELAY, 1;