anchor.diff:      {ok, Text} = find("search", Dict),
       HtmlPage = doShowLoggedWork(User, default(Text, "")),
       SessionHdrList2 = keepAliveSessions(SessionHdrList),
  -    {reply, [Headers, HtmlPage], State#state{headers = SessionHdrList2}};
  +    {reply, Headers ++ HtmlPage, State#state{headers = SessionHdrList2}};
   handle_call({indexJSON, _SessionId, _Env, _Input}, _From,
               State = #state{user = User}) ->
       Flt = getFilterCfg(?defTaskList, User),
  
positive.code:                 eHtml:pageFooter()],
  
      SessionHdrList2 = keepAliveSessions(SessionHdrList),
      {reply, [Headers, HtmlPage], State#state{headers = SessionHdrList2}};
  handle_call({showStatus, SessionId, _Env, _Input}, _From,
              State = #state{user    = User,
                             headers = SessionHdrList,
  
negative.code:         "\"status\":\"", Status, "\",\"statusMsg\":\"",
          makeHtml(StatusMsg), "\"}"],
      SessionHdrList2 = keepAliveSessions(SessionHdrList),
      {reply, Headers ++ HtmlPage, State#state{headers = SessionHdrList2}};
  handle_call({showLoggedWork, SessionId, _Env, Input}, _From,
              State = #state{user = User, headers = SessionHdrList}) ->
      Headers = getHeaders(SessionId, State),
  