anchor.diff:  	IDReqHeader = ocs_eap_codec:eap_pwd(Header),
   	IDRequest = <<IDReqHeader/binary, IDReqBody/binary>>,
   	gen_fsm:send_event(RadiusFsm, IDRequest),
  -	{next_state, wait_for_commit, StateData}.
  +	{next_state, wait_for_commit, StateData, ?TIMEOUT}.
   
   -spec wait_for_commit(Event :: timeout | term(), StateData :: #statedata{}) ->
   	Result :: {next_state, NextStateName :: atom(), NewStateData :: #statedata{}}
  
positive.code: 		confirm_s :: binary(),
  		confirm_p :: binary()}).
  
  %%----------------------------------------------------------------------
  %%  The radius_fsm API
  %%----------------------------------------------------------------------
  
negative.code: %% @see //stdlib/gen_fsm:init/1
  %% @private
  %%
  init([RadiusFsm, Address, Port, Identifier] = _Args) ->
  	process_flag(trap_exit, true),
  	StateData = #statedata{radius_fsm = RadiusFsm, address = Address,
  			port = Port, identifier = Identifier},
  	{ok, idle, StateData, ?TIMEOUT}.
  
  -spec idle(Event :: timeout | term(), StateData :: #statedata{}) ->
  	Result :: {next_state, NextStateName :: atom(), NewStateData :: #statedata{}}
  