From bd91071d0bf9ff3079820017debda2842931a114 Mon Sep 17 00:00:00 2001 From: Harald Welte Date: Sat, 22 Oct 2011 22:18:39 +0200 Subject: [PATCH] include DHA pid in init arguments of component supervisor --- TCAP/src/ITU/tcap_dha_fsm.erl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/TCAP/src/ITU/tcap_dha_fsm.erl b/TCAP/src/ITU/tcap_dha_fsm.erl index 711c968..554933f 100644 --- a/TCAP/src/ITU/tcap_dha_fsm.erl +++ b/TCAP/src/ITU/tcap_dha_fsm.erl @@ -86,7 +86,8 @@ init({USAP, DialogueID, TCO, Supervisor}) -> init({USAP, DialogueID, TCO, SupId, Supervisor}) -> %% Start a Component Coordinator (CCO) process ChildName = list_to_atom("cco_sup_" ++ integer_to_list(DialogueID)), - StartFunc = {supervisor, start_link, [tcap_components_sup, [USAP, DialogueID]]}, + ChildArgs = [USAP, DialogueID, self()], + StartFunc = {supervisor, start_link, [tcap_components_sup, ChildArgs]}, ChildSpec = {ChildName, StartFunc, permanent, infinity, supervisor, [tcap_components_sup]}, {ok, CCO} = supervisor:start_child(Supervisor, ChildSpec),