--- AnyEvent-HTTP/HTTP.pm	2014/06/08 23:33:28	1.119
+++ AnyEvent-HTTP/HTTP.pm	2014/06/08 23:36:36	1.120
@@ -48,7 +48,7 @@
 
 use base Exporter::;
 
-our $VERSION = 2.2;
+our $VERSION = 2.21;
 
 our @EXPORT = qw(http_get http_post http_head http_request);
 
@@ -848,7 +848,7 @@
          "$method $rpath HTTP/1.1\015\012"
          . (join "", map "\u$_: $hdr{$_}\015\012", grep defined $hdr{$_}, keys %hdr)
          . "\015\012"
-         . (delete $arg{body})
+         . $arg{body}
       );
 
       # return if error occurred during push_write()