--- AnyEvent-HTTP/HTTP.pm 2008/10/24 01:27:29 1.32 +++ AnyEvent-HTTP/HTTP.pm 2008/10/27 11:09:54 1.33 @@ -374,7 +374,7 @@ # handle actual, non-tunneled, request my $handle_actual_request = sub { -# $state{handle}->starttls ("connect") if $uscheme eq "https"; + $state{handle}->starttls ("connect") if $uscheme eq "https"; # send request $state{handle}->push_write (