From 787b02e4d883a8bae608cae5ed58a216a969e9bb Mon Sep 17 00:00:00 2001
From: Martin Sumner <martin.sumner@adaptip.co.uk>
Date: Wed, 7 Nov 2018 17:01:51 +0000
Subject: [PATCH] Switch to leveled_rand for compatibility

---
 test/member_test.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/test/member_test.erl b/test/member_test.erl
index e5fe5b3..2803aea 100644
--- a/test/member_test.erl
+++ b/test/member_test.erl
@@ -11,7 +11,7 @@ segments(Length) ->
         lists:foldl(fun(I, Acc) -> <<Acc/binary, (I - 1):16/integer>> end, 
                         <<>>,
                         AllSegs),
-    StartPos = random:uniform(length(AllSegs) - Length),
+    StartPos = leveled_rand:uniform(length(AllSegs) - Length),
     {<<AllSegsBin/binary, AllSegsBin/binary, 
             AllSegsBin/binary, AllSegsBin/binary>>,
         lists:sublist(AllSegs, StartPos, Length)}.