anchor.diff:  		CbProc :: {pid(), term()},
   		Request :: #diameter_nas_app_AAR{} | #diameter_eap_app_DER{},
   		State :: state(),
  -		Result :: {Fsm, State},
  -		Fsm :: undefined | pid().
  +		Result :: {AuthFsm, State},
  +		AuthFsm :: undefined | pid().
   start_fsm(AuthSup, AppId, SessId, Type, OHost, ORealm,
  -		Options, CbProc, Request, #state{handlers = Handlers, address = Address, port = Port,
  -		cb_fsms = FsmHandler} = State) ->
  +		Options, CbProc, Request, #state{handlers = Handlers, address = Address,
  +		port = Port, cb_fsms = FsmHandler} = State) ->
   	StartArgs = [diameter, Address, Port, SessId, AppId, Type, OHost,
   			ORealm, Request, Options],
   	ChildSpec = [StartArgs, []],
   	case supervisor:start_child(AuthSup, ChildSpec) of
  -		{ok, Fsm} ->
  -			link(Fsm),
  -			NewHandlers = gb_trees:enter(SessId, Fsm, Handlers),
  -			NewFsmHandler = gb_trees:enter(Fsm, CbProc, FsmHandler),
  -			{Fsm, State#state{handlers = NewHandlers, cb_fsms = NewFsmHandler}};
  +		{ok, AuthFsm} ->
  +			link(AuthFsm),
  +			NewHandlers = gb_trees:enter(SessId, AuthFsm, Handlers),
  +			NewFsmHandler = gb_trees:enter(AuthFsm, CbProc, FsmHandler),
  +			NewState = State#state{handlers = NewHandlers, cb_fsms = NewFsmHandler},
  +			{AuthFsm, NewState};
   		{error, Reason} ->
   			error_logger:error_report(["Error starting session handler",
   					{error, Reason}, {supervisor, AuthSup},{session_id, SessId}]),
  
positive.code: 	end.
  %% @hidden
  request1(EapType, OHost, ORealm, Request, CbProc, #state{handlers = Handlers,
  		method_prefer = MethodPrefer, method_order = MethodOrder} = State) ->
  	{SessionId, AuthType} = get_attibutes(Request),
  	try
  		case gb_trees:lookup(SessionId, Handlers) of
  
negative.code: 								'Origin-Host' = OHost, 'Origin-Realm' = ORealm },
  						{reply, Answer, State};
  					{eap, _Eap} ->
  						NewFsmHandler = gb_trees:enter(Fsm, CbProc, FsmHandler),
  						gen_fsm:send_event(Fsm, Request),
  						{noreply, State#state{cb_fsms = NewFsmHandler}}
  				end
  		end
  	catch
  