--- AnyEvent-HTTP/HTTP.pm	2011/02/24 15:09:03	1.104
+++ AnyEvent-HTTP/HTTP.pm	2011/06/14 05:20:13	1.106
@@ -48,7 +48,7 @@
 
 use base Exporter::;
 
-our $VERSION = '2.1';
+our $VERSION = '2.11';
 
 our @EXPORT = qw(http_get http_post http_head http_request);
 
@@ -783,7 +783,7 @@
    my $was_persistent; # true if this is actually a recycled connection
 
    # the key to use in the keepalive cache
-   my $ka_key = "$uhost\x00$arg{sessionid}";
+   my $ka_key = "$uscheme\x00$uhost\x00$uport\x00$arg{sessionid}";
 
    $hdr{connection} = ($persistent ? $keepalive ? "keep-alive " : "" : "close ") . "Te"; #1.1
    $hdr{te}         = "trailers" unless exists $hdr{te}; #1.1
@@ -1140,13 +1140,13 @@
 
          $state{handle} = ka_fetch $ka_key;
          $state{handle}->destroyed
-            and die "got a destructed habndle. pah\n";#d#
+            and die "got a destructed handle. pah\n";#d#
          $prepare_handle->();
          $state{handle}->destroyed
-            and die "got a destructed habndle. pa2\n";#d#
+            and die "got a destructed handle. pa2\n";#d#
          $handle_actual_request->();
          $state{handle}->destroyed
-            and die "got a destructed habndle. pa3\n";#d#
+            and die "got a destructed handle. pa3\n";#d#
 
       } else {
          my $tcp_connect = $arg{tcp_connect}