anchor.diff:  					element_s = ElementS},
   				{next_state, wait_for_commit, NewStateData, ?TIMEOUT};
   			error ->
  -				send_response(?EapFailure, NewEapID, <<>>, ?AccessReject,
  +				send_response(?EapFailure, EapID, <<>>, ?AccessReject,
   					RadiusID, RequestAuthenticator, Secret, RadiusFsm),
   				{stop, {shutdown, SessionID}, StateData}
   		end
  
positive.code: 		ExpectedSize ->
  			wait_for_confirm2(RadiusFsm, AccessRequest, StateData);
  		_ ->
  			NewEapID = EapID + 1,
  			send_response(?EapFailure, NewEapID, <<>>, ?AccessReject, RadiusID,
  					RequestAuthenticator, Secret, RadiusFsm),
  			{error, exit}
  	end.
  
negative.code: 		eap_id = EapID, session_id = SessionID} = StateData) ->
  	case {ElementP, ScalarP} of
  		{ElementS, ScalarS} ->
  			send_response(?EapFailure, EapID, <<>>, ?AccessReject,
  					RadiusID, RequestAuthenticator, Secret, RadiusFsm),
  			{stop, {shutdown, SessionID}, StateData};
  		_ ->
  