anchor.diff:      constructMessage(LoggedWork, {[], []}, 1).
   
   constructMessage([], {Acc1, Acc2}, _Index) ->
  -    {["Set remaining to time left"|lists:reverse(Acc1)], Acc2};
  +    {["Set remaining to time left",
  +      "Set estimate to time estimate"|lists:reverse(Acc1)], Acc2};
   constructMessage([{new, Date, Seconds}|Rest], {Acc1, Acc2}, Index) ->
       NAcc1 = [Date ++ " Time spent: " ++
                    binary_to_list(convertSeconds2Jira(Seconds))|Acc1],
  
positive.code:                         characters_to_binary(Desc2)
                  end,
      Status    = get(<<"name">>, get(<<"status">>, Fields, #{}), <<>>),
      Priority  = get(<<"id">>, get(<<"priority">>, Fields, <<>>), 2),
      ComUrl    = BaseUrl ++ "/2/issue/" ++ Key ++ "/comment",
      Result2   = httpRequest(BAuth, get, ComUrl),
      MapRes2   = jsx:decode(Result2, [return_maps]),
  
negative.code:             case wxMultiChoiceDialog:showModal(MultiDlg) of
                  ?wxID_OK ->
                      MSel   = wxMultiChoiceDialog:getSelections(MultiDlg),
                      TTLog  = [lists:nth(I - 1, LoggedWork2) || I <- MSel, I < 2],
                      SetRem = {lists:member(0, MSel), Remaining},
                      SetEst = {lists:member(1, MSel), Estimate},
                      doSetRemaining(SetRem, BAuth, BaseUrl ++ "/2/issue/" ++ Key),
                      doSetEstimate(SetEst,  BAuth, BaseUrl ++ "/2/issue/" ++ Key),
                      logTime(TTLog, BAuth, FullUrl);
                  ?wxID_CANCEL ->
                      ok
  