From 20204fd33ef5040428f6d9e3c8e640a7b16abc9d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= Date: Wed, 26 Oct 2011 19:23:06 +0200 Subject: Add 'Accept-Encoding' to cowboy_http_req:parse_header/2 --- src/cowboy_http_req.erl | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'src/cowboy_http_req.erl') diff --git a/src/cowboy_http_req.erl b/src/cowboy_http_req.erl index fb126e5..1555a02 100644 --- a/src/cowboy_http_req.erl +++ b/src/cowboy_http_req.erl @@ -201,6 +201,7 @@ parse_header(Name, Req=#http_req{p_headers=PHeaders}) -> %% @doc Default values for semantic header parsing. -spec parse_header_default(http_header()) -> any(). parse_header_default('Accept') -> []; +parse_header_default('Accept-Encoding') -> []; parse_header_default('Connection') -> []; parse_header_default(_Name) -> undefined. @@ -214,6 +215,11 @@ parse_header(Name, Req, Default) when Name =:= 'Accept' -> fun (Value) -> cowboy_http:list(Value, fun cowboy_http:media_range/2) end); +parse_header(Name, Req, Default) when Name =:= 'Accept-Encoding' -> + parse_header(Name, Req, Default, + fun (Value) -> + cowboy_http:list(Value, fun cowboy_http:token_ci/2) + end); parse_header(Name, Req, Default) when Name =:= 'Connection' -> parse_header(Name, Req, Default, fun (Value) -> -- cgit v1.2.3