anchor.diff:  		end.
   %% @hidden
   wait_for_commit2(#statedata{element_p = ElementP, scalar_p = ScalarP, scalar_s = ScalarS,
  -		element_s = ElementS,  radius_fsm = RadiusFsm, radius_id = RadiusID,
  +		element_s = ElementS,  eap_fsm = RadiusFsm, radius_id = RadiusID,
   		secret = Secret, authenticator = RequestAuthenticator} = StateData) ->
   	case {ElementP, ScalarP} of
   		{ElementS, ScalarS} ->
  
positive.code: 
  -behaviour(gen_fsm).
  
  %% export the radius_fsm API
  -export([]).
  
  %% export the radius_fsm state callbacks
  -export([idle/2, wait_for_id/2, wait_for_commit/2, wait_for_confirm/2]).
  
  %% export the call backs needed for gen_fsm behaviour
  
negative.code: 				{error, exit}
  		end.
  %% @hidden
  wait_for_commit2(Kp, #statedata{eap_fsm = RadiusFsm, radius_id = RadiusID,
  		secret = Secret, authenticator = RequestAuthenticator, ks = Ks} = _StateData) ->
  	case Kp of
  		Ks ->
  