X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=modules%2Ferl%2Feuphorik_daemon.erl;h=00825a03079f47b8b4b15778e24d33517ed343df;hp=dc33a7ffd0735675f66a133ee99f7b0b05e4b41a;hb=6d1aeefe7c166ab9033d69347d85bb7eb20d0fa8;hpb=5790c374341c5e542ff17a8f245bb5aa43af1d58 diff --git a/modules/erl/euphorik_daemon.erl b/modules/erl/euphorik_daemon.erl index dc33a7f..00825a0 100755 --- a/modules/erl/euphorik_daemon.erl +++ b/modules/erl/euphorik_daemon.erl @@ -18,6 +18,7 @@ % % Module tournant en background s'occupant periodiquement de certaines tâches : % - sélection du prochain troll chaque semaine +% - rechargement des modules lors d'une mise en production % Date : 05.11.2007 % @author G.Burri @@ -26,7 +27,6 @@ -export([start/1, reload_euphorik/0]). -include("../include/euphorik_defines.hrl"). - % Démarre le démon start(_A) -> loop(). @@ -34,7 +34,7 @@ start(_A) -> loop() -> % on attend une minute de plus pour prevenir une dérive négative - timer:sleep(1000 * trunc(temps_prochaine_election() + 60)), + timer:sleep(1000 * (trunc(temps_prochaine_election() + 60))), euphorik_bd:elire_troll(), euphorik_daemon:loop(). @@ -45,7 +45,7 @@ temps_prochaine_election() -> {Date, {H,M,S}} = calendar:local_time(), Delta = (?JOUR_ELECTION_TROLL - 1) * 86400 + ?HEURE_ELECTION_TROLL * 60 * 60 -((calendar:day_of_the_week(Date) - 1) * 86400 + H * 60 * 60 + M * 60 + S), - % attention au cas où deux dates (maintenant et la date d'éction) ne se trouvent pas dans la même semaine. + % attention au cas où deux dates (maintenant et la date d'élection) ne se trouvent pas dans la même semaine. if Delta =< 0 -> Delta + 7 * 86400; true -> Delta end. @@ -58,7 +58,6 @@ reload_euphorik() -> code:purge(M), code:load_file(M) end, - [euphorik_minichat_conversation, euphorik_protocole, euphorik_requests, euphorik_bd, euphorik_daemon] + [euphorik_common, euphorik_minichat_conversation, euphorik_protocole, euphorik_requests, euphorik_bd, euphorik_daemon] ). - - + \ No newline at end of file