diff options
| author | Loïc Hoguin <[email protected]> | 2012-09-16 16:04:16 +0200 |
|---|---|---|
| committer | Loïc Hoguin <[email protected]> | 2012-09-17 13:57:28 +0200 |
| commit | 350d4ae3f2e9973b3638b06c7092370afa08e634 (patch) | |
| tree | b54a486bb8476a8058a9213a101cc2e2ad8a637c /src/cowboy_req.erl | |
| parent | 6dbc1f9ef98eda6cfdffc0a47b68fb50eeb3863a (diff) | |
| download | cowboy-350d4ae3f2e9973b3638b06c7092370afa08e634.tar.gz cowboy-350d4ae3f2e9973b3638b06c7092370afa08e634.tar.bz2 cowboy-350d4ae3f2e9973b3638b06c7092370afa08e634.zip | |
Add the private function set_host/4 used by cowboy_protocol
Diffstat (limited to 'src/cowboy_req.erl')
| -rw-r--r-- | src/cowboy_req.erl | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/src/cowboy_req.erl b/src/cowboy_req.erl index 80d68a9..08e4155 100644 --- a/src/cowboy_req.erl +++ b/src/cowboy_req.erl @@ -102,6 +102,9 @@ -export([upgrade_reply/3]). -export([ensure_response/2]). +%% Private setter/getter API. +-export([set_host/4]). + %% Misc API. -export([compact/1]). -export([lock/1]). @@ -908,6 +911,14 @@ ensure_response(#http_req{socket=Socket, transport=Transport, Transport:send(Socket, <<"0\r\n\r\n">>), ok. +%% Private setter/getter API. + +%% @private +-spec set_host(binary(), inet:port_number(), binary(), Req) + -> Req when Req::req(). +set_host(Host, Port, RawHost, Req=#http_req{headers=Headers}) -> + Req#http_req{host=Host, port=Port, headers=[{'Host', RawHost}|Headers]}. + %% Misc API. %% @doc Compact the request data by removing all non-system information. |