From ae1d1846c6cfaa5f0ec7d34cd07ec8e856d1cfae Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= Date: Mon, 29 Apr 2013 18:05:59 +0200 Subject: Allow connection processes to be supervisors --- src/ranch_listener_sup.erl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/ranch_listener_sup.erl') diff --git a/src/ranch_listener_sup.erl b/src/ranch_listener_sup.erl index 9f19123..2aecd60 100644 --- a/src/ranch_listener_sup.erl +++ b/src/ranch_listener_sup.erl @@ -36,10 +36,11 @@ start_link(Ref, NbAcceptors, Transport, TransOpts, Protocol, ProtoOpts) -> %% supervisor. init({Ref, NbAcceptors, Transport, TransOpts, Protocol}) -> + ConnType = proplists:get_value(connection_type, TransOpts, worker), ChildSpecs = [ %% conns_sup {ranch_conns_sup, {ranch_conns_sup, start_link, - [Ref, Transport, Protocol]}, + [Ref, ConnType, Transport, Protocol]}, permanent, infinity, supervisor, [ranch_conns_sup]}, %% acceptors_sup {ranch_acceptors_sup, {ranch_acceptors_sup, start_link, -- cgit v1.2.3