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.32 by root, Fri Oct 24 01:27:29 2008 UTC vs.
Revision 1.33 by root, Mon Oct 27 11:09:54 2008 UTC

372 372
373 $state{handle}->starttls ("connect") if $rscheme eq "https"; 373 $state{handle}->starttls ("connect") if $rscheme eq "https";
374 374
375 # handle actual, non-tunneled, request 375 # handle actual, non-tunneled, request
376 my $handle_actual_request = sub { 376 my $handle_actual_request = sub {
377# $state{handle}->starttls ("connect") if $uscheme eq "https"; 377 $state{handle}->starttls ("connect") if $uscheme eq "https";
378 378
379 # send request 379 # send request
380 $state{handle}->push_write ( 380 $state{handle}->push_write (
381 "$method $rpath HTTP/1.0\015\012" 381 "$method $rpath HTTP/1.0\015\012"
382 . (join "", map "\u$_: $hdr{$_}\015\012", keys %hdr) 382 . (join "", map "\u$_: $hdr{$_}\015\012", keys %hdr)

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines