ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/AnyEvent-HTTP/HTTP.pm
(Generate patch)

Comparing AnyEvent-HTTP/HTTP.pm (file contents):
Revision 1.136 by root, Wed Oct 16 01:20:02 2019 UTC vs.
Revision 1.138 by root, Fri Aug 5 20:45:09 2022 UTC

… …
46use AnyEvent::Util (); 46use AnyEvent::Util ();
47use AnyEvent::Handle (); 47use AnyEvent::Handle ();
48 48
49use base Exporter::; 49use base Exporter::;
50 50
51our $VERSION = 2.24; 51our $VERSION = 2.25;
52 52
53our @EXPORT = qw(http_get http_post http_head http_request); 53our @EXPORT = qw(http_get http_post http_head http_request);
54 54
55our $USERAGENT = "Mozilla/5.0 (compatible; U; AnyEvent-HTTP/$VERSION; +http://software.schmorp.de/pkg/AnyEvent)"; 55our $USERAGENT = "Mozilla/5.0 (compatible; U; AnyEvent-HTTP/$VERSION; +http://software.schmorp.de/pkg/AnyEvent)";
56our $MAX_RECURSE = 10; 56our $MAX_RECURSE = 10;
… …
716} 716}
717 717
718our %IDEMPOTENT = ( 718our %IDEMPOTENT = (
719 DELETE => 1, 719 DELETE => 1,
720 GET => 1, 720 GET => 1,
721 QUERY => 1,
721 HEAD => 1, 722 HEAD => 1,
722 OPTIONS => 1, 723 OPTIONS => 1,
723 PUT => 1, 724 PUT => 1,
724 TRACE => 1, 725 TRACE => 1,
725 726
… …
1238# $state{handle}->destroyed 1239# $state{handle}->destroyed
1239# and die "AnyEvent::HTTP: unexpectedly got a destructed handle (1), please report.";#d# 1240# and die "AnyEvent::HTTP: unexpectedly got a destructed handle (1), please report.";#d#
1240 $prepare_handle->(); 1241 $prepare_handle->();
1241# $state{handle}->destroyed 1242# $state{handle}->destroyed
1242# and die "AnyEvent::HTTP: unexpectedly got a destructed handle (2), please report.";#d# 1243# and die "AnyEvent::HTTP: unexpectedly got a destructed handle (2), please report.";#d#
1244 $rpath = $upath;
1243 $handle_actual_request->(); 1245 $handle_actual_request->();
1244 1246
1245 } else { 1247 } else {
1246 my $tcp_connect = $arg{tcp_connect} 1248 my $tcp_connect = $arg{tcp_connect}
1247 || do { require AnyEvent::Socket; \&AnyEvent::Socket::tcp_connect }; 1249 || do { require AnyEvent::Socket; \&AnyEvent::Socket::tcp_connect };

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines