anchor.diff:  %% @@see //stdlib/gen_fsm:StateName/2
   %% @private
   %%
  +wait_for_confirm(timeout, #statedata{identifier = Identifier} = StateData)->
  +	{stop, {shutdown, Identifier}, StateData};
   wait_for_confirm(_Event, StateData)->
  -	{next_state, idle, StateData}.
  +	{next_state, idle, StateData, ?TIMEOUT}.
   
   -spec handle_event(Event :: term(), StateName :: atom(),
   		StateData :: #statedata{}) ->
  
positive.code: 		confirm_s :: binary(),
  		confirm_p :: binary()}).
  
  %%----------------------------------------------------------------------
  %%  The radius_fsm API
  %%----------------------------------------------------------------------
  
negative.code: 	IDReqHeader = ocs_eap_codec:eap_pwd(Header),
  	IDRequest = <<IDReqHeader/binary, IDReqBody/binary>>,
  	gen_fsm:send_event(RadiusFsm, IDRequest),
  	{next_state, wait_for_commit, StateData, ?TIMEOUT}.
  
  -spec wait_for_commit(Event :: timeout | term(), StateData :: #statedata{}) ->
  	Result :: {next_state, NextStateName :: atom(), NewStateData :: #statedata{}}
  