From c569118a3a6739f6664031449a35ef64e345c68c Mon Sep 17 00:00:00 2001
From: Harald Welte <laforge@gnumonks.org>
Date: Tue, 13 Dec 2011 18:58:41 +0100
Subject: [PATCH] tcap_tco_server is a gen_server, not gen_fsm!

---
 TCAP/src/tcap_components_sup.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/TCAP/src/tcap_components_sup.erl b/TCAP/src/tcap_components_sup.erl
index 8458351..13bb222 100644
--- a/TCAP/src/tcap_components_sup.erl
+++ b/TCAP/src/tcap_components_sup.erl
@@ -49,7 +49,7 @@
 init([USAP, ID, DHA]) ->
 	Name = list_to_atom("cco_" ++ integer_to_list(ID)),
 	StartArgs = [tcap_cco_server, [self(), USAP, ID, DHA], [{debug, [trace]}]],
-	StartFunc = {gen_fsm, start_link, StartArgs},
+	StartFunc = {gen_server, start_link, StartArgs},
 	ChildSpec = {Name, StartFunc, temporary, 4000, worker,
 			[tcap_cco_server]},
 	{ok,{{one_for_all, 0, 1}, [ChildSpec]}}.