diff options
-rw-r--r-- | src/cowboy_iolists.erl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/cowboy_iolists.erl b/src/cowboy_iolists.erl index d04d0ae..a49e7ed 100644 --- a/src/cowboy_iolists.erl +++ b/src/cowboy_iolists.erl @@ -51,7 +51,7 @@ split(N, [List|Tail], Acc0) -> IolistSize = iolist_size(Before), if IolistSize < N -> - split(N - IolistSize, [After|Tail], Before); + split(N - IolistSize, [After|Tail], lists:reverse(Before)); true -> {ok, Before, [After|Tail]} end; @@ -71,7 +71,8 @@ split_test_() -> {10, <<"Hello!">>, "Hello!", ""}, {10, ["He", [<<"ll">>], $o, [["!"]]], "Hello!", ""}, {10, ["Hel"|<<"lo!">>], "Hello!", ""}, - {10, [[<<>>|<<>>], [], <<"Hello world!">>], "Hello worl", "d!"} + {10, [[<<>>|<<>>], [], <<"Hello world!">>], "Hello worl", "d!"}, + {10, [[<<"He">>|<<"llo">>], [$\s], <<"world!">>], "Hello worl", "d!"} ], [{iolist_to_binary(V), fun() -> {B, A} = split(N, V), |