--- AnyEvent-HTTP/HTTP.pm	2008/07/21 05:42:07	1.25
+++ AnyEvent-HTTP/HTTP.pm	2008/09/29 13:50:39	1.28
@@ -50,7 +50,7 @@
 
 use base Exporter::;
 
-our $VERSION = '1.03';
+our $VERSION = '1.05';
 
 our @EXPORT = qw(http_get http_post http_head http_request);
 
@@ -82,7 +82,7 @@
 
 =item http_post $url, $body, key => value..., $cb->($data, $headers)
 
-Executes an HTTP-POST request with a request body of C<$bod>. See the
+Executes an HTTP-POST request with a request body of C<$body>. See the
 http_request function for details on additional parameters.
 
 =item http_request $method => $url, key => value..., $cb->($data, $headers)
@@ -400,7 +400,7 @@
                         my $cdom  = (delete $kv{domain}) || $uhost;
                         my $cpath = (delete $kv{path})   || "/";
     
-                        $cdom =~ s/^.?/./; # make sure it starts with a "."
+                        $cdom =~ s/^\.?/./; # make sure it starts with a "."
 
                         next if $cdom =~ /\.$/;