fixed Perl 5.12 compatibility

mojolicious · Oct 2, 2011 · 0aa18b7 · 0aa18b7
1 parent a48a110
commit 0aa18b7
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 2 deletions.
diff --git a/Changes b/Changes
@@ -6,6 +6,7 @@ This file documents the revision history for Perl extension Mojolicious.
         - Improved message parser performance slightly.
         - Improved resolver tests.
         - Fixed small formatting bug in Mojo::Headers.
+        - Fixed Perl 5.12 compatibility.
 
 1.99    2011-09-29 00:00:00
         - Deprecated direct hash access to the flash in

diff --git a/lib/Mojo/IOLoop/Client.pm b/lib/Mojo/IOLoop/Client.pm
@@ -2,7 +2,6 @@ package Mojo::IOLoop::Client;
 use Mojo::Base 'Mojo::IOLoop::EventEmitter';
 
 use IO::Socket::INET;
-use Scalar::Util 'weaken';
 use Socket qw/IPPROTO_TCP SO_ERROR TCP_NODELAY/;
 
 # IPv6 support requires IO::Socket::IP
@@ -87,7 +86,6 @@ sub _connect {
   setsockopt $handle, IPPROTO_TCP, TCP_NODELAY, 1;
 
   # TLS
-  weaken $self;
   if ($args->{tls}) {
 
     # No TLS support