anchor.diff:      {list_to_integer(Year), list_to_integer(Month), list_to_integer(Day)}.
   
   keepAliveSessions(SessionTuple) ->
  -    ProcessAlive = fun ({Pid, _}) -> is_process_alive(Pid) end,
  +    ProcessAlive = fun ({{remote, Pid}, _})  -> evalRemove(Pid);
  +                       ({Pid, _})            -> is_process_alive(Pid) end,
       case catch lists:filter(ProcessAlive, SessionTuple) of
           {'EXIT', _Reason} ->
               SessionTuple;
  
positive.code:     SessionId;
  getSessionId(_) ->
      undefined.
  
  getHeaders(SessionId, #state{headers = SessionHdrList}) ->
      case lists:keyfind(SessionId, 1, SessionHdrList) of
  
negative.code: stop() ->
      gen_server:cast(?MODULE, stop).
  
  evalRemove(Pid) ->
      gen_server:cast(?MODULE, {evalRemove, Pid}).
  
  getPort() ->
      gen_server:call(?MODULE, getPort).
  
  