Merge branch 'bjorn/deprecate-random/OTP-12502'

* bjorn/deprecate-random/OTP-12502:
  Deprecate the 'random' module
  Eliminate mentions of 'random' in documentation
  mnesia tests: Replace 'random' with 'rand'
  percept tests: Replace 'random' with 'rand'
  system tests: Replace 'random' with 'rand'
  common_test tests: Replace 'random' with 'rand'
  gs: Remove the contribs directory
  wx: Replace 'random' with 'rand'
  stdlib tests: Replace 'random' with 'rand'
  kernel test: Replace 'random' with 'rand'
  debugger tests: Replace 'random' with 'rand'
  compiler tests: Replace 'random' with 'rand'
  Emulator test suite: Replace use of 'random' with 'rand'
  Use 'rand' instead of the obsolete 'random' module
  compile: Eliminate use of the obsolete 'random' module

1 files changed, 1 insertions, 14 deletions

diff --git a/lib/mnesia/src/mnesia_lib.erl b/lib/mnesia/src/mnesia_lib.erl
index 77c7a7638d..4e761d2bed 100644
--- a/lib/mnesia/src/mnesia_lib.erl
+++ b/lib/mnesia/src/mnesia_lib.erl
@@ -921,20 +921,7 @@ random_time(Retries, _Counter0) ->
     UpperLimit = 500,
     Dup = Retries * Retries,
     MaxIntv = trunc(UpperLimit * (1-(50/((Dup)+50)))),
-    
-    case get(random_seed) of
-	undefined ->
-	    _ = random:seed(erlang:unique_integer(),
-			    erlang:monotonic_time(),
-			    erlang:unique_integer()),
-	    Time = Dup + random:uniform(MaxIntv),
-	    %%	    dbg_out("---random_test rs ~w max ~w val ~w---~n", [Retries, MaxIntv, Time]),
-	    Time;
-	_ ->
-	    Time = Dup + random:uniform(MaxIntv),
-	    %%	    dbg_out("---random_test rs ~w max ~w val ~w---~n", [Retries, MaxIntv, Time]),
-	    Time	    
-    end.
+    Dup + rand:uniform(MaxIntv).
 
 report_system_event(Event0) ->
     Event = {mnesia_system_event, Event0},