File 2933-Additional-HTTP-HeaderField-casing-tests.patch of Package erlang

From 5ca51a6a331f9e899ae367df70d3884a8b85c17f Mon Sep 17 00:00:00 2001
From: Matyas Markovics <matyas@scrapinghub.com>
Date: Thu, 28 Nov 2019 00:36:54 +0100
Subject: [PATCH 3/4] Additional HTTP HeaderField casing tests

---
 erts/emulator/test/decode_packet_SUITE.erl | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/erts/emulator/test/decode_packet_SUITE.erl b/erts/emulator/test/decode_packet_SUITE.erl
index e5ee02cfba..099dfabcb6 100644
--- a/erts/emulator/test/decode_packet_SUITE.erl
+++ b/erts/emulator/test/decode_packet_SUITE.erl
@@ -387,6 +387,18 @@ http_request(Msg) ->
            {"Other-Field: with some text\r\n",
             {http_header,0,  "Other-Field"  ,  "Other-Field"  ,  "with some text"},
             {http_header,0,<<"Other-Field">>,<<"Other-Field">>,<<"with some text">>}},
+           {"Content--Type: text/xml; charset=utf-8\r\n",
+            {http_header,0,  "Content--type"  ,  "Content--Type"  ,  "text/xml; charset=utf-8"},
+            {http_header,0,<<"Content--type">>,<<"Content--Type">>,<<"text/xml; charset=utf-8">>}},
+           {"Content---Type: text/xml; charset=utf-8\r\n",
+            {http_header,0,  "Content---Type"  ,  "Content---Type"  ,  "text/xml; charset=utf-8"},
+            {http_header,0,<<"Content---Type">>,<<"Content---Type">>,<<"text/xml; charset=utf-8">>}},
+           {"CONTENT-type: text/xml; charset=utf-8\r\n",
+            {http_header,42,'Content-Type',  "CONTENT-type"  ,  "text/xml; charset=utf-8"},
+            {http_header,42,'Content-Type',<<"CONTENT-type">>,<<"text/xml; charset=utf-8">>}},
+           {"OTHER-field: with some text\r\n",
+            {http_header,0,  "Other-Field"  ,  "OTHER-field"  ,  "with some text"},
+            {http_header,0,<<"Other-Field">>,<<"OTHER-field">>,<<"with some text">>}},
            {"Make-sure-a-LONG-HEaDer-fIeLd-is-fORMATTED-NicelY: with some text\r\n",
             {http_header,0,  "Make-Sure-A-Long-Header-Field-Is-Formatted-Nicely"  ,  "Make-sure-a-LONG-HEaDer-fIeLd-is-fORMATTED-NicelY"  ,  "with some text"},
             {http_header,0,<<"Make-Sure-A-Long-Header-Field-Is-Formatted-Nicely">>,<<"Make-sure-a-LONG-HEaDer-fIeLd-is-fORMATTED-NicelY">>,<<"with some text">>}},
-- 
2.16.4

openSUSE Build Service is sponsored by