anchor.diff:  				BinTtlsData = iolist_to_binary([RxBuf, Data]),
   				NextStateData = NewStateData#statedata{rx_buf = [],
   						rx_length = undefined},
  -				client_key_exchange1(BinTtlsData, NextStateData);
  +				client_cipher1(BinTtlsData, NextStateData);
   			#eap_ttls{more = false, message_len = undefined,
   					start = false, data = Data} ->
   				RxLength = iolist_size([RxBuf, Data]),
   				BinTtlsData = iolist_to_binary([RxBuf, Data]),
   				NextStateData = NewStateData#statedata{rx_buf = [],
   								rx_length = undefined},
  -				client_key_exchange1(BinTtlsData, NextStateData);
  +				client_cipher1(BinTtlsData, NextStateData);
   			#eap_ttls{more = true, message_len = undefined,
   					start = false, data = Data} when RxBuf /= [] ->
   				NewEapID = EapID + 1,
  
positive.code: 				send_response(EapPacket1, ?AccessChallenge,
  					RadiusID, [], RequestAuthenticator, Secret, RadiusFsm),
  				NextStateData = NewStateData#statedata{rx_buf = [RxBuf, Data]},
  				{next_state, client_key_exchange, NextStateData, ?TIMEOUT};
  			#eap_ttls{more = true, message_len = MessageLength,
  					start = false, data = Data} ->
  				NewEapID = EapID + 1,
  
negative.code: 
  %% export the ocs_eap_ttls_fsm state callbacks
  -export([ssl_start/2, eap_start/2, client_hello/2, server_hello/2,
  			client_cipher/2, passthrough/2, server_cipher/2]).
  
  %% export the call backs needed for gen_fsm behaviour
  -export([init/1, handle_event/3, handle_sync_event/4, handle_info/3,
  