diff options
| author | Erlang/OTP <[email protected]> | 2017-03-31 12:58:34 +0200 |
|---|---|---|
| committer | Erlang/OTP <[email protected]> | 2017-03-31 12:58:34 +0200 |
| commit | cb1b5ecaf0fb8740e114b127efd0b86f279e9f7f (patch) | |
| tree | 8e11b23e22f8ee2699d1673015e94d34372a8774 /lib/inets/src/http_client/httpc_response.erl | |
| parent | 42d3750f90f729b0aaa6e77a6e621e3d3798b76a (diff) | |
| parent | a13e73d70d2af0a686701a3c8b16b82b664abd19 (diff) | |
| download | otp-cb1b5ecaf0fb8740e114b127efd0b86f279e9f7f.tar.gz otp-cb1b5ecaf0fb8740e114b127efd0b86f279e9f7f.tar.bz2 otp-cb1b5ecaf0fb8740e114b127efd0b86f279e9f7f.zip | |
Merge branch 'voltone/inets/httpc_redirect_normalize_host/PR-1381/OTP-14301' into maint-19
* voltone/inets/httpc_redirect_normalize_host/PR-1381/OTP-14301:
Omit port from Host header on redirect to well-known port
Diffstat (limited to 'lib/inets/src/http_client/httpc_response.erl')
| -rw-r--r-- | lib/inets/src/http_client/httpc_response.erl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/inets/src/http_client/httpc_response.erl b/lib/inets/src/http_client/httpc_response.erl index 0fd5faa466..5fbceb8ad0 100644 --- a/lib/inets/src/http_client/httpc_response.erl +++ b/lib/inets/src/http_client/httpc_response.erl @@ -362,8 +362,9 @@ redirect(Response = {StatusLine, Headers, Body}, Request) -> {ok, error(Request, Reason), Data}; %% Automatic redirection {ok, {Scheme, _, Host, Port, Path, Query}} -> + HostPort = http_request:normalize_host(Scheme, Host, Port), NewHeaders = - (Request#request.headers)#http_request_h{host = Host++":"++integer_to_list(Port)}, + (Request#request.headers)#http_request_h{host = HostPort}, NewRequest = Request#request{redircount = Request#request.redircount+1, |