From 16585713f84937a26d14da6ad226148b594e96db Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Pawe=C5=82=20Chmielowski?= <pchmielowski@process-one.net>
Date: Tue, 7 Apr 2020 13:49:50 +0200
Subject: [PATCH] Log errors that happen when retrieving http headers in
 ejabberd_http

It seems that ssl errors can be generated here, so lets have abily to show
them instead of swallowing them silently.
---
 src/ejabberd_http.erl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/ejabberd_http.erl b/src/ejabberd_http.erl
index 83b6effda..af98b950e 100644
--- a/src/ejabberd_http.erl
+++ b/src/ejabberd_http.erl
@@ -193,7 +193,10 @@ receive_headers(#state{trail = Trail} = State) ->
     Socket = State#state.socket,
     Data = SockMod:recv(Socket, 0, 300000),
     case Data of
-        {error, _} -> ok;
+        {error, Error} ->
+	    ?DEBUG("Error when retrieving http headers ~p: ~p",
+		   [State#state.sockmod, Error]),
+	    ok;
         {ok, D} ->
             parse_headers(State#state{trail = <<Trail/binary, D/binary>>})
     end.