File 0519-inets-Remove-legacy-code.patch of Package erlang

From 7b0e7ed3de924bcd73f309889a02765d53a3b814 Mon Sep 17 00:00:00 2001
From: Ingela Anderton Andin <ingela@erlang.org>
Date: Tue, 26 Nov 2019 10:16:20 +0100
Subject: [PATCH] inets: Remove legacy code

Use module rand instead of random
---
 lib/inets/examples/httpd_load_test/hdlt_random_html.erl | 16 +---------------
 1 file changed, 1 insertion(+), 15 deletions(-)

diff --git a/lib/inets/examples/httpd_load_test/hdlt_random_html.erl b/lib/inets/examples/httpd_load_test/hdlt_random_html.erl
index 3b72d27f06..75b01fede0 100644
--- a/lib/inets/examples/httpd_load_test/hdlt_random_html.erl
+++ b/lib/inets/examples/httpd_load_test/hdlt_random_html.erl
@@ -23,10 +23,6 @@
 -export([page/3]). 
 
 page(SessionID, _Env, Input) -> 
-%%     log("page(~p) -> deliver content-type when"
-%% 	"~n   SessionID: ~p"
-%% 	"~n   Env:       ~p"
-%% 	"~n   Input:     ~p", [self(), SessionID, Env, Input]),
     [WorkSimStr, SzSimStr] = string:tokens(Input, [$:]),
     WorkSim = list_to_integer(WorkSimStr),
     SzSim   = list_to_integer(SzSimStr),
@@ -49,15 +45,5 @@ stop() ->
 ". 
  
 content(WorkSim, SzSim) ->  
-    {A, B, C} = {erlang:phash2([node()]),
-                 inets_time_compat:monotonic_time(),
-                 inets_time_compat:unique_integer()},
-
-    random:seed(A, B, C),  
-    lists:sort([random:uniform(X) || X <- lists:seq(1, WorkSim)]),  
+    lists:sort([rand:uniform(X) || X <- lists:seq(1, WorkSim)]),  
     lists:flatten(lists:duplicate(SzSim, "Dummy data ")). 
-
-%% log(F, A) ->
-%%     hdlt_logger:set_name("HDLT RANDOM-HTML"),
-%%     hdlt_logger:set_level(debug),
-%%     hdlt_logger:log(F, A).
-- 
2.16.4

openSUSE Build Service is sponsored by