Add an error report when a connection process fails to start

Becoming closer to a standard supervisor everyday.

1 files changed, 5 insertions, 1 deletions

diff --git a/src/ranch_conns_sup.erl b/src/ranch_conns_sup.erl
index e1ddbca..308a1ab 100644
--- a/src/ranch_conns_sup.erl
+++ b/src/ranch_conns_sup.erl
@@ -128,8 +128,12 @@ loop(State=#state{parent=Parent, ref=Ref, conn_type=ConnType,
 							loop(State, CurConns2, NbChildren + 1,
 								[To|Sleepers])
 					end;
-				_ ->
+				Ret ->
 					To ! self(),
+					error_logger:error_msg(
+						"Ranch listener ~p connection process start failure; "
+						"~p:start_link/4 returned: ~999999p~n",
+						[Ref, Protocol, Ret]),
 					Transport:close(Socket),
 					loop(State, CurConns, NbChildren, Sleepers)
 			end;