diff options
Diffstat (limited to 'chromium/third_party/cygwin/lib/perl5/vendor_perl/5.10/LWP/Protocol/loopback.pm')
-rw-r--r-- | chromium/third_party/cygwin/lib/perl5/vendor_perl/5.10/LWP/Protocol/loopback.pm | 26 |
1 files changed, 0 insertions, 26 deletions
diff --git a/chromium/third_party/cygwin/lib/perl5/vendor_perl/5.10/LWP/Protocol/loopback.pm b/chromium/third_party/cygwin/lib/perl5/vendor_perl/5.10/LWP/Protocol/loopback.pm deleted file mode 100644 index 2cd67ae3608..00000000000 --- a/chromium/third_party/cygwin/lib/perl5/vendor_perl/5.10/LWP/Protocol/loopback.pm +++ /dev/null @@ -1,26 +0,0 @@ -package LWP::Protocol::loopback; - -use strict; -use vars qw(@ISA); -require HTTP::Response; - -require LWP::Protocol; -@ISA = qw(LWP::Protocol); - -sub request { - my($self, $request, $proxy, $arg, $size, $timeout) = @_; - - my $response = HTTP::Response->new(200, "OK"); - $response->content_type("message/http; msgtype=request"); - - $response->header("Via", "loopback/1.0 $proxy") - if $proxy; - - $response->header("X-Arg", $arg); - $response->header("X-Read-Size", $size); - $response->header("X-Timeout", $timeout); - - return $self->collect_once($arg, $response, $request->as_string); -} - -1; |