diff options
| author | John Högberg <john@erlang.org> | 2018-06-05 14:06:19 +0200 |
|---|---|---|
| committer | John Högberg <john@erlang.org> | 2018-06-05 14:06:19 +0200 |
| commit | 3836f8a1e757e6dff8316ab9938095b9611c75e6 (patch) | |
| tree | 5f677921cffccfd0d5509e4c50baa50f530b5c62 /lib/inets/src/http_lib | |
| parent | 1002dd0444bd43353f33b03ab8fb0f19e57465dd (diff) | |
| parent | 5cb944bf32b7b3f4ec5500710fe10c28a643e1fd (diff) | |
| download | erlang-3836f8a1e757e6dff8316ab9938095b9611c75e6.tar.gz | |
Merge branch 'maint'
* maint:
Updated OTP version
Prepare release
inets: Gracefully handle bad headers
Diffstat (limited to 'lib/inets/src/http_lib')
| -rw-r--r-- | lib/inets/src/http_lib/http_request.erl | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/inets/src/http_lib/http_request.erl b/lib/inets/src/http_lib/http_request.erl index f68b233e10..8ca1542164 100644 --- a/lib/inets/src/http_lib/http_request.erl +++ b/lib/inets/src/http_lib/http_request.erl @@ -27,10 +27,12 @@ key_value(KeyValueStr) -> case lists:splitwith(fun($:) -> false; (_) -> true end, KeyValueStr) of - {Key, [$: | Value]} -> + {Key, [$: | Value]} when Key =/= [] -> {http_util:to_lower(string:strip(Key)), string:strip(Value)}; {_, []} -> - undefined + undefined; + _ -> + undefined end. %%------------------------------------------------------------------------- %% headers(HeaderList, #http_request_h{}) -> #http_request_h{} |