From fa6d3b79cc0c56232da6f222651dd8bebafc6e91 Mon Sep 17 00:00:00 2001
From: Onno Vos <onno-vos-dev@users.noreply.github.com>
Date: Thu, 8 Feb 2024 15:31:37 +0100
Subject: [PATCH] Issue #8099: badarg on non-list data into binary:join/2

---
 lib/stdlib/src/binary.erl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lib/stdlib/src/binary.erl b/lib/stdlib/src/binary.erl
index 97d7a525cb8d..9ee1318145af 100644
--- a/lib/stdlib/src/binary.erl
+++ b/lib/stdlib/src/binary.erl
@@ -953,7 +953,9 @@ join([], _Separator) -> <<>>;
 join([H], _Separator) when is_binary(H) -> H;
 join([H | T], Separator) ->
     Acc = <<>>,
-    join(T, Separator, <<Acc/binary, H/binary>>).
+    join(T, Separator, <<Acc/binary, H/binary>>);
+join(Arg, Separator) ->
+    badarg_with_info([Arg, Separator]).
 
 -spec join([binary()], binary(), binary()) -> binary().
 join([], _Separator, Acc) -> Acc;