anchor.diff:  					send_response(NewEapPacket, ?AccessChallenge,
   							RadiusID, [], RequestAuthenticator, Secret, RadiusFsm),
   					NextStateData = NewStateData#statedata{eap_id = NewEapID},
  -					{next_state, handle_peer, NextStateData, ?TIMEOUT};
  +					{next_state, client_hello, NextStateData, ?TIMEOUT};
   				#eap_packet{code = request, identifier = NewEapID} ->
   					NewEapPacket = #eap_packet{code = response, type = ?LegacyNak,
   							identifier = NewEapID, data = <<0>>},
  
positive.code: 				send_response(EapPacket1, ?AccessChallenge,
  					RadiusID, [], RequestAuthenticator, Secret, RadiusFsm),
  				NextStateData = NewStateData#statedata{rx_buf = [RxBuf, Data]},
  				{next_state, handle_peer, NextStateData, ?TIMEOUT};
  			#eap_ttls{more = true, message_len = MessageLength,
  					start = false, data = Data} ->
  				NewEapID = EapID + 1,
  
negative.code: 			StateData#statedata{max_size = 1496,
  					radius_fsm = RadiusFsm, radius_id = RadiusID,
  					req_auth = RequestAuthenticator};
  		{{ok, MTU}, {ok, 15}} -> % Ethernet
  			StateData#statedata{max_size = MTU - 4,
  					radius_fsm = RadiusFsm, radius_id = RadiusID,
  					req_auth = RequestAuthenticator};
  