anchor.diff:  	{stop, {shutdown, SessionID}, StateData};
   server_hello(timeout, StateData) ->
   	server_hello1(StateData);
  -server_hello({eap_ttls, _SslPid, <<?Handshake, _:32, ?ServerHello, _/binary>> 
  +server_hello({eap_ttls, _SslPid, <<?Handshake, _:32, ?ServerHello, _/binary>>
   		= Data}, #statedata{tx_buf = TxBuf} = StateData) ->
   	NewStateData = StateData#statedata{tx_buf = [TxBuf, Data]},
   	{next_state, server_hello, NewStateData};
  
positive.code: 	EapMessages = radius_attributes:get_all(?EAPMessage, Attributes),
  	EapMessage = iolist_to_binary(EapMessages),
  	NewStateData = StateData#statedata{radius_fsm = RadiusFsm,
  		req_auth = RequestAuthenticator},
  	try
  		#eap_packet{code = response, type = ?TTLS, identifier = EapID,
  				data = TtlsData} = ocs_eap_codec:eap_packet(EapMessage),
  
negative.code: 
  %% export the ocs_eap_ttls_fsm state callbacks
  -export([ssl_start/2, eap_start/2, client_hello/2, server_hello/2,
  			client_key_exchange/2, passthrough/2, server_change_cipher_spec/2]).
  
  %% export the call backs needed for gen_fsm behaviour
  -export([init/1, handle_event/3, handle_sync_event/4, handle_info/3,
  