anchor.diff:  init2([Request, Socket, LogStr, Branch, Parent]) when is_record(Request, request) ->
       {Method, URI} = {Request#request.method, Request#request.uri},
       LogTag = Branch ++ " " ++ Method,
  +
       MyToTag = siputil:generate_tag(),
   
       %% LogTag is essentially Branch + Method, LogStr is a string that
  
positive.code: 	    %% response back to this server transaction.
  	    case sipheader:get_tag(keylist:fetch('to', RHeader)) of
  		none ->
  		    logger:log(debug, "~s: Warning: No To-tag in response received (~p ~s) - transaction"
  			       "layer might not be able to route the ACK to us!", [LogTag, Status, Reason]),
  		    true;
  		ToTag when is_list(ToTag) ->
  		    case transactionlayer:store_to_tag(Request, ToTag) of
  			ok -> true;
  			R ->
  			    %% XXX abort sending?
  			    logger:log(error, "~s: Failed storing To-tag with transactionlayer : ~p", [LogTag, R])
  		    end
  	    end;
  	true -> true
  
negative.code: 			   created -> "Responding";
  			   forwarded -> "Forwarding response"
  		       end,
  		logger:log(LogLevel, "~s: ~s '~p ~s'", [LogTag, What, Status, Reason]),
  		case State#state.testing of
  		    true -> ok;
  		    false ->
  			store_transaction_result(NewSipState, Request, Status, Reason, LogTag)
  		end,
  		{ok, NewState2} = send_response(Response, SendReliably, State),
  		%% Make event out of the fact that we are sending a response
  		event_final_response(Created, NewState2, Status),
  		enter_sip_state(NewSipState, NewState2);
  	    E ->
  		logger:log(error, "~s: State machine does not allow us to send '~p ~s' in response to '~s ~s' "
  