From 6ca19cde811a6bb7cb489a9a9b57d06762f3b730 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= <essen@ninenines.eu>
Date: Thu, 27 Mar 2014 10:52:30 +0100
Subject: Use a lists:keystore where appropriate

---
 src/cow_spdy.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/cow_spdy.erl b/src/cow_spdy.erl
index db5aec9..59c1ba4 100644
--- a/src/cow_spdy.erl
+++ b/src/cow_spdy.erl
@@ -169,7 +169,7 @@ parse_headers(<< L1:32, Key:L1/binary, L2:32, Value:L2/binary, Rest/bits >>,
 	case Key of
 		<< $:, _/bits >> ->
 			parse_headers(Rest, NbHeaders - 1, Acc,
-				[{Key, Value}|lists:keydelete(Key, 1, SpAcc)]);
+				lists:keystore(Key, 1, SpAcc, {Key, Value}));
 		_ ->
 			parse_headers(Rest, NbHeaders - 1, [{Key, Value}|Acc], SpAcc)
 	end.
-- 
cgit v1.2.3