From b570070834df7df615c2a59caabed0dabd29b6f4 Mon Sep 17 00:00:00 2001
From: Evgeniy Khramtsov <ekhramtsov@process-one.net>
Date: Wed, 19 Aug 2015 23:47:45 +0300
Subject: Fix case clause during S2S certificate checks

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

(limited to 'src')

diff --git a/src/ejabberd_s2s.erl b/src/ejabberd_s2s.erl
index 74831fffb..3acf19a1d 100644
--- a/src/ejabberd_s2s.erl
+++ b/src/ejabberd_s2s.erl
@@ -241,7 +241,7 @@ check_peer_certificate(SockMod, Sock, Peer) ->
 	    VerifyRes ->
 		{error, p1_tls:get_cert_verify_string(VerifyRes, Cert)}
 	  end;
-      error ->
+      {error, _Reason} ->
 	  {error, <<"Cannot get peer certificate">>}
     end.
 
-- 
cgit v1.2.3