diff options
author | Matthias Schiffer <mschiffer@universe-factory.net> | 2010-10-04 06:04:19 +0200 |
---|---|---|
committer | Matthias Schiffer <mschiffer@universe-factory.net> | 2010-10-04 06:04:19 +0200 |
commit | cabc0995c0e0964ecbef18470c6a483022879071 (patch) | |
tree | ea78fc03c11302f847b429fe417cdde412923613 /src/core/ephraim_account.erl | |
parent | 2b99ed6fd9cf84c405f426ea0914b233b1f40ef1 (diff) | |
download | ephraim-cabc0995c0e0964ecbef18470c6a483022879071.tar ephraim-cabc0995c0e0964ecbef18470c6a483022879071.zip |
Major reorganisation of the core, still unfinished...
Diffstat (limited to 'src/core/ephraim_account.erl')
-rw-r--r-- | src/core/ephraim_account.erl | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/src/core/ephraim_account.erl b/src/core/ephraim_account.erl new file mode 100644 index 0000000..d79e118 --- /dev/null +++ b/src/core/ephraim_account.erl @@ -0,0 +1,17 @@ +-module(ephraim_account). +-behaviour(supervisor). +-export([start_link/0]). +-export([init/1]). + +start_link() -> + {ok, Pid} = supervisor:start_link(?MODULE, []), + + {ok, EventManager} = supervisor:start_child(Pid, {event_man, {gen_event, start_link, []}, permanent, 1000, worker, [gen_event]}), + ephraim_account_event_proxy:start(EventManager), + + {ok, Connection} = supervisor:start_child(Pid, {connection, {ephraim_conn, start_link, [EventManager]}, permanent, 10000, worker, [ephraim_conn]}), + {ok, _} = supervisor:start_child(Pid, {roster, {ephraim_roster, start_link, [EventManager, Connection]}, permanent, 1000, worker, [ephraim_roster]}), + {ok, Pid}. + +init(_Args) -> + {ok, {{one_for_all, 0, 1}, []}}. |