anchor.diff:  %%                                                    {true, Pid}
   %% @end
   %%--------------------------------------------------------------------
  -proxyCall({Message, _SessionId, Env, Input}, State)
  +proxyCall({Message, SessionId, Env, Input},
  +          State = #state{headers = SessionHdrList})
     when (Message == index)      or
          (Message == show)       or
          (Message == showStatus) or
  
positive.code:     Day   = string:sub_string(Numbers, 7, 8),
      {list_to_integer(Year), list_to_integer(Month), list_to_integer(Day)}.
  
  keepAliveSessions(LastMsg) ->
      lists:filter(fun ({Pid, _}) -> is_process_alive(Pid) end, LastMsg).
  
negative.code:     HtmlPage   = [eHtml:pageHeader(User),
                    [eHtml:makeHtmlTaskCSS2(ETodo) || ETodo <- ETodos],
                    eHtml:pageFooter()],
  
      SessionHdrList2 = keepAliveSessions(SessionHdrList),
      {reply, Headers ++ HtmlPage, State#state{headers = SessionHdrList2}};
  handle_call({message, _SessionId, _Env, _Input}, _From,
              State = #state{user        = User,
                             users       = Users,
  