Don't misuse monotonic_time/0

diff --git a/src/ejabberd_riak_sup.erl b/src/ejabberd_riak_sup.erl
index 12b701b476833c802a1a81971307c08ec0ab80ef..ac02a846f470674c7b94a260ba4369a488fe4a8a 100644 (file)
--- a/src/ejabberd_riak_sup.erl
+++ b/src/ejabberd_riak_sup.erl
@@ -189,7 +189,7 @@ get_pids() ->
     [ejabberd_riak:get_proc(I) || I <- lists:seq(1, get_pool_size())].
 
 get_random_pid() ->
-    get_random_pid(p1_time_compat:monotonic_time()).
+    get_random_pid(p1_time_compat:system_time()).
 
 get_random_pid(Term) ->
     I = erlang:phash2(Term, get_pool_size()) + 1,

diff --git a/src/ejabberd_router.erl b/src/ejabberd_router.erl
index 7591822e3b00784a3d94e241852edc8ba16d5a58..7474f9a6715dadd3a47fb1f854da227cff0e1f55 100644 (file)
--- a/src/ejabberd_router.erl
+++ b/src/ejabberd_router.erl
@@ -346,8 +346,8 @@ get_component_number(LDomain) ->
 get_domain_balancing(From, To, LDomain) ->
     case ejabberd_config:get_option(
           {domain_balancing, LDomain}, fun(D) when is_atom(D) -> D end) of
-       undefined -> p1_time_compat:monotonic_time();
-       random -> p1_time_compat:monotonic_time();
+       undefined -> p1_time_compat:system_time();
+       random -> p1_time_compat:system_time();
        source -> jid:tolower(From);
        destination -> jid:tolower(To);
        bare_source -> jid:remove_resource(jid:tolower(From));