1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
-module(ephraim_event_proxy).
-behaviour(gen_event).
-export([start/2]).
-export([init/1, handle_event/2, handle_call/2, handle_info/2, terminate/2, code_change/3]).
start(Account, EventManager) ->
gen_event:add_handler(ephraim_event_man, ?MODULE, {Account, EventManager}).
init(State) ->
{ok, State}.
handle_event({view_request, {account, Account, Event}}, {Account, EventManager}) ->
gen_event:notify(EventManager, {view_request, Event}),
{ok, {Account, EventManager}};
handle_event(_Event, State) ->
{ok, State}.
handle_call(_Msg, State) ->
{noreply, State}.
handle_info(_Msg, State) ->
{ok, State}.
terminate(_Reason, _State) ->
ok.
code_change(_OldVersion, State, _Extra) ->
{ok, State}.
|