|
@@ -168,7 +168,8 @@ parse_headers(<< L1:32, Key:L1/binary, L2:32, Value:L2/binary, Rest/bits >>,
|
|
NbHeaders, Acc, SpAcc) ->
|
|
NbHeaders, Acc, SpAcc) ->
|
|
case Key of
|
|
case Key of
|
|
<< $:, _/bits >> ->
|
|
<< $:, _/bits >> ->
|
|
- parse_headers(Rest, NbHeaders - 1, Acc, [{Key, Value}|SpAcc]);
|
|
|
|
|
|
+ parse_headers(Rest, NbHeaders - 1, Acc,
|
|
|
|
+ [{Key, Value}|lists:keydelete(Key, 1, SpAcc)]);
|
|
_ ->
|
|
_ ->
|
|
parse_headers(Rest, NbHeaders - 1, [{Key, Value}|Acc], SpAcc)
|
|
parse_headers(Rest, NbHeaders - 1, [{Key, Value}|Acc], SpAcc)
|
|
end.
|
|
end.
|