diff options
author | franck cuny <franck@lumberjaph.net> | 2009-05-18 11:45:08 +0200 |
---|---|---|
committer | franck cuny <franck@lumberjaph.net> | 2009-05-18 11:45:08 +0200 |
commit | 8024300574fd6b50eb180197474b028f3819b936 (patch) | |
tree | d921f3da0525a57295ddae3424e8af9c619d9f5b | |
parent | applying RUZ patch http://rt.cpan.org/Public/Bug/Display.html?id=41946 (diff) | |
download | lwpx-paranoidagent-8024300574fd6b50eb180197474b028f3819b936.tar.gz |
applying patch by SREZIC http://rt.cpan.org/Public/Bug/Display.html?id=43471
-rw-r--r-- | lib/LWPx/Protocol/http_paranoid.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/LWPx/Protocol/http_paranoid.pm b/lib/LWPx/Protocol/http_paranoid.pm index 0d00b6f..aae5671 100644 --- a/lib/LWPx/Protocol/http_paranoid.pm +++ b/lib/LWPx/Protocol/http_paranoid.pm @@ -353,6 +353,10 @@ sub request $complete++ if !$n; return \$buf; } ); + if ($response->header('X-Died')) { + $response = HTTP::Response->new(&HTTP::Status::RC_INTERNAL_SERVER_ERROR, + $response->header('X-Died')); + } $drop_connection++ unless $complete; _set_time_remain(); |