anchor.diff:  						authenticator = ResponseAuthenticator, attributes = AttributeData},
   				ResponsePacket = radius:codec(Response),
   				radius:response(RadiusFsm, ResponsePacket),
  -				{next_state, wait_for_confirm, StateData, 0};
  +				{next_state, wait_for_confirm, StateData, ?TIMEOUT};
   			{error,exit} ->
   				{next_state, wait_for_confirm, StateData,0}
   		end
  
positive.code: 				radius:response(RadiusFsm, ResponsePacket),
  				NewStateData = StateData#statedata{eap_id = NewEAPID, ks = Ks,
  						confirm_s = ConfirmS},
  				{next_state, wait_for_confirm, StateData, 0};
  			{error,exit} ->
  				{next_state, wait_for_commit, StateData,0}
  		end
  
negative.code: 		{next_state, wait_for_commit, NewStateData, ?TIMEOUT}
  	catch
  		_:_ ->
  			{next_state, wait_for_id, StateData, ?TIMEOUT}
  	end.
  
  -spec wait_for_commit(Event :: timeout | term(), StateData :: #statedata{}) ->
  