From c81335b3cc0ce22b1f6a6b0d786c5536b9ffb0ed Mon Sep 17 00:00:00 2001
From: Luis Rascao <luis.rascao@gmail.com>
Date: Mon, 5 Sep 2016 22:43:57 +0100
Subject: Add recent OTP versions

---
 test/rlx_test_utils.erl | 19 +++++++++++++------
 1 file changed, 13 insertions(+), 6 deletions(-)

(limited to 'test/rlx_test_utils.erl')

diff --git a/test/rlx_test_utils.erl b/test/rlx_test_utils.erl
index 1157e3f..b26e143 100644
--- a/test/rlx_test_utils.erl
+++ b/test/rlx_test_utils.erl
@@ -45,14 +45,12 @@ get_app_metadata(Name, Vsn, Deps, LibDeps) ->
       {applications, Deps}]}.
 
 create_random_name(Name) ->
-    random:seed(os:timestamp()),
-    Name ++ erlang:integer_to_list(random:uniform(1000000)).
+    Name ++ erlang:integer_to_list(random_uniform(1000000)).
 
 create_random_vsn() ->
-    random:seed(os:timestamp()),
-    lists:flatten([erlang:integer_to_list(random:uniform(100)),
-                   ".", erlang:integer_to_list(random:uniform(100)),
-                   ".", erlang:integer_to_list(random:uniform(100))]).
+    lists:flatten([erlang:integer_to_list(random_uniform(100)),
+                   ".", erlang:integer_to_list(random_uniform(100)),
+                   ".", erlang:integer_to_list(random_uniform(100))]).
 
 write_config(Filename, Values) ->
     ok = filelib:ensure_dir(Filename),
@@ -79,3 +77,12 @@ test_template_contents() ->
         "{foo_dir, \"{{foo_dir}}\"}.\n"
         "{foo_yahoo, \"{{foo_yahoo}}\"}.\n"
         "{google, \"{{google}}\"}.\n".
+
+-ifdef(rand_module).
+random_uniform(N) ->
+    rand:uniform(N).
+-else.
+random_uniform(N) ->
+    random:seed(os:timestamp()),
+    random:uniform(N).
+-endif.
-- 
cgit v1.2.3