anchor.diff:  			MTU - 4
   	end,
   	NewTxBuf = [TxBuf, Data],
  -	case iolist_size(NewxBuf) of
  +	case iolist_size(NewTxBuf) of
   		Size when Size >= MaxSize ->
   			<<Chunk:MaxSize/binary, Rest/binary>> = iolist_to_binary(NewTxBuf),
   			EapTtls = #eap_ttls{data = Chunk},
  
positive.code: 					RadiusID, [], RequestAuthenticator, Secret, RadiusFsm),
  			NewStateData = StateData#statedata{tx_buf = Rest},
  			{next_state, ttls, NewStateData, ?TIMEOUT};
  		Size ->
  			NewStateData = StateData#statedata{tx_buf = NewTxBuf},
  			{next_state, ttls, NewStateData, ?TIMEOUT}
  	end.
  
negative.code: %% @private
  aaa(timeout, #statedata{session_id = SessionID, tx_buf = []} = StateData) ->
  	{stop, {shutdown, SessionID}, StateData};
  aaa(timeout, #statedata{tx_buf = TxBuf,
  		radius_fsm = RadiusFsm, radius_id = RadiusID,
  		req_auth = RequestAuthenticator, secret = Secret,
  		eap_id = EapID} = StateData) ->
  	EapTtls = #eap_ttls{data = iolist_to_binary(TxBuf)},
  	EapData = ocs_eap_codec:eap_ttls(EapTtls),
  	EapPacket = #eap_packet{code = request, type = ?TTLS,
  