diff options
-rw-r--r-- | src/cowboy_http.erl | 2 | ||||
-rw-r--r-- | test/http_SUITE.erl | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/cowboy_http.erl b/src/cowboy_http.erl index 5ec7d0e..0f5d0ae 100644 --- a/src/cowboy_http.erl +++ b/src/cowboy_http.erl @@ -862,7 +862,7 @@ commands(State=#state{socket=Socket, transport=Transport, streams=Streams}, Stre case lists:keyfind(StreamID, #stream.id, Streams) of #stream{version='HTTP/1.1'} -> Size = iolist_size(Data), - Transport:send(Socket, [integer_to_list(Size, 16), <<"\r\n">>, Data, <<"\r\n">>]); + Transport:send(Socket, [integer_to_binary(Size, 16), <<"\r\n">>, Data, <<"\r\n">>]); #stream{version='HTTP/1.0'} -> Transport:send(Socket, Data) end, diff --git a/test/http_SUITE.erl b/test/http_SUITE.erl index 1b39feb..f0670a9 100644 --- a/test/http_SUITE.erl +++ b/test/http_SUITE.erl @@ -945,7 +945,7 @@ do_body_to_chunks(ChunkSize, Body, Acc) -> false -> ChunkSize end, << Chunk:ChunkSize2/binary, Rest/binary >> = Body, - ChunkSizeBin = list_to_binary(integer_to_list(ChunkSize2, 16)), + ChunkSizeBin = integer_to_binary(ChunkSize2, 16), do_body_to_chunks(ChunkSize, Rest, [<< ChunkSizeBin/binary, "\r\n", Chunk/binary, "\r\n" >>|Acc]). |