anchor.diff:  -include_lib("include/iot_lib.hrl").
   %% API
   -export([start_link/1, init/1, handle_call/3, handle_info/2, terminate/2, code_change/3]).
  --export([connect/0, register_handler/2, unregister_handler/1, get_time/0, time_from_stanza/1, user_spec/5]).
  +-export([connect/0, register_handler/2, unregister_handler/1, get_time/0, time_from_stanza/1, user_spec/5, save_time/0]).
   
   start_link(_) ->
     gen_server:start_link(
  
positive.code:     after
        ?TIMEOUT ->
          {reply, timeout, {Client, Handlers}}
    end.
  
  handle_info({stanza, _, Stanza}, {Client, Handlers}) ->
    ReturnedAcc = handle_stanza(Stanza, Handlers),                      %%I Should restore it somewhere
  
negative.code:       {reply, unregistered, {Client, NewHandlers}}
    end;
  
  handle_call(get_time, _, {Client, Handlers}) ->
    {ok, Username} = application:get_env(iot,username),
    {ok, Domain} = application:get_env(iot,domain),
    {ok, Host} = application:get_env(iot,host),
    HalfJid = <<Username/binary, <<"@">>/binary>>,
    FullJid = <<HalfJid/binary,Domain/binary>>,
    Stanza = ?TIME_STANZA(FullJid, Host),
    escalus:send(Client, Stanza),
    receive
      {stanza, _, Reply} ->
  