anchor.diff:  handle_message(Data, State) when is_binary(Data) ->
     handle_message(seto_piqi:parse_message(Data), State);
   
  -handle_message(#seto_message{seq=Seq} = _Msg, #s{in=InSeq} = State0) when Seq > InSeq ->
  +handle_message(#seto_message{seq=Seq, payload=Payload}, #s{in=InSeq} = State0) when Seq > InSeq ->
     io:format("Replay from ~p to ~p~n", [InSeq, Seq]),
  -  {_, State} = send_call({replay, #seto_replay{seq=InSeq}}, State0),
  +  {_, State} = send_call({replay, #seto_replay{seq=InSeq}}, login_payload(Payload,State0)),
     State;
   
   handle_message(#seto_message{seq=Seq, payload=Payload} = _Msg, #s{in=Seq} = State) ->
  
positive.code: 
  handle_payload(Payload, State) ->
    io:format("Received ~p~n", [Payload]),
    State.
  
  send_call(Payload, #s{session=Sess, out=Seq, sock=Sock} = State) ->
  
negative.code: handle_info(_Info, State) ->
    {noreply, State}.
  
  terminate(Reason, #s{session=Sess, in=In, out=Out}) ->
    io:format("Terminated (~p) - to resume add opts {session,~p},{in,~p},{out,~p}~n", [Reason,Sess,In,Out]),
    ok.
  
  code_change(_OldVsn, State, _Extra) ->
  