anchor.diff:  %% @end
   %%--------------------------------------------------------------------
   init([]) ->
  -	lager:debug("init: Opts='[]'"),
  -	State = #state{},
  +	lager:notice("init: Opts='[]'"),
  +	{ok,{interval,Timer}} = timer:send_interval(1000,tick),
  +	Pomo = #pomo{name="2/1", work=2*60*1000*1000, break=1*60*1000*1000, timestamp=erlang:now()},
  +	State = #state{timer=Timer, pomos=[Pomo]},
   	{ok, State}.
   
   %%--------------------------------------------------------------------
  
positive.code: %% @end
  %%--------------------------------------------------------------------
  start_link() ->
  	lager:debug("start link"),
  	Res = gen_event:start_link({local, ?MODULE}),
  	gen_event:add_sup_handler(?MODULE, ?MODULE, []),
  	Res.
  
negative.code: 	 terminate/2,
  	 code_change/3]).
  
  -record(pomo, {name="", work=0, break=0, timestamp={0,0,0}}).
  -record(state, {timer, pomos=[]}).
  
  %%%===================================================================
  %%% gen_event API
  %%%===================================================================
  
  %%--------------------------------------------------------------------
  