projects
/
euphorik.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
FIX le daemon plantait car ne trouvait pas euphorik_daemon:loop
[euphorik.git]
/
modules
/
erl
/
euphorik_daemon.erl
diff --git
a/modules/erl/euphorik_daemon.erl
b/modules/erl/euphorik_daemon.erl
index
51f224e
..
d8207ec
100755
(executable)
--- a/
modules/erl/euphorik_daemon.erl
+++ b/
modules/erl/euphorik_daemon.erl
@@
-23,19
+23,17
@@
\r
\r
-module(euphorik_daemon).
\r
\r
-module(euphorik_daemon).
--export([start/1, reload_euphorik/0]).
+-export([start/1, reload_euphorik/0
, loop/0
]).
-include("../include/euphorik_defines.hrl").
% Démarre le démon
-include("../include/euphorik_defines.hrl").
% Démarre le démon
-start(_A) ->
- % dossier utilisé lors de gros trie par qlc, voir qlc:keysort()
- file:set_cwd("/tmp"),
\r
+start(_A) ->
\r
loop().
\r
loop() ->
loop().
\r
loop() ->
- % on attend une minute de plus pour prevenir une dérive nétive
+ % on attend une minute de plus pour prevenir une dérive né
ga
tive
timer:sleep(1000 * trunc(temps_prochaine_election() + 60)),
euphorik_bd:elire_troll(),
\r
euphorik_daemon:loop().
timer:sleep(1000 * trunc(temps_prochaine_election() + 60)),
euphorik_bd:elire_troll(),
\r
euphorik_daemon:loop().
@@
-62,5
+60,4
@@
reload_euphorik() ->
end,
[euphorik_minichat_conversation, euphorik_protocole, euphorik_requests, euphorik_bd, euphorik_daemon]
).
end,
[euphorik_minichat_conversation, euphorik_protocole, euphorik_requests, euphorik_bd, euphorik_daemon]
).
-
-
+
\ No newline at end of file