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