swrup/pellest
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

do not call regularly_call_fun twice as second call will overwrite the

Browse source 
first one...
This commit is contained in:
pena 2023-01-08 04:22:28 +01:00 • committed by Swrup
parent 84129826b5
commit 1d71c9f09b
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/pellest.ml
View file

@ -14,10 +14,12 @@ let update_online_user_state () =
(fun _user_id state -> Some (Shared.State.auto_update state)) (fun _user_id state -> Some (Shared.State.auto_update state))
User.state_ht User.state_ht
let to_repeat () =
update_online_user_state ();
update_offline_user_state ()
let () = let () =
regularly_call_fun update_online_user_state regularly_call_fun to_repeat
(Shared.Time.s_to_float Shared.State.auto_update_rate);
regularly_call_fun update_offline_user_state
(Shared.Time.s_to_float Shared.State.auto_update_rate) (Shared.Time.s_to_float Shared.State.auto_update_rate)
let () = let () =