--- AnyEvent-HTTP/HTTP.pm 2009/08/05 16:07:48 1.47 +++ AnyEvent-HTTP/HTTP.pm 2009/08/11 13:20:42 1.50 @@ -50,7 +50,7 @@ use base Exporter::; -our $VERSION = '1.41'; +our $VERSION = '1.42'; our @EXPORT = qw(http_get http_post http_head http_request); @@ -142,7 +142,7 @@ own C, C, C and C headers and will provide defaults for C and C (this can be suppressed by using C for these headers in which case they won't be -send at all). +sent at all). =item timeout => $seconds @@ -704,9 +704,7 @@ &$handle_actual_request; } - }, sub { - $timeout - }; + }, $arg{on_prepare} || sub { $timeout }; }; defined wantarray && AnyEvent::Util::guard { %state = () }