- | (Some t, Some e) -> [ "Content-Type", t; "Content-Enconding", e ]
- | (Some t, None) -> [ "Content-Type" , t ]
- | (None, Some e) -> [ "Content-Enconding", e ]
+ | (Some t, Some e) -> ["Content-Encoding", e; "Content-Type", t]
+ | (Some t, None) -> ["Content-Type" , t]
+ | (None, Some e) -> ["Content-Encoding", e]